☰

Excelでハイライトされたセルに自動的に移動する方法

tag-icon • tag-icon microsoft-excel worksheet-function charts
Excelでハイライトされたセルに自動的に移動する方法

ガントチャートのテンプレートをいろいろ試して、いくつかの内容を編集しました。私が気づいた欠点の 1 つは、セル「E4」の日付を変更すると、左側のセクションのセルが強調表示されますが、自動的に移動されないことです。

日付を 2017 年 2 月 2 日に変更すると、日付列が強調表示されますが、その日付まで手動でスクロールする必要があります。

質問: Excel でシートを選択した日付に自動的に移動する方法はありますか?

ガントチャート

答え1

イベントを使ってこれを行うことができますWorksheet_Change()。ワークシートこれを実行したい場合は、次のコードを追加します。(ワークシート タブを右クリックし、[コードの表示] に移動します)。

Private Sub Worksheet_Change(ByVal Target As Range)
Dim dateCell As Range

If Target.Address = "$E$4" Then
    Set dateCell = Range("A49:A50").Find(what:=Target.Value)
    If dateCell Is Nothing Then
        MsgBox ("Date not found")
    Else
        dateCell.Select
    End If
End If
End Sub

注:Set dateCell = Range([this range])日付を入力した後に、「ジャンプ」する日付の範囲に調整します。

関連情報