当前位置:主页 > Office办公 > 时区

时区

如何获取当前时区并在Excel中的单元格中显示?
如何获取当前时区并在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 20180814Dim xObjIs, xObjIOn Error GoTo ERSet xObjIs = GetObject("winmgmts:\\.\root\cimv2").ExecQuery("Select * From Win32_TimeZone")If xObjIs.Count = 1 ThenFor Each xObjI In xObjIsIf Len(xObjI.Caption) > 1 ThenGetTimeZoneAtPresent = xObjI.CaptionExit FunctionElseGetTimeZoneAtPresent = "Null"Exit FunctionEnd IfNextEnd IfER:GetTimeZoneAtPresent = "Failed"End Function3。 按 其他 + Q 键退出 Microsoft Visual Basic for Applications 窗口。4。 选择显示时区所需的单元格,键入以下公式: =GetTimeZoneAtPresent() 然后按 输入 获取时区细节的关键。 查看截图:

157 次浏览