Excel宏插入行的行号在#39;我正在进行中?

时间:2014-05-14 08:00:26

标签: excel vba

目前我有这段代码:

 Private Sub Command1_Click()
 Dim RetVal
 Fil = Range("B1")
 RetVal = Shell("C:\Program Files (x86)\Adobe\Reader 10.0\Reader\acrord32.exe" & " " & Fil, 1)
 End Sub

如果我有一个位于文件夹中的文件,请说c:\ temp \ mappe.pdf,此路径插入" B1"在我的excel文件中。上述常规代码将打开该pdf文档。

现在我的问题是O有78987行,其中O需要打开我所代表的特定行中B列的位置。

1 个答案:

答案 0 :(得分:1)

尝试ActiveCell,这是当前选择的内置Range对象。您的代码重写为

 Private Sub Command1_Click()
 Dim RetVal
 RetVal = Shell("C:\Program Files (x86)\Adobe\Reader 10.0\Reader\acrord32.exe" & " " & ActiveCell, 1)
 End Sub