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

Excel函数 2023-01-13

您知道如何找出系统在您的计算机中设置的时区吗？在这里，我将向您展示一种简单的方法来在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 窗口。

4。选择显示时区所需的单元格，键入以下公式： =GetTimeZoneAtPresent() 然后按输入获取时区细节的关键。查看截图：

上一篇：利用excel宏命令完成财务指标的计算下一篇：excel VBA标识符

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

热门文章

最新文章

标签列表