別のシートのセル値に基づいて特定のワークシートを非表示または再表示するにはどうすればよいですか？

別のシートのセル内容に基づいて特定のワークシートタブを非表示または再表示する方法はありますか？ 例えば、Sheet2のセルG1に「Yes」と入力すると、Sheet1が非表示になり、「No」と入力すると、Sheet1がすぐに表示されるようにしたいです。この問題をExcelで解決するにはどうすればよいでしょうか？

VBAコードを使用して、セル値に基づいて特定のワークシートタブを非表示または再表示する

VBAコードを使用して、セル値に基づいて特定のワークシートタブを非表示または再表示する

別のワークシートのセル値に基づいて特定のワークシートタブを非表示または再表示するには、次のVBAコードが役立つかもしれません。以下の手順に従ってください：

1. 別のシートを非表示にする基準となるセル値が含まれているワークシートに移動します。

2. シートタブを右クリックし、「表示」コードを選択します。表示されたMicrosoft Visual Basic for Applicationsウィンドウで、次のコードを空白のモジュールウィンドウにコピーして貼り付けてください。スクリーンショットをご覧ください：

VBAコード：セル値に基づいてワークシートタブを非表示または再表示する：

Private Sub Worksheet_Change(ByVal Target As Range)
If [G1] = "Yes" Then
Sheets("Sheet1").Visible = True
Else
Sheets("Sheet1").Visible = False
End If
End Sub

注釈: 上記のコードでは、G1と「Yes」は基準とするセルとその内容であり、 Sheet1は非表示または再表示したい特定のシートです。必要に応じてこれらを変更できます。

3. その後、このコードを保存して閉じます。セルG1に「No」または他のテキストを入力すると、Sheet1が非表示になりますが、「Yes」を入力すると、Sheet1がすぐに表示されます。スクリーンショットをご覧ください：

Kutools AIでExcelの魔法を解き放つ

• スマート実行: セル操作、データ分析、グラフ作成を簡単なコマンドで行います。
• カスタム数式: ワークフローを合理化するための独自の数式を生成します。
• VBAコーディング: 簡単にVBAコードを作成し実装します。
• 数式の解釈: 複雑な数式を簡単に理解できます。
• テキスト翻訳: スプレッドシート内の言語障壁を取り除きます。

AI搭載ツールでExcelの機能を強化しましょう。今すぐダウンロードして、かつてないほどの効率を体験してください！