在VLookup函数(VBA)中使用空格命名工作表

时间:2017-03-08 10:38:31

标签: excel excel-vba vba

我正在尝试从工作表中获取某些信息并将其复制到另一个工作表,而我的工作表有长名称(由于某种原因无法更改它们)

我不断提出消息“编译错误:预期列表分隔符或)”和 除非我错了,否则我很确定它与表格名称有关吗?

代码:

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

1 个答案:

答案 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