Excel VBA質問箱 IV

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

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


29438 / 76732 ←次へ | 前へ→

【52575】Re:リストボックスの列ごとの表示形式指定
発言  Jaka  - 07/11/20(火) 11:49 -

引用なし
パスワード
   右詰、気持ちは解ります。
私も何度かやりましたが、これといった決め手が見つかりません。

取りあえず、こんな感じでフィールドの文字数を決めておくといった方法ですが、
半角スペースだと、うまく会いません。
全角なら固定文字数の不足分は全角文字数で埋めてもずれないので、私は全角文字の仕様に変えたことがあります。

Sub mdmdl()
固定文字数 = 15
st1 = Format("1234567", "##,##0")
st2 = Format("98765", "##,##0")
MsgBox "-" & Space(固定文字数 - Len(st1)) & st1 & "-" & vbLf & _
    "-" & Space(固定文字数 - Len(st2)) & st2 & "-"

MsgBox "-" & String(固定文字数 - Len(st1), " ") & st1 & "-" & vbLf & _
    "-" & String(固定文字数 - Len(st2), " ") & st2 & "-"
End Sub

0 hits

【52571】リストボックスの列ごとの表示形式指定 ハナ 07/11/20(火) 10:55 質問
【52575】Re:リストボックスの列ごとの表示形式指定 Jaka 07/11/20(火) 11:49 発言
【52578】補足 Jaka 07/11/20(火) 12:08 発言
【52581】Re:リストボックスの列ごとの表示形式指定 ハナ 07/11/20(火) 14:06 お礼
【52582】Re:リストボックスの列ごとの表示形式指定 Jaka 07/11/20(火) 14:30 発言

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