¿Cómo obtener la zona horaria actual y mostrarla en una celda en Excel?
¿Sabes cómo averiguar a qué zona horaria está configurado el sistema en tu computadora? Aquí te mostraré una manera fácil de hacerlo en Excel.
Obtener la zona horaria actual y mostrarla en una celda con una función definida por el usuario
Obtener la zona horaria actual y mostrarla en una celda con una función definida por el usuario
La siguiente función definida por el usuario te ayudará a mostrar directamente la zona horaria actual del sistema en las celdas necesarias en Excel. Por favor, sigue los siguientes pasos.
1. Presiona las teclas Alt + F11 para abrir la ventana de Microsoft Visual Basic for Applications.
2. En la ventana de Microsoft Visual Basic for Applications, haz clic en Insertar > Módulo. Luego copia el siguiente código VBA en la ventana del Módulo.
Código VBA: Obtener la zona horaria actual en 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. Presiona las teclas Alt + Q para salir de la ventana de Microsoft Visual Basic for Applications.
4. Selecciona una celda donde necesitas mostrar la zona horaria, escribe esta fórmula: =GetTimeZoneAtPresent() y presiona la tecla Intro para obtener el detalle de la zona horaria. Ver captura de pantalla:

Descubre la Magia de Excel con Kutools AI
- Ejecución Inteligente: Realiza operaciones en celdas, analiza datos y crea gráficos, todo impulsado por comandos simples.
- Fórmulas Personalizadas: Genera fórmulas adaptadas para optimizar tus flujos de trabajo.
- Codificación VBA: Escribe e implementa código VBA sin esfuerzo.
- Interpretación de Fórmulas: Comprende fórmulas complejas con facilidad.
- Traducción de Texto: Supera las barreras del idioma dentro de tus hojas de cálculo.
Las mejores herramientas de productividad para Office
Potencia tus habilidades en Excel con Kutools para Excel y experimenta una eficiencia sin precedentes. Kutools para Excel ofrece más de300 funciones avanzadas para aumentar la productividad y ahorrar tiempo. Haz clic aquí para obtener la función que más necesitas...
Office Tab lleva la interfaz de pestañas a Office y facilita mucho tu trabajo
- Habilita la edición y lectura con pestañas en Word, Excel, PowerPoint, Publisher, Access, Visio y Project.
- Abre y crea varios documentos en nuevas pestañas de la misma ventana, en lugar de nuevas ventanas.
- ¡Aumenta tu productividad en un50% y reduce cientos de clics de ratón cada día!