[[20240722090531]] 『オートフィルターで空セルだけに絞り込みたい』(Uva) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) |

| 全文検索 | 過去ログ ]

 

『オートフィルターで空セルだけに絞り込みたい』(Uva)

オートフィルターで「空白セル」に絞り込むと、空のセルだけでなく「ひとつ以上の半角スペースだけ」のセルまで含まれてしまう、ということに今さらながらに気付きました。

テキストフィルターで ="" に等しいとしたら逆に空セルもひっかりません。

空のセルだけに絞り込むことはできないものでしょうか。

< 使用 Excel:Excel2016、使用 OS:unknown >


 フィルタオプションを使ってはどうですか?
 ・リスト範囲      A1:A4
 ・検索条件範囲    B1:B2

    A列            B列
 1  itm1           *3
 2  =""            =AND(NOT(ISFORMULA(A2)),LEN(A2)=0)
 3  *1  
 4  *2             (注)*3のセルは、空白でもよいし、"条件"といった見出し(itm1等)と一致しない文字列であれば可  

   (注)*1 は 1個以上の半角スペース
   (注)*2 は 空白 

 こうすれば、A4だけが抽出されます。
(xyz) 2024/07/22(月) 09:56:08

うーん、やっぱそっちですかぁ。
VBAでも無理ですかねぇ。
(Uva) 2024/07/22(月) 10:45:10

 VBA検討するくらいなら、隣に[ISBLANK]の列でも割り込ませれば事足りる気がします...^^;
 (空白で絞り込む事それ自体が目的ならアレですけど)

(白茶) 2024/07/22(月) 11:18:12


 VBAと言ってもオートフィルターの機能を変えることを期待しているなら
 それは間違いです。
 指摘がありますけど作業列を追加しても良いし、
 ふたつのセルの追加で済むフィルタオプションでもいいでしょう。
(xyz) 2024/07/22(月) 11:42:54

もちろん「オートフィルターの機能を変える」なんてことは考えてませんよ。

そもそもが「空セル」でなく「空白(を含む)セル」に絞り込むのがオートフィルターの余計なお世話的仕様ということであきらめざるを得ない、ということで。

ありがとうございました。
(Uva) 2024/07/22(月) 12:19:01


お世話的仕様であろうがなかろうがVBAでは仕様変更できません。
最初からVBA と明記して質問してください。
(xyz) 2024/07/22(月) 12:43:37

Sub Macro1()
    On Error Resume Next
    ActiveSheet.UsedRange.Columns("A:A").SpecialCells(xlCellTypeConstants).EntireRow.Hidden = True
End Sub

オートフィルター「っぽい」動作は、VBAを使えばいかようにもできるかと。。。

(まっつわん) 2024/07/22(月) 13:15:30


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.