我有一些問題得到這個代碼來設置工作表我可以想象它，因爲我不dim它，但我已經嘗試與dim as workbook不起作用。 我試着走一步一步，「thf」有正確的字符串在裏面。 Sub CreateSheet()
Set tsheet = ThisWorkbook.Sheets("For Save")
Dim th As String
Dim thf As String
自12月份以來一直致力於工業解決方案。將其縮小到每日4個變量。 Columns of variables A B C D
Day 1 Results 2 3 2 2
Day 2 Results 2 3 2 3
使用和功能，我日復一日的改變合併成一個單一號碼23222323 我當時有各種可能結果表 查找表的可能結果升序（表示爲整數） 22122212 Fail
2322232
我有一個宏代碼，但它運行在特定的列上，範圍僅爲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
但是這樣的檢查將正常工
此代碼是用Excel2010 VBA內部組件和查詢，PostgreSQL表 我在VBA下面的代碼創建，我想在我的SQL查詢中使用一個變量，但我不能讓使用IN子句接受VBA變量的SQL查詢 此代碼創建我想要使用的變量並且正常工作。這使我可以選擇特定的細胞，我需要查詢SelectedID = 6,7,8,6452 我現在想要將它添加到使用IN子句我的查詢，但它的 Dim StaffID As Rang
我不知道如何用這種語言編程，所以我不得不依賴Google。從這裏到那邊拿點東西，我懷疑我有兩個目前不適合的謎題。我越來越runtime error 9 subscript out of range因爲這行： ThisWorkbook.Sheets("Sheet4").Range("c2").End(xlDown).Select = myVar
這裏是我的代碼： Dim iRow As Long