VBA用文本值填充可变单元格范围

时间:2019-06-11 10:52:21

标签: excel vba

我正在使用Excel宏中的VBA进行以下操作(标题中)。

我找到了有关如何用值填充设置范围的解决方案,但是我找不到与要填充的单元格范围是否为变量有关的任何东西。

我希望用文本填充一列,但只能填充到最后填充的行(因为行数每天都在变化)。

关于如何解决这个问题的任何想法?

1 个答案:

答案 0 :(得分:0)

尝试一下,有关更多详细信息,请参见代码中的注释。

Sub fillRange()

Dim ws As Worksheet: Set ws = ActiveWorkbook.Sheets("Sheet Name") '<-- set your sheet name
Dim lRow As Long: lRow = ws.Cells(Rows.Count, 1).End(xlUp).Row 'get last row

Dim rngToFill As Range 'declare the range variable
Set rngToFill = ws.Range("A1:A" & lRow) 'set the range variable

rngToFill.Value = "new value test" 'fill the range

End Sub