我有一个很大的 Excel 文件,我需要完全替换 12 列中的所有值。
现在,每个单元格中都有一个公式,我需要用我自己的公式替换那个公式。
我如何遍历所有这些列,知道它从哪一行开始但不知道结束行(文件不断更新)。 “A600000”的破解似乎有点矫枉过正。
我是 VBA 新手,非常感谢一些指导。
最佳答案
ActiveSheet.UsedRange
是当前工作表上所有已使用单元格的范围。
您可以使用 ActiveSheet.UsedRange.Rows.Count
和 .Columns.Count
得到这个范围的高度和宽度。
这是一个非常粗略的函数,它会命中范围内的每个单元格:
Sub test()
Dim thisRange As Range
Set thisRange = ActiveSheet.UsedRange
With thisRange
For y = 1 To .Rows.Count
For x = 1 To .Columns.Count
thisRange.Cells(y, x).Value = "Formula here"
Next x
Next
End With
End Sub
但是你想要的可能不一样,你能说的更具体点吗?
关于VBA 列循环,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/17933374/