![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
計算が終了したシートからデータをコピーして、それをメモ帳に貼り付けて作成しておいたフォルダの中に名前を付けて保存する方法が知りたいです。
とりあえずフォルダの作成まではできました。
Sub フォルダをつくる()
MkDir "c:\test"
End Sub
上記のフォルダ内に、データをメモ帳に貼り付けて保存していきたいです。
計算が終わったエクセルシートから
「B3:C43、E3:D43、H3:I43、…、KM3:KN43」までの
複数のデータを抽出し、それぞれをメモ帳に貼り付けていきたいので
For ~ Nextをつかってループさせる予定です。
上記のフォルダ内に複数個のテキスト形式のデータを名前を付けながら保存させるプログラムを教えていただきたいです。
No.2
- 回答日時:
あくまでも参考です
ブックは利用中の1個しか開いていないという仮定で
B3:C43、E3:D43…というように2列ずつ右に100列50組あると仮定してます。
Sub test()
Dim mFilename As String
Dim mColumn As Integer, NameCount As Integer
mColumn = 2
NameCount = 1
For mColumn = 2 To 102 Step 2
Range(Cells(3, mColumn), Cells(43, mColumn + 1)).Copy
Workbooks.Add
ActiveSheet.Paste
mFilename = "mybook" & NameCount & ".txt"
ActiveWorkbook.SaveAs Filename:= _
mFilename, FileFormat:=xlText, _
CreateBackup:=False
Workbooks(2).Close SaveChanges:=False
NameCount = NameCount + 1
Next i
End Sub
この回答への補足
プログラムを実行できました。
質問なのですが、このテキストデータはどこに保存されているのでしょうか?また、保存先のパスを入力すれば任意の場所に保存可能でしょうか?
よろしくお願いします。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) ExcelVBA メモ帳を起動し名前を付けて指定フォルダに保存 2 2022/04/18 13:15
- Excel(エクセル) 文字化け。メモ帳でUTF-8に変換後、エクセルへ貼り付けたいです。 3 2022/08/14 07:21
- Excel(エクセル) フォルダ内の全ブックのシート名を変更したい 7 2022/09/22 21:34
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Excel(エクセル) 【VBA】指定フォルダに格納中のテキストファイルをエクセルで処理し結果のエクセルを新規フォルダに保存 1 2022/03/25 14:19
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Excel(エクセル) 【マクロ】同じフォルダ内にある複数ブックから1つのブック内の1シートにデータを集めたい 6 2022/09/28 18:16
- Excel(エクセル) 【困っています】VBA 追加処理の記述を教えてください。 1 2022/08/25 22:54
- Visual Basic(VBA) VBAが止まります。 2 2022/09/02 14:02
- Visual Basic(VBA) コード名シートA列と集計シートA列のコードが一致したら、コード名シートA5からk12の範囲をコピーし 1 2022/08/29 23:46
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
ExcelVBA メモ帳を起動し名前を付けて指定フォルダに保存
Visual Basic(VBA)
-
VBAでメモ帳にコピペをしたいのですが…
PowerPoint(パワーポイント)
-
VBA でメモ帳へ保存する際の保存先フォルダの指定
Excel(エクセル)
-
-
4
ExcelVBA メモ帳を起動し名前を付けて指定フォルダに保存
Excel(エクセル)
-
5
マクロでメモ帳に貼り付け
Word(ワード)
-
6
エクセルVBA テキストに出力、名前を付けて保存
Excel(エクセル)
-
7
Excelからテキストへのコピーペースト
その他(Microsoft Office)
-
8
VBA メモ帳の上書き保存がしたい
Ruby
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Windows10でコマンドプロンプト...
-
VBA 最新のフォルダ取得
-
Excel VBA マクロ 選択したフォ...
-
Excelのハイパーリンクについて...
-
pythonでDepixを起動
-
Excel VBAでフォルダ作成及び一...
-
【マクロ】ファイル名の日付に...
-
Excelvbaでブックをコピー名前...
-
VBA:特定の文字を含むフォルダ...
-
同一フォルダ内の別ブックから...
-
ばねモデルのJAVAアプレット
-
Javaでフォルダ複数階層のZipフ...
-
30日前を残して過去の日付フォ...
-
デスクトップの画像をhtmlに表...
-
フォルダの削除
-
MinGWで正規表現(regex.h)がし...
-
Dreamweaverでイメージを挿入す...
-
【マクロ】フォルダにファイル...
-
ファイルのアクセス回数について
-
エクセルのプロパティーでセキ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Windows10でコマンドプロンプト...
-
VBA 最新のフォルダ取得
-
バッチファイルが保存されてい...
-
ファイル名と同名のフォルダを...
-
【マクロ】ファイル名の日付に...
-
VBA フォルダ名に特定の文字を...
-
デスクトップの画像をhtmlに表...
-
フォルダ内のPDFファイル名を変...
-
ディレクトリ名変更してコピー...
-
多量のファイルをフォルダに自...
-
Excelで指定したフォルダに保存...
-
Access VBA で フォルダ権限...
-
C ファイル出力で、フォルダが...
-
Excelのハイパーリンクについて...
-
あるフォルダーのファイルを違...
-
パス名に2バイト文字(マルチバ...
-
同一フォルダ内の別ブックから...
-
エクセルのマクロについて教え...
-
バッチファイルで指定フォルダ...
-
ExcelのVBAでフォルダ指定がで...
おすすめ情報