Excel スプレッドシートからフォルダを作成する方法
Excel スプレッドシートは、複数のフォルダーを作成するタスクを自動化するのに役立ちます。フォルダーを生成する 1 つの方法は、データ範囲とバッチ コマンド "md" を使用してスクリプトを作成することです。もう 1 つの方法は、Microsoft Excel VBA のコンポーネントである MkDir 関数を介してマクロを使用することです。これにより柔軟性が得られ、時間もかかりません。これらの手法が機能するように、スプレッドシートには適切なフォルダー名のみを含めてください。フォルダ名には、引用符や、「、」、「/」、「:」、「*」、「?」、「<、」、「|」などの文字を含めないでください。
バッチ ファイルの使用
ステップ 1
フォルダ名を 1 列に並べます。列のヘッダーをクリックし、数式バーの横にある名前フィールドに「FOLDERNAMES」と入力します。
ステップ 2
列ヘッダーを右クリックして [挿入] を選択し、[FOLDERNAMES] 列の左側に空白の列を追加します。
ステップ 3
空白の列の最初のセルを強調表示します。次のテキストを数式バーに入力し、それを他の空白セルにコピーします。
="md "&FOLDERNAMES
ステップ 4
プレーン テキスト エディターを開き、空白のドキュメントを作成します。以下のコードをコピーして、ファイルの先頭に貼り付けます。 「C:\Temp」を、フォルダーを追加するディレクトリへの完全なパスに置き換えます。たとえば、「D」ドライブ内の「Songs」にフォルダを追加するには、パス「D:\Songs」を使用します。
@echo off cd "C:\Temp"
ステップ 5
Excel ブックに戻ります。 「md」式を含む列のヘッダーを右クリックし、「コピー」を選択します。テキスト エディターに戻り、ファイルの末尾に値を貼り付けます。ファイルは次のようになります:
@echo off cd "c:\Temp" md フォルダー名 1 md フォルダー名 2 ..
ステップ 6
ファイルを「CreateFolders.bat」としてデスクトップに保存します。デスクトップに移動し、アイコンをダブルクリックしてバッチ ファイルを実行します。フォルダを使用する準備が整いました。
マクロの使用
ステップ 1
Excel ブックを開きます。 「Alt」キーを押したまま「F8」を押して、マクロ ウィンドウを開きます。
ステップ 2
「マクロ名」に「MakeFolders」と入力し、「作成」ボタンをクリックします。これにより、VBA エディターが開きます。
ステップ 3
次のマクロをコピーしてエディタに貼り付けます:
サブ MakeFolders()
Dim Rng As Range Dim maxRows、maxCols、r、c As Integer
Rng を設定 =選択
maxRows =Rng.Rows.Count maxCols =Rng.Columns.Count
For c =1 To maxCols r =1 Do While r <=maxRows If Len(Dir(ActiveWorkbook.Path &"" &Rng(r, c), vbDirectory)) =0 Then MkDir (ActiveWorkbook.Path &"" &Rng (r, c)) エラー発生時 次の終了を再開する If r =r + 1 Loop Next c
終了サブ
ステップ 4
[ファイル] メニューを開き、[名前を付けて保存] を選択して、ファイルをマクロ有効ブックとして保存します。好みのファイル名を入力し、[ファイルの種類として保存] の横にある [Excel マクロ有効ブック] を選択します。 [保存] ボタンをクリックします。
ステップ 5
フォルダー名を含むセルを強調表示します。 「Alt」キーを押しながら「F8」を押して、マクロ ウィンドウを開きます。 「MakeFolders」をダブルクリックします。フォルダを使用する準備が整いました。
ヒント
マクロは、アクティブなブックと同じディレクトリにフォルダーを作成します。マクロが有効なワークブックを含むディレクトリにフォルダーを作成するには、コード内の「ActiveWorkbook」のすべてのインスタンスを「ThisWorkbook」に置き換えます。
警告
Microsoft Excel 2007 を使用している場合、既定では [マクロ] ウィンドウと [開発] タブにアクセスできない場合があります。これを有効にするには、Microsoft Office のオーブをクリックし、[Excel のオプション] を選択します。カテゴリーペインで「人気」をクリックし、「リボンに開発者タブを表示する」を選択します。 [OK] をクリックして変更を保存します。