How to get current time zone and display in cell in Excel?
Do you know how to find out what time zone a system is set to in your computer? Here I will show you an easy way to get it down in Excel.
- Reuse Anything: Add the most used or complex formulas, charts and anything else to your favorites, and quickly reuse them in the future.
- More than 20 text features: Extract Number from Text String; Extract or Remove Part of Texts; Convert Numbers and Currencies to English Words.
- Merge Tools: Multiple Workbooks and Sheets into One; Merge Multiple Cells/Rows/Columns Without Losing Data; Merge Duplicate Rows and Sum.
- Split Tools: Split Data into Multiple Sheets Based on Value; One Workbook to Multiple Excel, PDF or CSV Files; One Column to Multiple Columns.
- Paste Skipping Hidden/Filtered Rows; Count And Sum by Background Color; Send Personalized Emails to Multiple Recipients in Bulk.
- Super Filter: Create advanced filter schemes and apply to any sheets; Sort by week, day, frequency and more; Filter by bold, formulas, comment...
- More than 300 powerful features; Works with Office 2007-2019 and 365; Supports all languages; Easy deploying in your enterprise or organization.
The following user-defined function will help you to display the current time zone of system directly in needed cells in Excel. Please do as follows.
1. Press the Alt + F11 keys to open the Microsoft Visual Basic for Applications window.
2. In the Microsoft Visual Basic for Applications window, click Insert > Module. Then copy below VBA code into the Module window.
VBA code: Get current time zone in 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. Press the Alt + Q keys to exit the Microsoft Visual Basic for Applications window.
4. Select a cell you need to display the time zone, type this formula: =GetTimeZoneAtPresent() and press the Enter key to get the time zone detail. See screenshot:
You are guest
or post as a guest, but your post won't be published automatically.
- To post as a guest, your comment is unpublished.· 1 years agoThis worked brilliantly. I'm writing an IF statement off of this though. Do you have a list of the values that this formula could potentially display?