Access VBA質問箱 IV

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

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


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

6221 / 9994

←次へ　｜　前へ→


	【6981】Re:エクスポートしたデータに．．．

小僧 - 05/12/15(木) 15:10 -


	引用なし

	パスワード

▼フクさん：
こんにちは。

>ここまでは簡単にできたのですが

という事で、エクスポートした CSVファイルに日付を書き込むサンプルコードです。

Sub CSVファイルに追加()
Dim csvPath As String　 'CSVファイルへのフルパス
Dim csvName As String　 'CSVファイル名
Dim FSO As Object
Dim F As Object

　　csvPath = "C:\"
　　csvName = "Test.csv"

　　Set FSO = CreateObject("Scripting.FileSystemObject")
　　
　　Set F = FSO.CreateTextFile(csvPath & "Temp.csv")
　　　　F.WriteLine Date
　　　　F.Write FSO.OpenTextFile(csvPath & csvName).ReadAll
　　　　F.Close: Set F = Nothing
　　　　
　　FSO.DeleteFile csvPath & csvName
　　FSO.MoveFile csvPath & "Temp.csv", csvPath & csvName
　　Set FSO = Nothing
End Sub

CSVファイル ---- IT用語辞典より

フルスペル：　Comma Separated Values
別名：　コンマ区切り

データをカンマ(",")で区切って並べたファイル形式。

日付を1行目に入れてしまう時点でCSVファイルと呼べるものではなくなってしまうのですが…。

347 hits

▼

【6979】エクスポートしたデータに．．． フク 05/12/15(木) 11:55