Excel VBA質問箱 IV

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

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


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

4982 / 76732

←次へ　｜　前へ→


	【77364】Re:CSV出力について

Masa - 15/8/3(月) 15:58 -


	引用なし

	パスワード

回答ありがとうございます。

一部省略していますが、下記のコードで作成しています。
-------------
　　Dim Hidule　　As String　'日付
　　Dim Tanka　　 As Double　'納価

　　Hidule = Format(Range("A1").Value, "yyyymmdd")
　　Tanka = Range("A2").Value

　　Write #FileNo, Hiduke, Tanka
--------------
A1：
　2015/08/01→"20150801"で出力したい　==>　問題なし
A2：
　100.00→100.00で出力したい　==>　100となってしまう
　0もしくは""→0.00で出力したい　==>　0となってしまう
　100.05→100.05で出力したい　==>　問題なし

小数部が0の場合に整数部だけで出力されてしまうため
何か方法はないかと悩んでいます。

良い方法はありますでしょうか。
宜しくお願い致します。

234 hits

▼

【77362】CSV出力について Masa 15/8/3(月) 15:26