Excel VBA質問箱 IV

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

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


73055 / 76738 ←次へ | 前へ→

【8166】CSVの読み込み
質問  こうき  - 03/10/2(木) 15:07 -

引用なし
パスワード
   下記のようなコードでCSVのデータ(数字)をエクセル上に表示させたところ、
CSVのデータが整数のときは正常に動くのですが、小数になるとエクセル上のデータが
\がついた通貨の形式になってしまいます。
良い解決方法があればご教授下さい。
よろしくお願いします。

Dim pdata(1 To 5) As Double
  Open opndir + fn(j) For Input As j
   k = 2
   Do While Not EOF(j)
   Input #j, pdata(1), pdata(2), pdata(3), pdata(4), pdata(5)
   for m = 1 to 5
    Cells(k, m) = pdata(m)
   next m
   k = k + 1
   Loop
   Close #j

0 hits

【8166】CSVの読み込み こうき 03/10/2(木) 15:07 質問
【8169】Re:CSVの読み込み INA 03/10/2(木) 16:03 回答
【8184】Re:CSVの読み込み [名前なし] 03/10/2(木) 22:42 質問
【8187】Re:CSVの読み込み Kein 03/10/2(木) 23:58 回答
【8189】Re:CSVの読み込み こうき 03/10/3(金) 8:22 お礼

73055 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free