Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12588 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【9718】"0"の時非表示にする simoni 03/12/15(月) 16:01 質問
【9719】Re:"0"の時非表示にする INA 03/12/15(月) 16:08 回答
【9720】Re:"0"の時非表示にする simoni 03/12/15(月) 16:13 お礼
【9722】Re:"0"の時非表示にする simoni 03/12/15(月) 16:37 発言
【9725】Re:"0"の時非表示にする INA 03/12/15(月) 17:55 回答
【9728】Re:"0"の時非表示にする ichinose 03/12/15(月) 19:00 発言
【9729】Re:"0"の時非表示にする ぴかる 03/12/15(月) 19:11 発言
【9734】Re:"0"の時非表示にする simoni 03/12/16(火) 8:47 発言
【9735】Re:"0"の時非表示にする INA 03/12/16(火) 8:56 回答
【9736】Re:"0"の時非表示にする Jカーター 03/12/16(火) 9:55 発言
【9738】Re:"0"の時非表示にする INA 03/12/16(火) 10:57 回答
【9740】Re:"0"の時非表示にする simoni 03/12/16(火) 11:00 発言
【9747】Re:"0"の時非表示にする Jカーター 03/12/16(火) 12:23 回答
【9750】Re:"0"の時非表示にする simoni 03/12/16(火) 13:21 お礼
【9751】Re:"0"の時非表示にする Jカーター 03/12/16(火) 13:29 発言
【9761】Re:"0"の時非表示にする simoni 03/12/16(火) 15:03 お礼
【9718】"0"の時非表示にする
質問  simoni  - 03/12/15(月) 16:01 -
引用なし
パスワード
   すみません。お世話になります

セルの集計値が"０"の時、空白か非表示にしたいのですが、

ＶＢＡでは、どのように記述するのでしょうか？

初歩的質問ですみませんがよろしくお願い致します。
【9719】Re:"0"の時非表示にする
回答  INA  - 03/12/15(月) 16:08 -
引用なし
パスワード
   if Range("A1").value = "0" then
　 Range("A1").value = ""
end if

でしょうか？
【9720】Re:"0"の時非表示にする
お礼  simoni  - 03/12/15(月) 16:13 -
引用なし
パスワード
   ▼INA さん：
>回答ありがとうございます。

初心者で申し訳ないのですが、シートの１列すべて設定する場合にはどのように記述するのですか？すみませんがよろしくお願い致します。
【9722】Re:"0"の時非表示にする
発言  simoni  - 03/12/15(月) 16:37 -
引用なし
パスワード
   　▼INA さん：
>回答ありがとうございます。

初心者で申し訳ないのですが、シートの１列すべて設定する場合にはどのように記述するのですか？すみませんがよろしくお願い致します。
【9725】Re:"0"の時非表示にする
回答  INA  - 03/12/15(月) 17:55 -
引用なし
パスワード
   Dim myRange As Range

　　For Each myRange In Range("A:A")
　　　　If myRange.Value = "0" Then
　　　　　 myRange.Value = ""
　　　　End If
　　Next myRange

です。
【9728】Re:"0"の時非表示にする
発言  ichinose  - 03/12/15(月) 19:00 -
引用なし
パスワード
   こんばんは。

Ａ列が0のとき、空白に見せるには、


