Excel VBA テクニック集 |
「マクロ専用シート」内のリストボックスに、フォルダー内のExcelファイルの一覧を作成します。
検索するフォルダーのパスは「マクロ専用シート」のセルで指定するので、セル指定におまじない「Excel_App」は必要ないです。
コード Dim File_W As String Excel_App.ActiveSheet.ListBox1.Clear File_W = Dir(ActiveSheet.Range("B2").Value & "\*.xlsx") Do Until File_W = "" ActiveSheet.ListBox1.AddItem File_W File_W = Dir Loop |
「こだわりハウス」写真館| 数学公式集| ピンポイントストリートビュー| FaceBook| Excel Vba テクニック集| Excel 計算式解析・他解析| 富山の建築家| Excel 計算式解析・他解析| 積分の定義・積分の記号の意味の研究| |