• 締切済み

エクセルファイル名の変更について

フォルダ内のエクセルファイル名を変更したいのですが無数にある為、一括処理したいのですが...変更規則は以下の通りです フォルダA:エクセルファイル1~100があります エクセルファイル1を開くと下記のようなデータがあります  A           B           C           D 1ファイルNo:1  社名 ○×商事  担当 鈴○ 様  処理日付xxxx/xx/xx 2           社コード:○○○ セルB1にある○×商事とB2の社コードの○○○を取り出してファイル名を下記のように全てしたいのですがご教授願えますでしょうか? ファイル1.xls → ○×商事 ○○○.xls この作業をフォルダ内にある全てのエクセルファイルに実行したいのです。説明が下手で申し訳ありませんがヨロシクお願いします。

  • ches
  • お礼率50% (8/16)

みんなの回答

  • toshi_2000
  • ベストアンサー率30% (306/1002)
回答No.1

マクロを使用すれば可能です。

ches
質問者

お礼

返事が遅くなりすみませんでした。アクセスにて実行できました。 ありがとうございました。

関連するQ&A

  • エクセルでのファイル名の一括変更 マクロ

    皆様お世話になります。 あるフォルダーの下位にユニークに名前の付けられた900個ほどのフォルダーがあり それれぞれの、フォルダーの中にA,Bというフォルダーがあります。 その中にa.xls,b.xlsなどというファイルが存在しています。 そのa.xlsやb,xlsの名称を変換したいのですが数量が非常に多いためマクロか、何かで変更する方法がありますか? ファイル名の条件として 開いたエクセルのC,4とH,4を合体させたファイル名にすると、非常にありがたいのですが。 よろしくお願いします。

  • ファイル名を変更するマクロ

    あるフォルダ内にエクセルファイルが複数あります。 そのエクセルファイルの名前の一部を一括で変更する エクセルマクロを教えて下さい。 下記のように「課題」の部分を「完了」に変更したい。 例: 変更前 1201課題.xls 1202課題.xls 1203課題.xls 1204課題.xls 変更後 1201完了.xls 1202完了.xls 1203完了.xls 1204完了.xls 説明不足かもしれませんが、宜しく御願い致します。

  • エクセルでファイル名を変更したい

    フォルダ"果物"に次のファイルがあります。 りんご.xls バナナ.xls みかん.doc なし.xls START.xls START.xlsを開きセルA1に"自分の"と入力して、各ファイル名を次のように変更したいのですが、宜しくお願いします。 自分のりんご.xls 自分のバナナ.xls 自分のみかん.doc 自分のなし.xls

  • VBAでファイル名を変更したい

    EXCEL2003のVBAでブックを連続して保存をするものを作成したのですが、スキルが足りないため、ファイル名が数字になってしまい、リネームをしたいのですが、出だしからつまずいております。 リネームをしたいブック(ファイル)は一つのフォルダに入っており、 excelのシートには旧ファイル名と新ファイル名の一覧をつくり VBAを実行すると一覧に載っているブック名が変更される というものを作りたいのですが、可能でしょうか。 一覧は 旧ファイル名  新ファイル名 1.xls      1北海道.xls 2.xls      2青森.xls という感じです。 フリーのリネームソフトではなく何とか自力でやりたいと思っております。 お力をお貸しください。 よろしくお願いいたします。

  • excelで最初に開いたファイル名称を覚えておく様な処理は可能ですか?

    excelで最初に開いたファイル名称を覚えておく様な処理は可能ですか? 1.最初の処理 (1)A.xlsのファイルを開く (2)マクロ:2010.xlsのファイルを開く (3)マクロ:チェックのシートをA.xlsの明細のシートの前に追加 (4)マクロ:チェックのシート名称をコピーした日付と時間のシート名に変更 (5)マクロ:2010.xlsのファイルをディスクトップ上から削除 2.後から追加する処理 (6)B.xlsのファイルを開く (B.xlsは、A.xlsとは異なるフォルダを作成し、A.xlsの特定のセルの中身の名称でファイル名保存されます。名前が異なるだけでマクロの中身はA.xlsと同じ) (7)マクロ:2010.xlsのファイルを開く (8)マクロ:チェックのシートをB.xlsの明細のシートの前に追加 (9)マクロ:チェックのシート名称をコピーした日付と時間のシート名に変更 (10)マクロ:2010.xlsのファイルをディスクトップ上から削除 上記を対応する為に下記の様なマクロ((6)(7)の部分を抜粋)を設定しています。 '2010.xlsのファイルを開く(2010.xlsのファイルは適宜、ディスクトップにコピーされます) Workbooks.Open FileName:="C:\Documents and Settings\ID\デスクトップ\2010.xls" 'チェックのシートを現在のブックの明細の前にコピーする。 Windows("2010.xls").Activate Sheets("チェック").Copy before:=Workbooks(1).Sheets("明細") 単独でA.xlsやB.xlsのファイルが開かれている場合には、 上記の対応で問題ないのですが、A.xls、B.xls以外のexcelファイルが開かれていると、 実行時エラーが出てしまいます。 Workbooks(1)の部分で最初に開いたexcelのファイル名称を指定しているのが 影響しているのはわかるのですが、ここの処理をなんとかしたいというおもいです。 つまり、複数のexcelファイルが開かれていて、A.xlsやB.xlsのファイルを後から開いても エラーがでない様にするには、どの様な処理にしたらよいのか教えて頂きたく。 マクロを実行したexcelのファイル名を覚えておいて、その名前が(1)に置き換わる 様な処理が望まれる処理です。

  • エクセル マクロで特定ファイル名だけを開く

    エクセルのマクロで 特定のファイル名だけをフォルダの中から探して 開くというものを作りたいのですが うまくできません。 フォルダを指定して 「060927.xls」というエクセルファイルだけを 開きたいのですが この日付のところが毎日変わるので 「06XXXX.xls」というような 最初が06であと4つの文字が入ってるファイル名だけを 流動的に指定できるようにするには どのようなVBAマクロにすればよいのでしょうか? とても困っています。 是非教えてください!宜しくお願いします。

  • エクセル2003マクロ

    特定のフォルダに同じサンプルNoのファイルがA~Dまで4種類ずつあり、これらから必要なデータを抽出し、同一Noに対して一つの集計ファイルを作成するマクロを作りたいと思っています。 ユーザーフォームで1台ずつサンプルNoを入力すれば、抽出→集計まで処理できるコードはできたのですが、サンプルNoを指定せずにコマンドボタン1発でフォルダ内のサンプル全てを同様に処理できる方法が分かりません。色々なサイトを覘きましたが、妥当な例がなく困っています。 ファイル名はそれぞれ、 A-1.xls、B-1.xls、C-1.xls、D-1.xls、A-2.xls、B-2.xls・・・という規則でついていて、全て同じフォルダに保存されています。 どなたか良い知恵をお貸し下さい。

  • フォルダ内で自由に選択した *.xlsのファイル名を即変更するには?

    フォルダ内で自由に選択した *.xlsのファイル名を即変更するには? Windows XP Home Edition SP3 Office XP Personal 2002 Excel 2002 フォルダの場所は、 C:\Documents and Settings\Owner\デスクトップ\E\10 です。 画像左のように、●1 は 「 061007.xls(06年10月07日) 」 を 当フォルダ内で手作業でコピーしてファイル名を 「 E123.xls 」 に変更し作業を終えました。 そして、不要になった 「 E123.xls 」 を当フォルダ内から削除します。 次に、同様に、 画像右の●2は、「061008.xls」を 当フォルダ内で手作業でコピーしてファイル名を 「 E123.xls 」 に変更し作業を終えました。 そして、不要になった 「 E123.xls 」 を当フォルダ内から削除します。 次に、同様に、 「 061014.xls 」 ・・・ の繰り返しですが、今まではもちろん手作業で行っておりましたが、非常に多数のファイルがあるので大変でございます。 【質問のまとめでございます】 画像左 のように、 作業を終え、不要になった 「 E123.xls 」 を削除して、 「 ポインタで自由に選択した ●1 」のファイル名を、即 「 E123.xls 」 に変更するマクロがあればと思っております。 画像の例は、「 061007.xls(06年10月07日) 」ですが、「 100529.xls(10年05月29日) 」の場合などいろいろあります。 何卒、ご教示のほどをお願い致します。

  • ファイル名の一括変更について

    たとえば、下記のようなファイル名に「#」を含んだ 名前のファイルが複数あります。 これをある条件によって、一括で変更したいのです。 条件としては、下記のように「#」の一文字だけを 「@」に変えたいのです。(※実際には半角) Aaa1#3.xls Aaa2#3.xls Aaa3#3.xls Bbb1#3.xls Bbb2#3.xls Bbb3#3.xls   ↓ Aaa1@3.xls Aaa2@3.xls Aaa3@3.xls Bbb1@3.xls Bbb2@3.xls Bbb3@3.xls 実際には、数千ファイルあるので、手作業で全部変更 するのは大変です。 これを便利に行なえるツール(できればフリーが良い) があれば、非常に助かります。 ご存知の方がおりましたら、教えて下さい。 宜しくお願いします。

  • ネットワーク上EXCELファイルとローカルEXCEL

    ちょっと困っていますのでどなたか助けていただけないでしょうか。 (何がしたいか) ローカルPCのデスクトップにExcelファイル(A.xls)があります。 ネットワーク上にはEXCELファイル(\\Net\DB\B.xls)があります。 A.xlsのSheet1のA1のセルに12345(企業コード)を入力し検索ボタンを 押すと、B.xlsのファイルをOpenせずにb.xlsの中のA列に保存されている 企業コードデータを検索し、見つかったセルの一つとなりのセルにセット されている売上データ(10000)をA.xlsのB1のセルへ戻す。 こんな処理は可能でしょうか。 (背景) ネットワーク上のb.xlsはDB的に使用します。データ量が多いため EXCEL関数ではどうしても重くなってしまいます。 なんとか、なんとか効率を上げたいので、どうぞお助けください!