EA_IsSheetNM

機能説明
指定したワークブック内に指定のワークシートが存在するか確認します。

定義
Public Function EA_IsSheetNM (
ByRef ea_wb As Workbook,
ByVal ea_shnm As String
) As String

引数
ea_wb
対象のワークブックオブジェクトを指定します。
ea_shnm
調査対象となるワークシート名を指定します。

戻り値
存在する:("":空)が返却されます。
存在しない:("Sheet1,Sheet2")シート名が返却されます。

使用例
指定のワークブック内にワークシート("Sheet1,Sheet4")が存在するか確認します。
                                    
Sub Main()
    Dim ea_wb As Workbook
    Dim ea_str As String
    
    Set ea_wb = ThisWorkbook
    ea_str = EA_IsSheetNM(ea_wb, "Sheet1,Sheet4")
    MsgBox "結果:" & vbCrLf & ea_str
    Set ea_wb = Nothing

End Sub
                                    
                                
クラウドソーシング「ランサーズ」