如何在Excel中复制不同的行? 我在AD组列中有单个值,我需要在下面的行中的空白单元格中复制。每个广告组名称应有3个
我的第一个屏幕截图显示了当前的情况: 我的第二个屏幕截图显示了我需要它的方式: 有3万行,所以我需要一个公式或动态方法来实现这一点。以下是我的答案: 使用VBA:如何在Excel中复制不同的行? 我在AD组列中有单个值,我需要在下面的行中的空白单元格中复制。每个广告组名称应有3个,excel,excel-formula,Excel,Excel Formula,我的第一个屏幕截图显示了当前的情况: 我的第二个屏幕截图显示了我需要它的方式: 有3万行,所以我需要一个公式或动态方法来实现这一点。以下是我的答案: 使用VBA: Sub selectBlankCells() Dim r 'to store the number of the last row of data Dim rng As Range r = Range("A1").End(xlDown).Row 'to find the last row Set
Sub selectBlankCells()
Dim r 'to store the number of the last row of data
Dim rng As Range
r = Range("A1").End(xlDown).Row 'to find the last row
Set rng = Range(Cells(1, 2), Cells(r, 2)) ' set the range of column B, of the data
rng.SpecialCells(xlCellTypeBlanks).FormulaR1C1 = "=R[-1]C" ' this is where you put the formula to
'set the data of above cell in every empty cell of
'column B
End Sub
也可以使用Excel选项:
选择B列数据,从最后一行到单元格B1,然后按F5
,出现此窗口
然后按Special…
然后,选择Blanks
和OK
你只选择空白单元格,然后你可以把公式连接到上面的单元格和活动单元格。 这种方法需要使用([Ctrl]+[Enter]将公式一次放入所有单元格,正如Jeeped所说):
您将获得以下信息:您只需使用
F5
>>特殊>空格
,选择区域范围,然后将公式设置为等于上面的单元格(=A3中的A2)。@ElbertVillarreal使用该特殊>空格,我仍然需要为每个空格键入上面单元格的名称,对吗?在这种情况下,是的。。。但是请检查我的答案,让我知道我的答案是否对你有好处。记住我给你的最后一个答案。使用VBA
你不需要键入任何内容。可以这样说,在手动方法中,需要[Ctrl]+[Enter]将公式一次放入所有单元格。您也可以选择整个列;Excel只会在UsedRange中找到空白。你是对的@Jeeped,我错过了!