我有一些问题得到这个代码来设置工作表我可以想象它,因为我不dim它,但我已经尝试与dim as workbook不起作用。 我试着走一步一步,“thf”有正确的字符串在里面。 Sub CreateSheet()
Set tsheet = ThisWorkbook.Sheets("For Save")
Dim th As String
Dim thf As String
我有一个宏代码,但它运行在特定的列上,范围仅为500。我希望它应该动态选择标题栏'PRODUCTS'存在。如果可能的话,我们可以增加“产品”栏中所有数据的限制500。 Sub Pats()
myCheck = MsgBox("Do you have Patent Numbers in Column - B ?", vbYesNo)
If myCheck = vbNo Then Exi
我需要您的帮助:-) 我需要检查HTML代码中是否存在具有“提交”ID的标记。 我这样做: If Not oie.Document.getelementbyid("submit") Is Nothing Then
MsgBox oie.Document.getelementbyid("submit")
Else: MsgBox "not found"
End If
但是这样的检查将正常工
我不知道如何用这种语言编程,所以我不得不依赖Google。从这里到那边拿点东西,我怀疑我有两个目前不适合的谜题。我越来越runtime error 9 subscript out of range因为这行: ThisWorkbook.Sheets("Sheet4").Range("c2").End(xlDown).Select = myVar
这里是我的代码: Dim iRow As Long