![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?c9bd177)
ブックを保存するときに、データ内容により保存するフォルダを分ける方法を教えてください。
番号 名前 区分 科目 ・・・・
101 あおた A 算数 ・・・・
104 きだ B 算数 ・・・・
という一覧表から、1行ずつブックを作成して、区分ごとのフォルダに保存したいときは、どのようにすればいいのでしょうか。
Select Case Range("A", SpecRowPos)
※SpecRowPosは1行づつループさせる変数です
Case Is = "A"
ActiveWorkbook.SaveAs "Z:\EDMICS部品表\標準機器課\NDZ部品表\コード化部品表\機械\"A" & "\" & NewfName
※NewfName = Range("L37")。NewfNameは保存するファイル名の変数です
End Select
としてみましたが、反応はありませんでした。
どうぞご指導をお願いします
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
Select Case の使い方が間違っています。
Case "A" でいいです。
またRangeの指定の仕方も間違っています。
Range("A" & SpecRowPos).Value でA列SpecRowPos行の値を取得
ただ、この場合Select Case は使用する必要はないのでは。
n-junさんの操作をマクロの記録でVBAにしてみてからループを考えるのがよいと思います。
No.1
- 回答日時:
よくはわかりませんが。
区分毎にブックを分けるなら、
・新規Bookの作成
・新規Bookに該当行をコピペ
・新規Bookを任意の名前(区分名?)で保存し閉じる
を繰り返すでしょうか。
区分が複数あるなら2行目は、
・既存ブックで区分毎にデータ抽出し、新規Bookに抽出行をコピペ
かな。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Excel(エクセル) エクセルのマクロについて教えてください。 2 2023/02/21 13:29
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/20 10:00
- Visual Basic(VBA) エクセルのマクロについて教えてください。 4 2023/07/03 09:11
- Visual Basic(VBA) エクセルのマクロについて教えてください。 1 2023/02/21 11:19
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/21 09:28
- Visual Basic(VBA) エクセルのマクロについて教えてください。 7 2023/07/04 09:18
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/20 16:59
関連するカテゴリからQ&Aを探す
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA シートをコピーする際に Co...
-
エクセルVBAが途中で止まります
-
VBA 別ブックからコピペしたい...
-
別ブックをダイアログボックス...
-
【VBA】全シートの計算式を全て...
-
VBAで別ブックのシートを指定し...
-
VBA コードを実行すると画面が...
-
VBS Bookを閉じるコード
-
vbaでvbaProjectのパスワード解...
-
(マクロ)データをAブックからB...
-
【Excel VBA】表の列の値毎に分...
-
フォルダ内の全てのファイルに...
-
VBAで別のブックにシートをコピ...
-
VBA シート名が一致した場合の...
-
ワイルドカード「*」を使うとう...
-
ACCESSVBA からExcelの他ブック...
-
【ExcelVBA】zip圧縮されたCSV...
-
EXCELのブック名を引数(変数)...
-
日付ごとの集計マクロ
-
Excelブックがアクティブになっ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA シートをコピーする際に Co...
-
エクセルVBAが途中で止まります
-
ワイルドカード「*」を使うとう...
-
別ブックをダイアログボックス...
-
(マクロ)データをAブックからB...
-
VBS Bookを閉じるコード
-
VBA 別ブックからコピペしたい...
-
VBA 複数のエクセルから一つの...
-
VBA シート名が一致した場合の...
-
【ExcelVBA】インデックスが有...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
vbaでvbaProjectのパスワード解...
-
VBAで別ブックのシートを指定し...
-
【ExcelVBA】zip圧縮されたCSV...
-
VBA コードを実行すると画面が...
-
【VBA】全シートの計算式を全て...
-
複数のエクセルブックをひとつ...
-
VBA 実行時エラー 2147024893
-
ExcelのVBAです。フォルダ内の...
おすすめ情報