ＣＳＶファイルの保存方法をお教えください

質問

Microsoft Office Personal 2010を使っています。

HogeHoge.csv をエクセルで開きます、この時シートの表示はHogeHoge.csv のままです
平均計算などの処理後このファイルを閉じようとすると下記のようなメッセージが出ます
がこの時[はい]をクリックして閉じると正常に保存されるのですが
マクロで保存をしようとするとなかなか上手くいきません。
Ａ列の日付けが 2014/1/15 10:30 が 1/15/2014 10:30 となってしまいます。

HogeHoge.csvには、ＣＳＶ(カンマ区切り)と互換性のない機能が含まれている可能性があります。この形式でブックを保存しますか？
・このまま保存するには、[はい]をクリックします。
・機能を保存するには、[いいえ]をクリックしてから、最新のExcelの形式で保存します。
とでます

　　下記のようなマクロですがどのようにすれば良いのか分かりません
　　どうぞよろしくお願いいたします。

Sub 保存終了()
ChDir "D:\DATA\BackT"
ActiveSheet.SaveAs Filename:="D:\DATA\BackT\HogeHoge.csv", FileFormat _
:=xlCSV, CreateBackup:=False
If Workbooks.Count = 1 Then
Application.DisplayAlerts = False
Application.Quit
Else: ActiveWorkbook.Close False
End If
End Sub

回答No.3

007MUKADE

＃１ですが・・・

Excel の セルに 入力された文字でも ＊＊＊＊／＊＊／＊＊ は勝手に日付と解釈して シリアル値で保存されます。

Excel のテスト画像を添付しました・・ご覧下さい。

該当のセルの幅を広げて ”値”が 右側に表示されれば シリアル値で保存してます。

文字列にするには 頭に ”’” （アポストロフィ）を付けないと　文字列と判断してくれません。
　　画像の(5)で使ってます。

参考になりましたか・・・？

お礼

質問の仕方が良くなかったのかもしれません
　お手数をおかけしました。
　ありがとうございました。

回答No.2

007MUKADE

１００年は １９００年の間違いでした。
・・・・すんません

回答No.1

007MUKADE

.csv　ファイルは正常に保存されてますよ・・。

日付は シリアル値で 書き出されてるので
１００年１月１日 を ”１（数値）”としてます。

Excel での 表示 が ”欧文系 ” 1/15/2014 10:30 になってるだけで
　　　　　　　　表示を ”和文系 ” 2014/1/15 10:30 にすれば良いだけですが・・

.csv ファイルを ”メモ帳 ”で開いて見て下さい。

例えば ２０１４／１／２３ と入力すれば 日付のシリアル値は　41662　で
保存されてます。

補足

早速の回答ありがとうございます。
　日付の値はシリアル値ではなく文字列になって
　保存されています、ですのでマクロの作り方を
　お尋ねしたしだいです。
　　宜しくお願い致します。