
No.4
- 回答日時:
No3です
>SpecialCells(xlCellTypeBlanks)
関数のCOUNTBLANCとは異なり、SpecialCellsだと計算式で空白になっているセルは含まれないようです。
対象範囲を順に空白(="")か否かをチェックするのが地道ですが簡単な方法かと。
なお、ご質問には、関係ありませんが、
>If [Counta(j3:j300)] < 300 Then
仮に全部が該当しても、298 < 300 なので、その条件がFalseになることはないので、意味のない条件判断になっています。
以下は、範囲を順にチェックする例です
For Each c In Range("j3:j300")
If c.Value = "" Then c.EntireRow.Hidden = True
Next c
事前に全ての行が表示されているとは限らない場合は、
For Each c In Range("j3:j300")
c.EntireRow.Hidden = (c.Value = "")
Next c
※ 上の例では1行ずつ処理していますので若干時間がかかります。
(と言っても、問題にはならないと思いますが…)
仕分けだけ先に行ってUNIONなどでまとめておいて、全部の表示処理をまとめて行うようにすれば、それなりに速くなるはずです。
ありがとうございます!…しかしダメでした他の列で試したら動作してくれるのですが判定の対象になってる列に対して行うと無反応です。
その方法は数式が入ってるセルには無効のようです。
No.3
- 回答日時:
こんにちは
>空白なら空白扱いにするにはどうしたらいいでしょうか
普通にCOUNTBLANKなどで数えれば空白扱いされるはずです。
逆に、どうやって「非空白」扱いと判断しているのかが不明なのですけれど・・・
>VBAでボタンを押すと~~
VBAで行っているのなら、そちらの空白判定のロジックを修正すれば良いだけでしょう。
(現状が不明ですが、COUNTBLANKでも良いしVALUEやTEXT値を調べても良い)
もしかして、質問者様は「空白」としているけれど、セルにスペース等が入っていて、(見えないので)空白だと思っているだけといった可能性はないでしょうか?
そんなことも考慮しておくなら、空白かどうか調べる前に、スペースや改行などを除いてから判定する方が良いかも知れませんね。
回答ありがとうございます。
もともとはこんなマクロでした。
Sub 空白行を非表示()
If [Counta(j3:j300)] < 300 Then
Range("J3:J300").SpecialCells(xlCellTypeBlanks).EntireRow.Hidden = True
End If
End Sub
>VBAで行っているのなら、そちらの空白判定のロジックを修正すれば良いだけでしょう。
まだ初心者なので他で使われている物を編集して使用している感じです。
>もしかして、質問者様は「空白」としているけれど、セルにスペース等が入っていて、(見えないので)空白だと思っているだけといった可能性はないでしょうか?
セルは空白でしたリンク貼り付けによるアドレスが数式バーに入力されてるだけのように見えますがもしかして他の原因ですか…?
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) WORKDAY関数 4 2023/06/08 13:23
- Excel(エクセル) Excel 特定セルの数値を参照したセルの0表示が空白にならないのはどうしてか? 3 2022/04/28 22:23
- Visual Basic(VBA) VBA 「,」・空白・カタカナ等の複数条件のマクロ 2 2023/08/23 11:57
- Excel(エクセル) excel 表計算 加算するセルが空白の時累計を表示しない又は塗りつぶして表示しないようにしたい 4 2023/07/02 11:50
- Excel(エクセル) ユーザー定義について質問です。 2 2023/06/28 13:21
- Visual Basic(VBA) 【VBA】Excelで罫線を引きたい 3 2022/07/14 12:04
- Excel(エクセル) データ入力規則リスト 空白を無視 3 2022/07/13 15:11
- Visual Basic(VBA) VBAを使いシート間で貼り付け 3 2023/03/14 20:53
- Visual Basic(VBA) エクセルVBAについて 2 2023/01/31 16:21
- Excel(エクセル) アンケート集計用VBAについて教えて下さい。 約100人にアンケート内容が入ったExcelファイルを 1 2022/07/27 13:12
このQ&Aを見た人はこんなQ&Aも見ています
-
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
-
空白セル内の数式を残したままで空白セル扱いとしたいのですが
Excel(エクセル)
-
Excelで数式の入っているセルを空白と認識させたい
Excel(エクセル)
-
-
4
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
5
数式による空白を無視して最終行までコピーするマクロ
Excel(エクセル)
-
6
特定のセルが空白だったら、その行を非表示にしたい。。。
Visual Basic(VBA)
-
7
【マクロ】名前を保存する際に、同じファイルがあった場合に、メッセージを表示
Excel(エクセル)
-
8
Excelでセル参照したとき、書式も一緒に持ってくるには?
Windows Vista・XP
-
9
VBA(エクセル)で自動的にボタンをクリックさせるには
その他(プログラミング・Web制作)
-
10
VBAでダブルコーテーション入りの数式をセルにセットしたい
Visual Basic(VBA)
-
11
VBAで特定の文字が入力されたセルを選択
Excel(エクセル)
-
12
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
13
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
14
VBA スペースが入力されていても、空白セルと判断する方法
Excel(エクセル)
-
15
EXCELの条件付き書式で数式を空白と認識してくれる方法
Excel(エクセル)
-
16
VBA Cのセルが空白でなかったら、Aのセルに順番に数値を入力
Visual Basic(VBA)
-
17
Enterキーでマクロを起動さす。
その他(ソフトウェア)
-
18
cellsで特定の離れた範囲を選択する方法は?
Visual Basic(VBA)
-
19
エクセルのラベルの値(文字列)を垂直方向で中央揃えにするには?
Excel(エクセル)
-
20
エクセルマクロ 【空白セルを無視する方法を教えてください】
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
特定のセルだけ結果がおかしい...
-
エクセルのdatedif関数を使って...
-
エクセルのVBAで集計をしたい
-
【マクロ】【配列】3つのシー...
-
vba テキストボックスとリフト...
-
エクセル ドロップダウンリスト...
-
【関数】同じ関数なのに、エラ...
-
Office2021のエクセルで米国株...
-
【マクロ】列を折りたたみ非表...
-
9月17日でサービス終了らし...
-
【マクロ】アクティブセルの時...
-
ページが変なふうに切れる
-
【条件付き書式】シートの中で...
-
【マクロ】3行に上から下に並...
-
【マクロ】オートフィルターの...
-
【マクロ】EXCELで読込したCSV...
-
【画像あり】オートフィルター...
-
他のシートの検索
-
エクセルの循環参照、?
-
Excelファイルを開くと私だけVA...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
9月17日でサービス終了らし...
-
エクセル
-
【マクロ】WEBシステムから保存...
-
エクセルの循環参照、?
-
エクセル ドロップダウンリスト...
-
エクセルのdatedif関数を使って...
-
特定のセルだけ結果がおかしい...
-
【マクロ】A列にある、日付(本...
-
【マクロ】EXCELで読込したCSV...
-
【マクロ】アクティブセルの時...
-
【エクセル】期限アラートについて
-
iPhoneのExcelアプリで、別のシ...
-
【関数】同じ関数なのに、エラ...
-
Excelの新しい空白のブックを開...
-
【マクロ】3行に上から下に並...
-
【マクロ】宣言は、何のために...
-
VBA チェックボックスをオーバ...
-
Excelについての質問です 並べ...
-
【マクロ】アクティブセルの2...
-
【関数】不規則な文章から●●-●●...
おすすめ情報