我正在尝试从工作表中获取某些信息并将其复制到另一个工作表,而我的工作表有长名称(由于某种原因无法更改它们)
我不断提出消息“编译错误:预期列表分隔符或)”和 除非我错了,否则我很确定它与表格名称有关吗?
代码:
Sub SALEXAMPLE()
Dim names As String
names = "Justin Jones"
Sal = Application.WorksheetFunction.VLookup(names, **salary sheets**.Range("A1:C10"), 2, False)
MsgBox "Salary is : $ " & Sal
End Sub
答案 0 :(得分:1)
您必须使用Sheets
来引用所需的工作表:
ThisWorkbook.Sheets("salary sheets").Range(...
Sub SALEXAMPLE()
Dim names As String
names = "Justin Jones"
Sal = Application.WorksheetFunction.VLookup(names, ThisWorkbook.Sheets("salary sheets").Range("A1:C10"), 2, False)
MsgBox "Salary is : $ " & Sal
End Sub