エクセルファイル名を検索してアクティブにする

トップページ（目次）

105.エクセルファイル名を検索してアクティブにする

Sub エクセルファイル名を検索してアクティブにする()

    For Each ファイル名 In Workbooks
        If InStr(ファイル名.Name, "指定ファイル名") Then ファイル名.Activate
    Next

End Sub

指定ファイル名で開きたいエクセルファイル名を指定します。 For Each ファイル名 In Workbooks で、開かれているエクセルファイルを1個づつ全部チェックしていきます。