Excel VBA – 粘贴到查找命令
我正在尝试创build一个macros来search已经从另一个单元格中input/select的文本string。 当我录制macros时，它将find函数的“What”部分设置为录制macros时复制的特定文本，而不是Paste Selection ，这正是我想要的。
Sub GOTOSECTION() ' ' GOTOSECTION Macro ' ' Range("B7").Select Selection.Copy Cells.Find(What:="Section 4A", After:= _ ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, _ SearchDirection:=xlNext, MatchCase:=False, SearchFormat:=False).Activate Cells.FindNext(After:=ActiveCell).Activate End Sub
但是我想把“什么：”作为从单元格B7复制的值。 当我尝试input一个粘贴命令在那里，它给了我一个语法错误，所以我敢肯定，这是一个非常基本的东西我错过了（我很绿，当涉及到VBA，我一直无法find我在网上寻找的例子）。 感谢您的任何意见！
将What:="Section 4A"replace为What:=ActiveCell.Value
这将获得当前所选单元格的当前值（尽pipe如果单元格是空白的，它可能会（虽然我不是100％肯定没有检查）导致一些错误，所以考虑错误检查）。
编辑：如果您将来继续使用macros录制，则可能需要查看相关参考。 我从来没有用过这样的东西，所以我不确定它是否会有效果，但可以，所以检查出来。