首页 > 教學 > excel vba > Excel VBA判斷工作表是否存在的函數
2011
12-23

Excel VBA判斷工作表是否存在的函數

Function checkSheetName(sheetname)
        '檢查活頁是否存在
        isfind = False
        For Each st In Sheets
            If st.Name = sheetname Then
               isfind = True
               Exit For
            End If
        Next
        checkSheetName = isfind
End Function

1.函數checkSheetName程式碼

   If checkSheetName(sheetname) = False Then
       MsgBox "工作表:" & sheetname & "不存在,請查看是否有拼錯字"
       Exit Sub
   End If

2.使用方法

同步發表於:Excel VBA判斷工作表是否存在的函數
最后编辑:
作者:明和 蔡
这个作者貌似有点懒,什么都没有留下。

留下一个回复

你的email不会被公开。