我正在编写一个 VBA 代码,该代码将在 Excel 中打开我的工作簿中的特定工作表,然后在 A 列中查找值为“TOTAL”的单元格。然后必须将其设置为 ActiveCell,以便我的宏的其余部分可以对包含此单元格的行执行操作。
我希望这样当用户运行宏时,会立即专门选择该单元格。运行宏后,该单元格的位置将发生变化,因此无论该值位于哪个单元格中,我都需要它工作。每次运行宏时,都会在包含“TOTAL”的行上方添加一个新行,因此包含“TOTAL”的行的位置这个单元格是不断变化的。
到目前为止,我只是通过论坛阅读才想到这一点。它仍然不起作用,但我对这种语言很陌生,无法确定错误在哪里。
Sub Macro2()
Dim C As Range
Worksheets("Project Total").Select
With Selection
C = .Find("TOTAL", After:=Range("A2"), MatchCase:=True)
End With
End Sub
最佳答案
试试这个:
Sub Macro2()
Dim cl As Range
With Worksheets("Project Total").Cells
Set cl = .Find("TOTAL", After:=.Range("A2"), LookIn:=xlValues)
If Not cl Is Nothing Then
cl.Select
End If
End With
End Sub
关于vba - 如何找到特定单元格并将其设为 ActiveCell,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/23832861/