Excel VBA質問箱 IV

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

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


41008 / 76732 ←次へ | 前へ→

【40811】Re:テキストデータへの出力に関して
回答  ハト  - 06/7/24(月) 16:26 -

引用なし
パスワード
   おはようございます

▼質問(初心者A氏) さん:
>1点教えて下さい。
>
>EXCELのデータを固定長形式で出力する場合の処理です。
>
>↓で桁数を定義(12文字)
>Type recFormat
>  f1 As String * 12
>End Type
>
>↓で編集したセルの内容を転送
> With rFormat
>    RSet .f1 = mArray(i, 1)
>  'RSet .crlf = vbCrLf
>  End With
>
>以上のケースで例えば、セルの値が
>1.2の時、出力は
>0000001.2000
>したいのですが、どのようにすればいいのか教えて下さい。
>
>宜しくお願いします。

整数部7桁、小数部4桁、固定ならば

  RSet .f1 = Format(mArray(i, 1), "0000000.0000")

として試してみて下さい

1 hits

【40801】テキストデータへの出力に関して 質問(初心者A氏) 06/7/24(月) 13:59 質問
【40811】Re:テキストデータへの出力に関して ハト 06/7/24(月) 16:26 回答
【40814】Re:テキストデータへの出力に関して 質問(初心者A氏) 06/7/24(月) 16:49 お礼

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