VBA 開いているEXCELファイルを全て取得する
VBAで、開いているEXCELファイルを全て取得するコードを記述してます。
環境
- OS windows10 64bit
開いているEXCELファイルを全て取得
開いているEXCELファイルを全て取得するには、「Workbooks.Count」を使用します。
適当なボタンを用意して、開いているEXCELファイルのファイル名を取得して表示する
以下のソースコードを記述します。
Private Sub CommandButton1_Click()
Dim i As Long
For i = 1 To Workbooks.Count
Cells(i, 2).Value = Workbooks(i).Name
Next i
End Sub
実行してみます。
取得されていることが確認できます。
-
前の記事
kotlin mutableMapで指定したkeyを削除する 2022.07.05
-
次の記事
javascript オブジェクトの配列から指定したプロパティの総和を計算する 2022.07.06
コメントを書く