Wie erhält man die aktuelle Zeitzone und zeigt sie in einer Zelle in Excel an?

Wissen Sie, wie man herausfindet, auf welche Zeitzone Ihr Computer eingestellt ist? Hier zeige ich Ihnen eine einfache Möglichkeit, dies in Excel zu erledigen.

Aktuelle Zeitzone mit benutzerdefinierter Funktion abrufen und in Zelle anzeigen

Aktuelle Zeitzone mit benutzerdefinierter Funktion abrufen und in Zelle anzeigen

Die folgende benutzerdefinierte Funktion hilft Ihnen, die aktuelle Systemzeitzone direkt in den gewünschten Zellen in Excel anzuzeigen. Bitte gehen Sie wie folgt vor.

1. Drücken Sie die Tasten Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie im Fenster Microsoft Visual Basic for Applications auf Einfügen > Modul. Kopieren Sie dann den folgenden VBA-Code in das Modulfenster.

VBA-Code: Aktuelle Zeitzone in Excel abrufen

Function GetTimeZoneAtPresent() As String
'Updated by Extendoffice 20180814
    Dim xObjIs, xObjI
On Error GoTo ER
    Set xObjIs = GetObject("winmgmts:\\.\root\cimv2").ExecQuery("Select * From Win32_TimeZone")
    If xObjIs.Count = 1 Then
        For Each xObjI In xObjIs
            If Len(xObjI.Caption) > 1 Then
                GetTimeZoneAtPresent = xObjI.Caption
                Exit Function
            Else
                GetTimeZoneAtPresent = "Null"
                Exit Function
            End If
        Next
    End If
ER:
    GetTimeZoneAtPresent = "Failed"
End Function

3. Drücken Sie die Tasten Alt + Q, um das Fenster Microsoft Visual Basic for Applications zu schließen.

4. Wählen Sie eine Zelle aus, in der Sie die Zeitzone anzeigen möchten, geben Sie diese Formel ein: =GetTimeZoneAtPresent() und drücken Sie die Eingabetaste, um die Details der Zeitzone zu erhalten. Siehe Screenshot:

Entfesseln Sie die Magie von Excel mit Kutools AI

• Intelligente Ausführung: Führen Sie Zellenoperationen durch, analysieren Sie Daten und erstellen Sie Diagramme – alles angetrieben durch einfache Befehle.
• Benutzerdefinierte Formeln: Erstellen Sie maßgeschneiderte Formeln, um Ihre Arbeitsabläufe zu optimieren.
• VBA-Codierung: Schreiben und implementieren Sie VBA-Code mühelos.
• Formelinterpretation: Verstehen Sie komplexe Formeln mit Leichtigkeit.
• Textübersetzung: Überwinden Sie Sprachbarrieren in Ihren Tabellen.

Erweitern Sie Ihre Excel-Fähigkeiten mit KI-gestützten Tools. Laden Sie jetzt herunter und erleben Sie eine Effizienz wie nie zuvor!