VBA填充标题下的第一行
很简单的问题,令我感到沮丧。 我在工作表中有这个过滤列,其中Type是标题名称:
AO 1 Type 55 blank 62 blank 63 blank 65 blank
我正在尝试填充所有过去的types在这个已过滤的列与文本'A'
我到目前为止的尝试:
LastRow = Range("AO" & Rows.Count).End(xlUp).Row Range("AO:AO" & LastRow).Offset(1).Formula = "A"
但我似乎无法得到这个变化的工作。 任何帮助表示赞赏
试着做
Sheets("Sheet1").Range("AO2:AO" & LastRow).SpecialCells(xlCellTypeVisible).Value = "A"
编辑之后,我可能LastRow
更改为:
LastRow = Sheets("Sheet1").Range("A" & Rows.Count).End(xlUp).Row
因为如果你在filter之后使用AO
,就像你所显示的那样,你可能有很多空白。 然后LastRow
可能无法正确设置。 使用列A(我假设有最多的数据?),你可以帮助防止任何错误。