Cómo hacer una copia de seguridad de sus datos de lotería de Excel usando VBA

0
8

Si ha estado trabajando con archivos de Excel en la investigación de lotería, debe saber qué tan importante es respaldar sus archivos. Si bien Excel tiene sus propias herramientas para guardar su trabajo, tiene sentido controlar sus propios datos.

Este artículo muestra cómo puede automatizar el proceso de guardar su trabajo, cada vez que se abre el archivo.

Ejecutar el código VBA siempre que se abra el archivo de Excel

Deberá hacer dos cosas para crear el módulo de copia de seguridad “configurar y olvidar”.

  • Escriba un procedimiento de inicio de VBA en la sección “Libro de trabajo” del módulo de código
  • Complete el código en un módulo estándar para copiar y cambiar el nombre del archivo

El procedimiento de inicio es simplemente un script VBA de una línea que se ejecuta cada vez que se abre el archivo Excel. Es importante que el código se coloque en la sección “Este libro de trabajo” del entorno de codificación VBA.

  Sub workbook_open () 
archivo de respaldo
End Sub

El código indica a VBA que ejecute el módulo “backUpFile” cada vez que se abra el libro de trabajo.

Copiar y guardar el libro de trabajo actual con VBA

El programa “backUpFile” define un nuevo nombre para el archivo y lo guarda en la misma carpeta. El nombre que le dé al nuevo archivo depende de cómo estructure su trabajo. Por ejemplo:

  • Usar la fecha actual en la estructura de nombres.
  • Un prefijo genérico de “copia de seguridad” delante del nombre del archivo actual

Primero definiremos los nombres de archivo antiguos y nuevos. En este caso, optamos por un período de nomenclatura simple y solo colocamos la cadena “backUp” delante del nombre del archivo existente.

  Sub backUpFile () 
Dim fs como objeto
f1 = ActiveWorkbook.Path & " myFile.xls"
f2 = ActiveWorkbook.Path & " backUpMyFile.xls"

Ahora podemos ejecutar el código para copiar el archivo.

  Establecer fs = CreateObject ("Scripting.FileSystemObject") 
Copiar archivo f1, f2
Set fs = Nada
final sub

Desarrollo adicional del módulo de respaldo VBA

Si necesita más complejidad en el nombre de la copia de seguridad, puede agregar la fecha actual como parte de la estructura de nombres.

  meses = división (", enero, febrero, marzo, abril, mayo, junio, agosto, agosto, septiembre, noviembre, diciembre", ",") 
dte = Día (ahora) y meses (mes (ahora)) y año (ahora)
dte = Hora (Ahora) & "_" & Minuto (Ahora) & "_" & dte

dte = dte & "myFile.xls"

En el ejemplo anterior, la estructura del nuevo nombre de archivo ahora se parece a esto:

  9_1_29Apr2014myFile.xls 

Este régimen de nombres anterior podría ser útil si está abriendo y cerrando el archivo a lo largo del día.

En algún momento, los archivos de copia de seguridad pueden llegar a ser demasiado numerosos y es posible que deba eliminar algunos de ellos. Por supuesto, siempre puedes usar el código VBA para borrar archivos también.

Resumen

Este artículo ha resaltado la importancia de realizar copias de seguridad de sus archivos de lotería y cómo unas pocas líneas de código VBA pueden guardar datos importantes. Si bien las copias de seguridad de los datos pueden no ayudarle a ganar lotto, hace que su trabajo sea más profesional y, por lo tanto, más probable que sea un éxito.

Dejar respuesta

Please enter your comment!
Please enter your name here