Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

1124 / 76735

←次へ　｜　前へ→


	【81267】CSVのヘッダーだけExcelで表示させるには

VBA初心者です - 20/4/29(水) 0:59 -


	引用なし

	パスワード

ExcelでCSVを読み込むサンプルを使用して、CSVを読み込めるようになりました。

そのコードをふまえて、
「シート２」にCSVのヘッダーのみ出力したいのですが可能でしょうか？
また、処理後に「シート２」を表示した状態にしたいです。

現在使用のコードは

　Dim filepath As String
　With Application.FileDialog(msoFileDialogOpen)
　　.AllowMultiSelect = False
　　.Filters.Clear
　　.Filters.Add "CSVファイル(*.csv)", "*.csv", 1
　　.InitialFileName = ThisWorkbook.Path & "\"
　　.Show
　　
　　If .SelectedItems.Count = 0 Then
　　　End
　　End If
　　
　　filepath = .SelectedItems(1)
　End With
　
　Dim WS As Worksheet
　Set WS = ReadCSV.ReadCSV(filepath:=filepath, OutputWorksheet:=Worksheets("シート2"), OutputRow:=1)

上記となります。

どうぞ宜しくお願い致します。

0 hits

▼

【81267】CSVのヘッダーだけExcelで表示させるには VBA初心者です 20/4/29(水) 0:59