Computación y electrónica

Cómo cambiar una fecha modificada en Excel VBA

Escrito por jim campbell | Traducido por pau epel
Cómo cambiar una fecha modificada en Excel VBA

El lenguaje de programación VBA te permite personalizar y optimizar muchas de las funciones de Microsoft Excel.

Stockbyte/Stockbyte/Getty Images

El lenguaje de programación VBA de Excel permite manipular el momento en que un archivo fue creado y modificado. Este proceso es útil cuando deseas manipular de manera programada fechas de archivos para deshacer los cambios o configurar un proceso manual que guarda registro de los cambios realizados a un archivo de Excel, y la fecha en que estos cambios se realizaron.

Nivel de dificultad:
Moderada

Otras personas están leyendo

Instrucciones

  1. 1

    Abre el programa de Excel desde el menú de programa de Windows, y abre el archivo que deseas usar para editar la fecha. Haz clic en la pestaña o cinta "Desarrollador" y haz clic en el botón VBA para que aparezca tu archivo de código VBA.

  2. 2

    Crea las variables VBA. Necesitas establecer las variables para el atributo de archivo "Modified Date" y la fecha que deseas usar para esta modificación. El siguiente código configura tus variables: Dim file As String Dim results As Boolean Dim newdate As Double Dim modified As FileDateToProcess

  3. 3

    Establece el nombre de archivo. Debes usar la variable "file" para configurar el nombre de archivo. El siguiente código establece la cadena de nombre de archivo: file = "myfile.xls" Reemplaza "myfile.xls" con cualquier nombre de archivo que desees modificar.

  4. 4

    Cambia la fecha modificada para el archivo. Para esto, usarás la función "SetFileDateTime" de Excel VBA para editar la fecha modificada. El siguiente código cambia la fecha a "1/1/2011". newdate = "1/1/2011" results = SetFileDateTime(FileName:=file, FileDateTime:=newdaate, WhichDateToChange:=modified, NoGMTConvert:=False)

  5. 5

    Muestra un mensaje de éxito al usuario después de modificar la fecha. El siguiente código determina si se encontraron errores y muestra el mensaje de éxito: If results = True Then Debug.Print "Archivo exitosamente modificado". End If

Más galerías de fotos

comentarios

Filtrar por:
  • Mostrar todos
  • Artículos
  • Galerías de fotos
  • Videos
Ordenar:
  • Más relevante
  • Más popular
  • Más reciente

No se encuentran artículos disponibles

No se encuentran slideshows disponibles

No se encuentran videos disponibles

Copyright © 1999-2014 Demand Media, Inc. Acerca de

El uso de este sitio constituye la aceptación de los términos y política de privacidad de eHow. Ad Choices es-US

Demand Media