VBAブック制御

３．ブック・シートの制御 ３ー１ブックをチェックしオープン又はアクティブ化 Const fil2 As String = "b:\VBA雑\小文字.xls" Const fil2a As String = "小文字.xls" Sub 例31() fila = 0 For Each file_name In Windows If file_name.Caption = fil2a Then Windows(fil2a).Activate fila = 1 End If Next If fila = 0 Then Workbooks.Open Filename:=fil2 End If End Sub ・このプログラムでは定数を使用しファイル名を入れているが、システムに合わせ変更する。 ・Ｆｏｒｅ ＥａｃｈでＥｘｃｅｌでオープンされているウインドウを調べ

[leona-kono]

ファイル操作（ファイル名変更)

[teren]

複数ブックからシート名で検索、ThisWorkbookでマクロの入っているブックを指定

[exlair]

簡単なチェックなど基本作業