excel中使用vba來檢測工作薄中的工作表名稱
工具/原料
excel2013
更多經驗請關注,如果幫到了你,請在上方給個投票謝謝支援。 好人一生平安。
先頂後看年薪百萬,如果幫到了你,幫忙給個好評,這對小編很重要,萬分感謝。
方法/步驟
首先我們開啟一個工作樣表作為例子。
我們可以看到,在這個工作薄內含有多個工作表。每個工作表都可以設定獨特的標籤,那麼當我們用標籤來區分工作表而形成一種規範時,那麼快速在工作表內獲取檢測自己想要的標籤就需要我們的一點技巧了。
我們使用alt+f11組合快捷鍵進入vbe編輯器,插入一個新的模組,並在模組中輸入以下程式碼:
Sub testSheetExists()
MsgBox "測試工作簿中是否存在指定名稱的工作表"
Dim b As Boolean
b = SheetExists(" <指定的工作表名> ")
If b = True Then
MsgBox "該工作表存在於工作簿中"
Else
MsgBox "工作簿中沒有這個工作表."
End If
End Sub
這裡我們可以看到sheetexists是我們寫的一個方法,方法的作用是返回一個布林值,如果在工作表內有設定好的工作表名,則返回一個值為true的布林值。
接下來寫一個if判斷語句,如果布林值為真,那麼則彈出提示框提示使用者該工作表存在於本工作薄中,反之則沒有這個工作表。
在sheetexits方法中,我們使用了手動輸入工作表名稱並激活的方式,如果存在該工作表則執行正常,不會出現錯誤。反之則會報錯。這個邏輯大家可以多習慣一下。
注意事項
謝謝你的投票。