No.1ベストアンサー
- 回答日時:
簡単なサンプルです。
参考にして,目的に合わせて自力で修正してご利用ください。判らない,知らない命令は,逐一VBEのコード上でF1キーを押してリファレンスを熟読してください。
Sub macro1()
Dim i
With Application.FileSearch
.NewSearch
.Filename = "*.csv"
.LookIn = "C:\test"
.SearchSubFolders = True
.FileType = msoFileTypeAllFiles
.Execute
For i = 1 To .FoundFiles.Count
Workbooks.Open Filename:=.FoundFiles(i)
With ActiveWorkbook.Worksheets(1).ChartObjects.Add(100, 100, 300, 300).Chart
.ChartType = xlLine
.SetSourceData Source:=ActiveSheet.UsedRange, PlotBy:=xlColumns
End With
ActiveWorkbook.SaveAs Filename:=Application.Substitute(.FoundFiles(i), ".csv", ".xls"), FileFormat:=xlNormal
ActiveWorkbook.Close False
Next i
End With
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・ハマっている「お菓子」を教えて!
- ・最近、いつ泣きましたか?
- ・夏が終わったと感じる瞬間って、どんな時?
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・都道府県穴埋めゲーム
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
ファイルのアクセス回数について
-
エクセルのプロパティーでセキ...
-
ExcelブックをGoogleスプレッド...
-
Wordで差込印刷した後に別々の...
-
Excel csv保存 列数が異なる場...
-
マクロ実行後、表示がおかしくなる
-
サブフォルダから部分一致のエ...
-
EXCEL 検索時の設定
-
PowerPoint 2002でファイル名を...
-
エクセルファイル名に更新日時...
-
For~Nextルーチンで最初の1回...
-
エクセルvbaでdocuworksprinter...
-
カンマ区切りのCSVファイルから...
-
Dreamweaverでイメージを挿入す...
-
Windows10でコマンドプロンプト...
-
outlook開けない
-
frxファイルの役目
-
エクセルVBAで一つ上の階層...
-
エクセルで複数のコメントのサ...
-
ExeclVBAユーザーフォームから...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ファイルのアクセス回数について
-
エクセルのプロパティーでセキ...
-
ExcelブックをGoogleスプレッド...
-
Wordで差込印刷した後に別々の...
-
エクセル UserForm 呼び出しで...
-
エクセルファイル名に更新日時...
-
サブフォルダから部分一致のエ...
-
Excel csv保存 列数が異なる場...
-
マクロ実行後、表示がおかしくなる
-
EXCEL 検索時の設定
-
PowerPoint 2002でファイル名を...
-
Xlms とはなんでしょうか?
-
Word2010で閉じるボタン押下後...
-
vbaでボタンをクリックして上書...
-
エクセルのマクロで行と列の削...
-
エクセルでcsvファイルを開いて...
-
For~Nextルーチンで最初の1回...
-
VBAでマクロを使って、マクロ無...
-
処理速度にムラがあり過ぎる
-
大量のCSVファイルをExcel形式...
おすすめ情報