如何在 Excel 中获取当前时区并显示在单元格中？

你知道如何找出计算机系统设置的时区吗？在这里，我将向你展示一种在 Excel 中轻松实现的方法。

使用用户定义函数获取当前时区并显示在单元格中

使用用户定义函数获取当前时区并显示在单元格中

以下用户定义函数将帮助你在 Excel 的所需单元格中直接显示系统的当前时区。请按照以下步骤操作。

1. 按 Alt + F11 键打开 Microsoft Visual Basic for Applications 窗口。

2. 在 Microsoft Visual Basic for Applications 窗口中，点击 插入 > 模块。然后将以下 VBA 代码复制到模块窗口中。

VBA 代码：在 Excel 中获取当前时区

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. 按 Alt + Q 键退出 Microsoft Visual Basic for Applications 窗口。

4. 选择需要显示时区的单元格，输入公式：=GetTimeZoneAtPresent() 并按 Enter 键获取时区详细信息。参见截图：

使用 Kutools AI 解锁 Excel 魔法

• 智能执行：执行单元格操作、分析数据和创建图表——所有这些都由简单命令驱动。
• 自定义公式：生成量身定制的公式，优化您的工作流程。
• VBA 编码：轻松编写和实现 VBA 代码。
• 公式解释：轻松理解复杂公式。
• 文本翻译：打破电子表格中的语言障碍。

通过人工智能驱动的工具增强您的 Excel 能力。立即下载，体验前所未有的高效！