提问者:小点点

Excel VBA将变量传递到单引号中


我无法获取下面的代码来访问值I

   TimeFrame = Worksheets("Selector").Range("B1").Value 
   TimeFrame2 = CStr(TimeFrame)
    
    'HTMLDoc.querySelector("[name=AheadHour] option[value='8']").Selected = True   '<< this works!
    
    'HTMLDoc.querySelector("[name=AheadHour] option[value='Timeframe2']").Selected = True  '<< this does not work!

共1个答案

匿名用户

这起作用了-谢谢比本!

Set htmlDoc = ie.document
TimeFrame = Worksheets("Selector").Range("B1").Value
TimeFrame2 = CStr(TimeFrame)

htmlDoc.querySelector("[name=AheadHour] option[value='" & TimeFrame2 & "'").Selected = True