Excel VBA質問箱 IV

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

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


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

18798 / 76732

←次へ　｜　前へ→


	【63372】書式設定（表示形式）について

sissy - 09/10/29(木) 17:29 -


	引用なし

	パスワード

小数点未満を切り捨てて表示するため、以下のようにVBAを作成しました
この表示形式の場合、例えば「1234.56」は「1234」と表示されますが、
「1,234」のようにカンマ付で表示をしたいのですが、何か良い方法はあり
ませんでしょうか？

Public Sub TruncCurrentRegion()
Dim c As Range, cv, acv
For Each c In ActiveCell.CurrentRegion
If IsNumeric(c.Value) Then
　　cv = Int(c.Value)
　　acv = Abs(cv)
　　c.NumberFormatLocal = ”[>” & cv & ”]””” & acv & ”””;”
　　End If
Next
End Sub

1 hits

▼

【63372】書式設定（表示形式）について sissy 09/10/29(木) 17:29

≪