怎么获取当前时区并在Excel中的单元格中显示?

您知道如何找出系统在您的计算机中设置的时区吗? 在这里,我将向您展示一种简单的方法来在Excel中实现它 。
获取当前时区并在具有用户定义功能的单元格中显示
以下用户定义的函数将帮助您直接在Excel中的所需单元格中显示系统的当前时区 。请做如下 。
1 。按 其他 + 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 。按 其他 + Q 键退出 Microsoft Visual Basic for Applications 窗口 。
【怎么获取当前时区并在Excel中的单元格中显示?】4 。选择显示时区所需的单元格,键入以下公式: =GetTimeZoneAtPresent() 然后按 输入 获取时区细节的关键 。查看截图:

    推荐阅读