ワークシートにある範囲のデータがあるとすると、特定の日付に基づいて列を自動的に非表示にします。 たとえば、セルに5年16月2016日の日付を入力すると、次のスクリーンショットに示すように、この特定の日付よりも小さい日付の列をすぐに非表示にします。 この記事では、それを解決するためのいくつかの秘訣を紹介します。
VBAコードを使用して、特定の日付に基づいて列を自動的に非表示にします
Kutools forExcelで特定の日付に基づいて列を非表示にする
VBAコードを使用して、特定の日付に基づいて列を自動的に非表示にしますこのタスクを完了するには、次のVBAコードが役立つ場合があります。次のようにしてください。
1。 日付で非表示にするシートタブを選択し、右クリックして選択します コードを表示 コンテキストメニューからに移動します Microsoft Visual Basic for Applications ウィンドウをクリックし、次のコードをコピーしてモジュールに貼り付けます。
VBAコード：特定の日付に基づいて列を自動的に非表示にします。
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
Dim xCell As Range
If Target.Address <> Range("K4").Address Then Exit Sub
Application.ScreenUpdating = False
For Each xCell In Range("A1:I1")
xCell.EntireColumn.Hidden = (xCell.Value < Target.Value)
Next
Application.ScreenUpdating = True
End Sub
2。 次に、このコードを保存して閉じ、ワークシートに戻り、セルに日付を入力すると K4、日付がこの特定の日付より前の列は自動的に非表示になります。
ノート：上記のコードでは、 K4 に基づいて列を非表示にする特定の日付セルです。 A1：I1 行のセルには、使用した日付が含まれています。
Kutools forExcelで特定の日付に基づいて列を非表示にするコードに慣れていない場合は、ここに便利なツールがあります-Kutools for Excelそのと 特定のセルを選択 ユーティリティ、あなたは簡単にこの仕事を終えることができます。
| Kutools for Excel : 300以上の便利なExcelアドインがあり、30日以内に制限なしで無料で試すことができます. |
インストールした後 Kutools for Excel、次のようにしてください。
1。 日付ヘッダーを選択し、をクリックします クツール > 次の項目を選択します。： > 特定のセルを選択、スクリーンショットを参照してください：
2。 飛び出した 特定のセルを選択 ダイアログボックスで 列全体 から 選択タイプ、次に、次のような基準を選択します 以下 から 特定のタイプ ドロップダウンリストで、列を非表示にするテキストボックスの横に日付を入力します。スクリーンショットを参照してください。
3。 そして、 Ok ボタンをクリックすると、日付が5年16月2016日未満の特定の列が一度に選択されます。スクリーンショットを参照してください。
4。 次に、選択した列ヘッダーのいずれかを右クリックして、 隠す 必要に応じて、これらの選択した列を非表示にします。 スクリーンショットを参照してください：
今すぐExcel用の無料ダウンロードKutoolsをクリックしてください！
