我對VBA很陌生,只有基本的知識水平。 我一直在嘗試創建一個宏,以便在同一工作簿中的多張其他工作表上交叉引用一張工作表上的數據。如果找到記錄,我希望msgbox出現以提醒用戶數據的位置。 後幾個小時搜索互聯網和碼位拼湊這是我 Sub search()
Dim ws As Worksheet, found As Range
Dim TextToFind(1 To 20) As String
D
你能幫我用宏嗎?我有一個3代碼,只顯示我的味精盒 - 特定的值。但不爲我工作。 :/我不知道爲什麼。一些錯誤,我想使所有的範圍和後顯示我msgbox值時履行。有人知道嗎? 現在我有,但告訴我錯誤見圖片 Public Sub found(worksheets)
Dim found As Boolean
Dim c As Range
found = False
For Each c In
我有一個FormClosing事件處理程序,在操作時顯示帶有兩個按鈕的消息框是或否 因此,如果用戶單擊是,那麼它使用For循環檢查值並找到無效價值它如何保持這種形式而不用打開新的一個保留所有的VALUES。 我該如何做到這一點。 簡化的代碼被如下所示: (類代碼駐留在EditDataForm.vb這是通過MainForm.vb柯樂的代碼中使用) ''' Closing Event that fir
有人可以解釋爲什麼我的代碼不會讓我將數據保存到Excel,除非包含MsgBox? 這裏是我的代碼: Sub createreport()
Try
Dim XA As New Excel.Application
Dim wb As Excel.Workbook
Dim ws As Excel.Worksheet
wb = XA.Wo
我的VBA腳本中有一個Yes/No MsgBox,它返回一個供用戶回答的問題。每當按下「是」或「否」按鈕時,除了運行其各自代碼的腳本之外,彈出另一個帶有數字「6」或「7」的MsgBox。如何禁用第二個MsgBox? 這裏是我的代碼: Dim question As Integer
question = MsgBox("Unfortunately, the Database has no sour
我想做一個宏。我的測試單元在另一張紙上。工作表 - (數據)宏檢查範圍("D2:D10")如果單元格包含值12,如果是顯示一個消息框"Go to add to system",並且此宏單元中的宏發現值將設置爲0. 我有此代碼,但它沒有'爲我工作我不知道爲什麼。你可以幫我嗎? Private Sub check(ByVal Target As Range)
For Each c In Worksh