我有一些問題得到這個代碼來設置工作表我可以想象它,因爲我不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