无法获取VBAmacros中的标签值(名称)
我被困在这里 下面是我的vbamacros。 我想查找其他选项卡,但结果只给我
=VLOOKUP(BE2, $BQ$2:$BQ$6, 1, 0)
但不是标签名称。为什么? 我怎样才能得到床单名称?
Set myValues = Application.InputBox("Please select a:", Type:=8) Set myResults = Application.InputBox("Please select a next sheet:", Type:=8) On Error Resume Next Set myValues = myValues.Offset FirstRow = myValues.Row FinalRow = Cells(65536, myResults.Column).End(xlUp).Row Range("BF2").Formula = _ "=VLOOKUP(" & Cells(FirstRow, myValues.Column).Address(False, False) & ", " & _ " " & myResults.Address & " , 1, 0)"
你很近 您只需要将地址外部参数设置为True 。
就像是:
myResults.Address(External:=True)
.Address
属性只会返回行和列引用,除非将External
参数设置为True
。 见下文:
Range("BF2").Formula = _ "=VLOOKUP(" & Cells(FirstRow, myValues.Column).Address(False, False) & ", " & _ " " & myResults.Address(External:=True) & " , 1, 0)"
如果您不想在引用中使用工作簿名称,则可以使用Range
对象的.Worksheet.Name
属性构build引用。 见下文:
Range("BF2").Formula = _ "=VLOOKUP(" & Cells(FirstRow, myValues.Column).Address(False, False) & ", " & _ " " & myResults.Worksheet.Name & "!" & myResults.Address & " , 1, 0)"
有关更多信息,请参阅MSDN上的Range.Address属性 。