Excel VBA質問箱 IV

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

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


4465 / 13644 ツリー ←次へ | 前へ→

【56495】ラベルの表示形式 K.A 08/6/19(木) 13:30 質問[未読]
【56496】Re:ラベルの表示形式 Jaka 08/6/19(木) 14:21 発言[未読]
【56497】Re:ラベルの表示形式 kanabun 08/6/19(木) 14:56 発言[未読]
【56508】Re:ラベルの表示形式 K.A 08/6/19(木) 17:00 お礼[未読]

【56495】ラベルの表示形式
質問  K.A  - 08/6/19(木) 13:30 -

引用なし
パスワード
   こんにちは
ラベルに数値を入力したいのですが、3桁ごとにカンマを入れて円表示にしたいのですが方法が分かりません。教えてください

【56496】Re:ラベルの表示形式
発言  Jaka  - 08/6/19(木) 14:21 -

引用なし
パスワード
   カッコええのが思いつかなかったけど。

Dim HH As Currency
If Len(Me.Label1.Caption) = 0 Then Me.Label1.Caption = 0
HH = Me.Label1.Caption
Me.Label1.Caption = Format(HH + 100, "#,0")

【56497】Re:ラベルの表示形式
発言  kanabun  - 08/6/19(木) 14:56 -

引用なし
パスワード
   ▼K.A さん:
おじゃまします

>ラベルに数値を入力したいのですが、3桁ごとにカンマを入れて円表示にしたい

Label1.Caption = Format$(数値, "Currency")

ではだめですか?

【56508】Re:ラベルの表示形式
お礼  K.A  - 08/6/19(木) 17:00 -

引用なし
パスワード
   回答ありがとうございました

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