Wie kann Excel automatisch zur markierten Zelle wechseln?

Wie kann Excel automatisch zur markierten Zelle wechseln?

Ich habe mit der Gantt-Diagrammvorlage herumgespielt und einige Inhalte bearbeitet. Einer der Nachteile, die mir aufgefallen sind, ist, dass, wenn ich das Datum in Zelle „E4“ ändere, die Zelle im linken Bereich hervorgehoben, aber nicht automatisch verschoben wird.

Wenn ich das Datum auf den 02.02.2017 ändere, wird die Datumsspalte hervorgehoben, aber ich muss manuell zu diesem Datum scrollen.

Frage: Gibt es eine Möglichkeit, dass Excel das Blatt automatisch zum ausgewählten Datum verschieben kann?

Gantt-Diagramm

Antwort1

Sie können Worksheet_Change()hierfür ein Ereignis verwenden. ImArbeitsblattSie möchten, dass dies ausgeführt wird, fügen Sie diesen Code hinzu. (Klicken Sie mit der rechten Maustaste auf die Registerkarte des Arbeitsblatts und gehen Sie zu „Code anzeigen“):

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

Hinweis: Passen Sie den Wert Set dateCell = Range([this range])so an, dass er dem Datumsbereich entspricht, zu dem Sie nach der Datumseingabe „springen“ möchten.

verwandte Informationen