Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5917 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【48255】sumで範囲決定、計算後の表示の仕方 カネゴン 07/4/10(火) 10:16 質問[未読]
【48260】Re:sumで範囲決定、計算後の表示の仕方 ウッシ 07/4/10(火) 12:21 発言[未読]
【48286】Re:sumで範囲決定、計算後の表示の仕方 カネゴン 07/4/11(水) 16:50 質問[未読]
【48287】Re:Re:sumで範囲決定、計算後の表示の仕方 カネゴン 07/4/11(水) 16:52 質問[未読]
【48289】Re:Re:sumで範囲決定、計算後の表示の仕方 ウッシ 07/4/11(水) 17:02 発言[未読]
【48297】Re:Re:sumで範囲決定、計算後の表示の仕方 カネゴン 07/4/12(木) 9:14 質問[未読]
【48298】Re:Re:sumで範囲決定、計算後の表示の仕方 ウッシ 07/4/12(木) 9:27 発言[未読]
【48315】Re:Re:sumで範囲決定、計算後の表示の仕方 カネゴン 07/4/12(木) 16:39 お礼[未読]
【48255】sumで範囲決定、計算後の表示の仕方
質問  カネゴン  - 07/4/10(火) 10:16 -
引用なし
パスワード
   お世話になります。

早速ですが、標題の件につきまして、sumにて範囲を決定し、計算された答えが０の場合において、“０”以外の表示方法はあるのでしょうか？私個人としましては、０になった時は“−”表示にしたいのです。

何か簡単に設定できる方法がございましたら、是非教えて頂きたいのです。何卒、よろしくお願い申し上げます。
【48260】Re:sumで範囲決定、計算後の表示の仕方
発言  ウッシ  - 07/4/10(火) 12:21 -
引用なし
パスワード
   こんにちは

計算された答えが「0」なら「'-」を入れるようにIf文等で条件分岐されてはどうでしょうか？
【48286】Re:sumで範囲決定、計算後の表示の仕方
質問  カネゴン  - 07/4/11(水) 16:50 -
引用なし
パスワード
   ▼ウッシ さん：
ご返信下さいまして、誠に有難うございます。また、度々の質問で申し訳有りません。
If文というのは、マクロやモジュールのことでしょうか？もし、そうであるのでしたら、教えて頂けないでしょうか。

何卒、よろしくお願い申し上げます。

>こんにちは
>
>計算された答えが「0」なら「'-」を入れるようにIf文等で条件分岐されてはどうでしょうか？
【48287】Re:Re:sumで範囲決定、計算後の表示の仕方
質問  カネゴン  - 07/4/11(水) 16:52 -
引用なし
パスワード
   ▼ウッシ さん：
ご返信下さいまして、誠に有難うございます。また、度々の質問で申し訳有りません。
If文というのは、マクロやモジュールのことでしょうか？もし、そうであるのでしたら、教えて頂けないでしょうか。

何卒、よろしくお願い申し上げます。

>こんにちは
>
>計算された答えが「0」なら「'-」を入れるようにIf文等で条件分岐されてはどうでしょうか？
【48289】Re:Re:sumで範囲決定、計算後の表示の仕方
発言  ウッシ  - 07/4/11(水) 17:02 -
引用なし
パスワード
   こんにちは

ここはVBAの質問箱ですけど、関数でも出来ますよね？

詳細が全く分からないのですが、セルA1からA10まで合算するとして、答えをセルB1に
セットするなら、

Sub test()
　　Dim total
　　total = Application.WorksheetFunction.Sum(Range("A1:A10"))
　　If total = 0 Then
　　　　Range("B1").Value = "'-"
　　Else
　　　　Range("B1").Value = total
　　End If
End Sub

こんな感じです。

マクロで計算式をセットする方法も有りますし。
【48297】Re:Re:sumで範囲決定、計算後の表示の仕方
質問  カネゴン  - 07/4/12(木) 9:14 -
引用なし
パスワード
   ▼ウッシ さん：
ご返信下さいまして、誠に有難うございます。

私の説明不足により、度々質問することになり申し訳有りません。

私は、Ａ〜ＡＺ・１〜３００の範囲内で、sumで範囲決定或いは他の方法で計算した場合、答えが“０”は全て“−”表示にしたいのです。

何かお知恵を拝借できれば幸いです。何卒、宜しくお願い致します。

>こんにちは
>
>ここはVBAの質問箱ですけど、関数でも出来ますよね？
>
>詳細が全く分からないのですが、セルA1からA10まで合算するとして、答えをセルB1に
>セットするなら、
>
>Sub test()
>　　Dim total
>　　total = Application.WorksheetFunction.Sum(Range("A1:A10"))
>　　If total = 0 Then
>　　　　Range("B1").Value = "'-"
>　　Else
>　　　　Range("B1").Value = total
>　　End If
>End Sub
>
>こんな感じです。
>
>マクロで計算式をセットする方法も有りますし。
【48298】Re:Re:sumで範囲決定、計算後の表示の仕方
発言  ウッシ  - 07/4/12(木) 9:27 -
引用なし
パスワード
   こんにちは

それは一般操作の質問でしょうか？
ここはVBAの質問箱ですが？

Ａ1〜ＡＺ300のセルを選択して「セルの書式設定」の「表示形式」タブで「分類」を
「ユーザー定義」にして、「種類」に「G/標準;G/標準;-;」と入力して下さい。

「G/標準;G/標準;-;」の意味は
「プラス数値の書式；マイナス数値の書式；ゼロの書式；文字の書式」です。
【48315】Re:Re:sumで範囲決定、計算後の表示の仕方
お礼  カネゴン  - 07/4/12(木) 16:39 -
引用なし
パスワード
   ▼ウッシ さん：
ご協力下さいまして、本当に有難うございました。
無事に設定することが出来ました。

>こんにちは
>
>それは一般操作の質問でしょうか？
>ここはVBAの質問箱ですが？
>
>Ａ1〜ＡＺ300のセルを選択して「セルの書式設定」の「表示形式」タブで「分類」を
>「ユーザー定義」にして、「種類」に「G/標準;G/標準;-;」と入力して下さい。
>
>「G/標準;G/標準;-;」の意味は
>「プラス数値の書式；マイナス数値の書式；ゼロの書式；文字の書式」です。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
5917 / 13665 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free