早上好, 我試圖找到一種方式來存儲值的數組:通過一列 迴路(B柱) 取值,商店他們在一個數組 遍歷數組,並做一些文字處理 但是,我不能想辦法來循環THROU gh列並將這些值存儲在一個數組中。我已經通過堆棧溢出和谷歌,但還沒有找到一個成功的解決方案(還)。 提前,謝謝你的幫助。 Sub collectNums()
Dim eNumStorage() As String ' initial st
我有一段簡短的代碼,在我發送電子郵件時運行。它會查看收件人地址和主題以查看它是否包含某些單詞,然後彈出消息框提醒我們更新繪圖版本控制。它適用於內部電子郵件地址,似乎在某些外部電子郵件地址上工作,但出於某種原因,它不喜歡我實際需要它留意的電子郵件地址。 Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
我想在Word文檔中找到ole對象,而且它似乎在InlineShapes(1).GroupItems。但不能訪問組項目,因爲它給我錯誤。 Sub findOle()
Dim shp As GroupShapes
Dim c As Integer
Set shp = ActiveDocument.InlineShapes(1).GroupItems
End Sub
我試圖通過VBA代碼將所有垃圾郵件移動到我的收件箱。不幸的是我得到這一行的「424對象所需」的錯誤: Item.Move (olFLD)
代碼工作時,我嘗試從收件箱郵件移動到另一個文件夾,但是當我嘗試移動它不工作周圍的其他方法從垃圾郵件到收件箱。 Dim OlNS As Outlook.NameSpace
Dim olFLD As Outlook.Folder
Dim olJunk As
我已經寫在VBA刮刀解析從洪流站點的某些影片信息退出瀏覽器。我用IE和queryselector完成任務。當我執行我的代碼時,它會解析一切,並彈出一個錯誤。看起來這個錯誤似乎是無處不在,而不是繼續。如果我取消錯誤框,那麼我可以看到結果。我已經上傳了兩張圖片,向您展示我遇到的錯誤。我如何成功執行代碼而不會出現任何錯誤?提前致謝。 下面是完整的代碼: Sub Torrent_Data()
D