Excel - 複数のシートで値がゼロの行を非表示にする

問題

Excelシートに次のようなマクロを作成してください。

セル値または（値の範囲）が複数のシートでゼロ値を持つ場合、行全体を非表示にできますか。たとえば、ファイルを開いたときや、コントロールの下部をクリックしてマクロを実行したときなどです。

私の場合は、

各従業員につき32枚のExcelファイルがあり、各シートには3列の表があります。

 （A、B、C）および26行（1〜26）。 テキストの列Aテキストの列Bと値の列C

私の要求は、コマンドを押すか、値を変更するなどして、列Cの値に応じて行全体を非表示/非表示にすることです。

溶液

目的：

特定の値についてすべてのシート上の行をフィルタ処理/非表示にします。

仮定：

1.列の位置はすべてのシートで同じです

3.フィルターはすべてのシートに適用する必要があります

3.シートは隠れていません

4.すべてのシートに少なくとも1つのセルが埋められている

ステップ

仮定を読む

2.バックアップコピーを作成します

3. Alt + F11キーを押して新しいモジュールを挿入します

4.コードを貼り付けて実行します

コード：

 Sub HideRows（）オブジェクトとしての薄暗いシートバリアントとしての薄暗いiFilterColとしてのiFilterCol = 3 '3列にフィルタを適用filterFor = InputBox（ "除外する値を入力"、 "除外する"）シート内の各シートに対してActiveSheet.AutoFilterModeの場合はCellsを選択します。Cellsの場合はSelection.AutoFilterの終了を選択します。ActiveSheet.AutoFilterModeの場合は選択します。AutoFilterSelectionの場合はSelection.AutoFilterを選択します。次の終わりサブ