Don tiene una computadora que tiene acceso a varios servidores diferentes a través de la red de su oficina. Estos servidores no tienen sus relojes sincronizados, y Don se preguntaba si había una forma, en VBA, de determinar la discrepancia de tiempo entre un servidor dado y su máquina.

Para averiguar la discrepancia de tiempo, deberá calcular dos tiempos, uno en su máquina y otro en el servidor, y luego compararlos. Conseguir el tiempo en su propia máquina es bastante fácil; solo use la función Time en VBA. Obtener el tiempo en otra máquina es más difícil, ya que no hay una función incorporada que facilite esta tarea.

Sin embargo, puede utilizar una llamada a la función API para determinar la hora en un servidor remoto. Exactamente cómo desarrollarías una llamada de función de este tipo está más allá del alcance de este consejo, pero puedes encontrar un tutorial bastante bueno en línea para realizar la tarea:

http://www.mvps.org/access/api/api0039.htm

Eche un vistazo a la página y podrá adaptar el código a sus necesidades.

La función fGetServerTime devuelve una cadena que contiene la fecha y la hora completas. A continuación, puede utilizar la función TimeValue en su macro para convertir esta cadena en un valor de tiempo nativo de Excel. Una vez convertido, puede comparar el valor con la hora del sistema interno para determinar la discrepancia que necesita.

ExcelTips es su fuente de formación rentable en Microsoft Excel.

Este consejo (9268) se aplica a Microsoft Excel 2007, 2010, 2013, 2016, 2019 y Excel en Office 365. Puede encontrar una versión de este consejo para la interfaz de menú anterior de Excel aquí:

link: / excel-Calculating_Time_Differences_between_Two_Machines [Cálculo de diferencias de tiempo entre dos máquinas].