　　Range("a:a").NumberFormat = """""[=0]"


但し、Valueプロパティは0ですので、
数式バーには、0と表示されてしまいますが・・・。
こんな方法もあると言う事で・・・。
【9729】Re:"0"の時非表示にする
発言  ぴかる  - 03/12/15(月) 19:11 -
引用なし
パスワード
   こんばんは。

一般機能ですが、こんなんもどうです？。

１．書式→条件付き書式→セルの値が→０→等しい→文字色を白
２．ツール→オプション→表示→０値のチェックを外す
【9734】Re:"0"の時非表示にする
発言  simoni  - 03/12/16(火) 8:47 -
引用なし
パスワード
   みなさんいろいろな回答ありがとうございます。
ちなみに
　Dim myRange As Range

　　For Each myRange In Range("A:A")
　　　　If myRange.Value = "0" Then
　　　　　 myRange.Value = ""
　　　　End If
　　Next myRange
はどこに書けばよいのでしょうか？初歩的質問ですみません
よろしくお願いします。
【9735】Re:"0"の時非表示にする
回答  INA  - 03/12/16(火) 8:56 -
引用なし
パスワード
   １．ALT+F11キーで、VBEを起動
２．挿入−標準モジュール
３．標準モジュールのコードウィンドウに以下のコードをコピペ
４．EXCELに戻って、ツール＞マクロ＞マクロ＞から　sample　を実行

sub sample()

　Dim myRange As Range

　　For Each myRange In Range("A:A")
　　　　If myRange.Value = "0" Then
　　　　　 myRange.Value = ""
　　　　End If
　　Next myRange

End Sub

で使用できます。
【9736】Re:"0"の時非表示にする
発言  Jカーター  - 03/12/16(火) 9:55 -
引用なし
パスワード
   失礼します。
「０を非表示ですよね？」
０を""にしてしまっていいのですか？
０と""は違いますよね？

あと
Range("A:A")では６５５３６行までループしますけど
いいのですか？

勘違いならすいません。
【9738】Re:"0"の時非表示にする
回答  INA  - 03/12/16(火) 10:57 -
引用なし
パスワード
   >「０を非表示ですよね？」
>０を""にしてしまっていいのですか？
>０と""は違いますよね？

「セルの集計値が"０"の時、空白か非表示にしたいのですが」


>Range("A:A")では６５５３６行までループしますけど
>いいのですか？

「シートの１列すべて設定する場合にはどのように記述するのですか？」

のようです。
【9740】Re:"0"の時非表示にする
発言  simoni  - 03/12/16(火) 11:00 -
引用なし
パスワード
   ▼Jカーター さん：
回答ありがとうございます。
言われたとおりできれば、集計の結果で０の時に非表示にしたほうがいいです。
値が入った時は集計するように。
それと、ループは別にかまいません。でも処理が早い方がよいですが...
よろしくお願い致します。
【9747】Re:"0"の時非表示にする
回答  Jカーター  - 03/12/16(火) 12:23 -
引用なし
パスワード
   こんにちは。

>集計の結果で０の時に非表示にしたほうがいいです。
の意味がイマイチわからないのですが

ichinoseさんの書式の方法とか　
ぴかるさんの条件付き書式は駄目でしたか？
【9750】Re:"0"の時非表示にする
お礼  simoni  - 03/12/16(火) 13:21 -
引用なし
パスワード
   ▼Jカーター さん：

説明不足ですみません。
EXCELではいちいちマクロを実行しないと表示をきりかえられないのでしょうか？
さきほどのsampleでは、マクロを実行すると書式が消えてしまうんですが？そのまま
残して値が入ると集計できるようにしたいのです。値がない時非表示みたいに...

> ichinoseさんの書式の方法とか　
> ぴかるさんの条件付き書式は駄目でしたか？

どちらもうまくできました＼(^o^)／
遅れましたがichinoseさん、ぴかるさんありがとうございました。
【9751】Re:"0"の時非表示にする
発言  Jカーター  - 03/12/16(火) 13:29 -
引用なし
パスワード
   こんにちは。
>さきほどのsampleでは、マクロを実行すると書式が消えてしまうんですが？
私はsampleを提示していないので何ともいえません。

>どちらもうまくできました＼(^o^)／
>遅れましたがichinoseさん、ぴかるさんありがとうございました。

ということでVBAは不要ということいいのではないですか？
【9761】Re:"0"の時非表示にする
お礼  simoni  - 03/12/16(火) 15:03 -
引用なし
パスワード
   ▼Jカーター さん：
いろいろと回答ありがとございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
12588 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free