以前の質問で下記の様にご教示頂いたのですが、
標記の内容がわからなくうまくいきません
初歩的な質問ではございますが、
作成方法を教えてくださいます様、よろしくお願いいたします
用意するもの
1.CSVのデータ1行を表すクラス(CsvQueueクラスとする)
メンバー変数は、その1行のデータとCsvQueueクラスへのポインタ。データは面倒ならPublicでよいだろう。
メンバー関数は、PutData()とGetData()。
CsvQueueクラス
Public strCsvData1 As String
Public strCsvData2 As String
Public strCsvData3 As String
Private queNextData As CsvQueue
参考:::::::::::::::::::::
Public Function PutData(ByVal q As CsvQueue) As Boolean
If queNextData Is Nothing Then
Set queNextData = q
Exit Function
End If
PutData = queNextData.PutData(q)
End Function
Public Function GetData() As CsvData
GetData = queNextData
End Function
CSV出力モジュール内(追加した行を++で表している)
Private csvRoot As CsvData ' Nothingに初期化
Private Sub output(ByVal ofile As String)
On Error GoTo trap
handle = FreeFile()
Open ofile For Append As #handle
Do Until csvRoot Is Nothing
(中略と同内容)
csvRoot = csvRoot.GetData()
Loop
(中略)
Print #handle, _
Close #handle
Exit Sub
trap:
'MsgBox Err.number & "," & Err.Description, vbInformation, "output"
Dim csvTemp As New CsvData
csvTemp.strCsvData1 = ...
If csvRoot Is Nothing Then
Set csvRoot = csvTemp
Else
csvRoot.PutData(csvTemp)
End If
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) 【追加】ファイルを閉じてダイアログで保存した時だけ処理の実行をする 3 2022/03/23 15:43
- Visual Basic(VBA) EXCEL VBAにて動的にCheckBOXを複数作成し、同BOXにイベントを追加したい 1 2023/03/16 07:05
- Excel(エクセル) エクセルVBAでオブジェクトが必要です 2 2022/09/10 16:37
- Visual Basic(VBA) 【VBA】写真の貼り付けコードがうまく機能しません。 5 2022/09/01 18:43
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) 【変更】ファイルを閉じてダイアログで保存した時、更新したシートだけの処理の実行をする 5 2022/03/26 18:31
- Excel(エクセル) 2つのVBAを一緒にしたら機能しなくなりました(エクセル) 7 2022/06/02 12:41
- Visual Basic(VBA) オブジェクトが見つかりません 1 2023/06/24 19:43
- Visual Basic(VBA) 別シートから年齢別の件数をカウントしたいの続き 5 2023/01/24 00:16
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
「天声人語」をインターネット...
-
java eclipse 型に解決できません
-
担任にプレゼント
-
グローバルIPとプライベートIP...
-
どこからも呼ばれていない無意...
-
配列の重複する値とその個数を...
-
同じクラスにならない確率を教...
-
JAVAでMath.powを使用せずに、...
-
C# テキストボックスにマウスが...
-
自分事ですが、私のLINEのスク...
-
[再掲]JavaScript|特定URLだ...
-
クラスの衝突
-
複数のクラスで共通した関数を...
-
IPアドレスのクラスAを取得して...
-
3年間同じクラスになる確率
-
昔の電話帳の閲覧
-
自作のクラスファイルがインポ...
-
エクセルVBAでのwitheventsにつ...
-
EclipseでJSPのコンパイルエラー
-
eclipse でクラスに色
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
配列の重複する値とその個数を...
-
どこからも呼ばれていない無意...
-
「天声人語」をインターネット...
-
共通で使う関数を集めたクラス...
-
グローバルIPとプライベートIP...
-
IPアドレスのクラスAを取得して...
-
java eclipse 型に解決できません
-
自作のクラスファイルがインポ...
-
main()を持つクラスが2つ以上...
-
3年間同じクラスになる確率
-
同じクラスにならない確率を教...
-
クラスのプロパティに構造体を...
-
同一パッケージにあるクラスが...
-
VBAもしくはVB6:クラスの中で...
-
正規表現を使った小数入力チェ...
-
1 つのヘッダファイルに複数の...
-
重複エラーを解決するには
-
IPアドレスの3バイト目の呼び方
-
UMLのクラス図はmain()も含むん...
-
複数のクラスで共通した関数を...
おすすめ情報