このマクロなんですが、Sent_88310.emlを1列で表示したいのですが、ここにあるように
myFields = Split(inRec, ",") カンマで区切られて、2列になってしまいます1列にしたく、
いろいろ、やってみますが、構文エラーになったり、うまく動きません。
どんなふうに、修正したらいいのでしょうか?
---------------------
Public Sub ReadCSV()
'CSVファイルの読み込み
Dim n As Long
Dim myFields As Variant
Dim inRec As String
Dim r As Long
Dim c As Long
n = FreeFile
Open ThisWorkbook.Path & "\Sent_88310.eml" For Input As #n
r = 1
Do While Not EOF(n)
Line Input #n, inRec
myFields = Split(inRec, ",")
For c = 0 To UBound(myFields)
Cells(r, c + 1).Value = myFields(c)
Next c
r = r + 1
Loop
Close #n
End Sub
---------------------------
No.1ベストアンサー
- 回答日時:
こんばんは
>カンマで区切られて、2列になってしまいます1列にしたく、~
そのまま1セルに入れたいってことでしょうか?
それなら、カンマで分割しなければよいだけでは?
Do While Not EOF(n)
Line Input #n, inRec
'myFields = Split(inRec, ",")
'For c = 0 To UBound(myFields)
'Cells(r, c + 1).Value = myFields(c)
'Next c
Cells(r, 1).Value = inRec
r = r + 1
Loop
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
- Visual Basic(VBA) ExcelVBAに関する質問 3 2023/02/17 10:47
- Visual Basic(VBA) VBA 別ブックからの転記の高速化について VBA 別ブックからの転記の高速化についてご教授下さい。 19 2022/07/26 13:07
- Excel(エクセル) VBAの指示の内容 昨日こちらでご教示頂いたのですが初心者な為、一つ一つの指示が何をやっているのかわ 2 2022/10/25 18:08
- Visual Basic(VBA) VBA処理追加 こちらでご教示頂いたのですが回答完了させてしまいましたのでこちらからまた質問させてく 2 2022/10/27 09:57
- Visual Basic(VBA) Excelで下記のようにマクロを作ったところ、一回目は実行できたのですが、二回目以降「実行時エラー1 1 2022/03/25 08:08
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Excel(エクセル) マクロでテキストファイルを読み込んだ際の最終セルにデータと改行が含まれる問題の改善方法 2 2022/03/25 16:50
- Visual Basic(VBA) VBA 毎日取得するデータを反映させる方法 の応用 2 2023/09/05 16:32
このQ&Aを見た人はこんなQ&Aも見ています
-
新NISA制度は今までと何が変わる?非課税枠の拡大や投資対象の変更などを解説!
少額から投資を行う人のための非課税制度であるNISAが、2024年に改正される。おすすめの銘柄や投資額の目安について教えてもらった。
-
Outlookの「受信日時」「件名」「本文」などをVBAを使ってExcelに転記したい
Visual Basic(VBA)
-
エクセルファイルのデータ転記について
Visual Basic(VBA)
-
VBA
Visual Basic(VBA)
-
-
4
VBAコードについて
Visual Basic(VBA)
-
5
マクロVBAについてご教授いただけましたらと存じます。
Visual Basic(VBA)
-
6
ユーザーフォームに別シートからデータを反映させたい。
Visual Basic(VBA)
-
7
VBA コード
Visual Basic(VBA)
-
8
excelのVBAについて、以下のコードに追加をお願いいたします。
Visual Basic(VBA)
-
9
VBAコードが作動しません。修正したいのですが何処に原因かあるか教えて下さい。
Visual Basic(VBA)
-
10
Cellsのコードが打てません
Visual Basic(VBA)
-
11
VBA実行後に元のセルに戻りたい
Visual Basic(VBA)
-
12
引数に数値、文字列の混在
Visual Basic(VBA)
-
13
VBAで特定のシート以外のシート名を変更したい
Visual Basic(VBA)
-
14
【マクロ】プルダウンが設定してあるセルにコピペできますか?
Visual Basic(VBA)
-
15
VBA ファイル名取得
Visual Basic(VBA)
-
16
VBA 別ブックからコピペしたいのですが、軽くしたいです
Visual Basic(VBA)
-
17
VBAのコードを教えてください
Visual Basic(VBA)
-
18
エクセルVBAの配列について
Visual Basic(VBA)
-
19
以下のコードを実行しても、オブジェクト変数または、withブロック変数が設定されていませんとエラーが
Visual Basic(VBA)
-
20
for 文の 繰り返し処理に使えるのかどうかについて
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【ExcelVBA】値を変更しながら...
-
VBAで大量のファイルをシート名...
-
VBA 何かしら文字が入っていたら
-
【マクロ】1つのマクロの中に...
-
VBA 別ブックからコピペしたい...
-
VBAを使用した時間管理
-
Excelのマクロでワードのテキス...
-
【PowerPoint VBA】緑色の文字...
-
ExcelのVBAコードについて教え...
-
2つのマクロでチェックボックス...
-
VB.net(VB)で、フォームにExcel...
-
FileCopy時のエラー
-
VBA ユーザーフォーム ボタンク...
-
エクセルについて
-
Vba SelStart、SelLen教えてく...
-
VBAで各列の"+"と"o"の合計数を...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
エクセルのマクロについて教え...
-
Excel VBA 定義されたプロージ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
MATLAB(マトラボ)とcsvファ...
-
matlabで、平均値を求める方法...
-
VBScripの2次元動的配列
-
VBA エクセルで1列で表示したい。
-
いつどこゲームのようなテキス...
-
文字型変数を使って2進数表示す...
-
複数のCSVを一度にダウンロード
-
VB6.0でMSChartをタイマーを使...
-
ポインター引数の関数でコンパ...
-
10Mバイトて文字数に すると何...
-
UTF-8で5~6バイトになる文字コ...
-
Excel VBA メール作成について ...
-
char str[256]の256の意味は?
-
エクセルシート名の制限を変更...
-
stable diffusionのエラー
-
COBOLのCOMP形式について
-
Excel 1セル当りの文字数が2...
-
DataGridViewの特定列に入力さ...
-
バイナリとBCDコード
-
バイト列とバイナリ列の違いが...
おすすめ情報