Cómo comprimir Archivos Usando VBA

Cuando la programación en Microsoft Visual Basic para Aplicaciones (VBA), a veces es necesario abrir o llamar a otros programas desde dentro de Word, Excel o Access. La forma más sencilla de realizar esta tarea es a través de VBA de comandos de SHELL. Este comando inicia otro Windows o programa de línea de comando para ejecutar independiente de la Oficina del programa. Una vez que el otro se está ejecutando un programa, el programa de Office se pueden seguir para realizar otras tareas. El uso de una técnica fácil de ejecutar Winzip y de archivo de un conjunto de archivos mediante un formulario de Microsoft Access.


Cómo los Archivos Zip Utilizando VBA
Cuando la programación en Microsoft Visual Basic para Aplicaciones (VBA), a veces es necesario abrir o llamar a otros programas desde dentro de Word, Excel o Access. La forma más sencilla de realizar esta tarea es a través de VBA de comandos de SHELL. Este comando inicia otro Windows o programa de línea de comando para ejecutar independiente de la Oficina del programa. Una vez que el otro se está ejecutando un programa, el programa de Office se pueden seguir para realizar otras tareas. El uso de una técnica fácil de ejecutar Winzip y de archivo de un conjunto de archivos mediante un formulario de Microsoft Access.
Cosas Que necesitará
  • Microsoft Access 2000 o posterior

  • WinZip

  • Abrir Microsoft Access (2000 o posterior) y crear una nueva base de datos llamada ZipSample.
  • Crear un nuevo formulario independiente llamado ZipForm. Este formulario no tiene ningún tabla asociada. En su lugar, se aceptará la carpeta y el archivo zip de nombres ingresada por el usuario, a continuación, zip los archivos cuando se pulsa el botón.
  • Añadir dos cuadros de texto y un botón en el formulario.
    Nombre del primer cuadro de texto 'nombre de carpeta' y le dan el título de Carpeta':'
    Nombre del segundo cuadro de texto 'fichero zip' y le dan el título de 'el Archivo Zip:'
    Cambiar la etiqueta del botón 'Zip.'
  • haga clic Derecho en el Zip botón y seleccione BUILD seguido por el CÓDIGO. Esto abrirá la ventana de Visual Basic con un nuevo método vacío. Dentro del cuerpo del método (en la línea en blanco por encima End Sub) introduzca el código siguiente:
    SHELL '''c:/Program Files/WinZip/WinZip32'' & min-a-r '& fichero zip & '' & nombre de Carpeta & '*.*'
    Cuando se evaluó por el VBA intérprete, este código va a pasar el texto siguiente en el intérprete de comandos:
    'c:/Program Files/WinZip/WinZip32' & min & un & r zipfile.zip el nombre de la carpeta*.*
    WinZip puede funcionar con un número de parámetros de línea de comandos. En este caso, el comando está pidiendo WinZip para agregar todos los archivos en la carpeta el nombre de la carpeta para el archivo zipFile.zip. El & min argumento dice WinZip para ejecutar minimizado (en el fondo), -a indica que es para agregar archivos al archivo y & r indica que todos los archivos en subcarpetas dentro de esta carpeta también debe ser añadido. Ver la interfaz del sitio web (ver Recursos) para opciones de línea de comandos y una lista completa de los argumentos de línea de comandos.
  • Guardar y cerrar la ventana de Visual Basic, guarde el formulario a continuación, cambie a la vista formulario. El formulario aparecerá con las dos cajas de texto y un botón. Rellene el formulario y haga clic en el Zip botón para probar el formulario.

Consejos & Advertencias
  • En la interfaz de línea de comandos, las comillas son necesarias ya que la carpeta 'Archivos de Programa' contiene un espacio. La adición de dos citas juntos dentro de una VBA literal pone una cita en la cadena de texto.








Como comprimir Archivos Usando VBA


Cuando la programacion en Microsoft Visual Basic para Aplicaciones (VBA), a veces es necesario abrir o llamar a otros programas desde dentro de Word, Excel o Access. La forma mas sencilla de realizar esta tarea es a traves de VBA de comandos de SHELL. Este comando inicia otro Windows o programa de linea de comando para ejecutar independiente de la Oficina del programa. Una vez que el otro se esta ejecutando un programa, el programa de Office se pueden seguir para realizar otras tareas. El uso de una tecnica facil de ejecutar Winzip y de archivo de un conjunto de archivos mediante un formulario de Microsoft Access.


Como los Archivos Zip Utilizando VBA
Cuando la programacion en Microsoft Visual Basic para Aplicaciones (VBA), a veces es necesario abrir o llamar a otros programas desde dentro de Word, Excel o Access. La forma mas sencilla de realizar esta tarea es a traves de VBA de comandos de SHELL. Este comando inicia otro Windows o programa de linea de comando para ejecutar independiente de la Oficina del programa. Una vez que el otro se esta ejecutando un programa, el programa de Office se pueden seguir para realizar otras tareas. El uso de una tecnica facil de ejecutar Winzip y de archivo de un conjunto de archivos mediante un formulario de Microsoft Access.
Cosas Que necesitara
  • Microsoft Access 2000 o posterior

  • WinZip

  • Abrir Microsoft Access (2000 o posterior) y crear una nueva base de datos llamada ZipSample.
  • Crear un nuevo formulario independiente llamado ZipForm. Este formulario no tiene ningun tabla asociada. En su lugar, se aceptara la carpeta y el archivo zip de nombres ingresada por el usuario, a continuacion, zip los archivos cuando se pulsa el boton.
  • Añadir dos cuadros de texto y un boton en el formulario.
    Nombre del primer cuadro de texto 'nombre de carpeta' y le dan el titulo de Carpeta':'
    Nombre del segundo cuadro de texto 'fichero zip' y le dan el titulo de 'el Archivo Zip:'
    Cambiar la etiqueta del boton 'Zip.'
  • haga clic Derecho en el Zip boton y seleccione BUILD seguido por el CODIGO. Esto abrira la ventana de Visual Basic con un nuevo metodo vacio. Dentro del cuerpo del metodo (en la linea en blanco por encima End Sub) introduzca el codigo siguiente:
    SHELL '''c:/Program Files/WinZip/WinZip32'' & min-a-r '& fichero zip & '' & nombre de Carpeta & '*.*'
    Cuando se evaluo por el VBA interprete, este codigo va a pasar el texto siguiente en el interprete de comandos:
    'c:/Program Files/WinZip/WinZip32' & min & un & r zipfile.zip el nombre de la carpeta*.*
    WinZip puede funcionar con un numero de parametros de linea de comandos. En este caso, el comando esta pidiendo WinZip para agregar todos los archivos en la carpeta el nombre de la carpeta para el archivo zipFile.zip. El & min argumento dice WinZip para ejecutar minimizado (en el fondo), -a indica que es para agregar archivos al archivo y & r indica que todos los archivos en subcarpetas dentro de esta carpeta tambien debe ser añadido. Ver la interfaz del sitio web (ver Recursos) para opciones de linea de comandos y una lista completa de los argumentos de linea de comandos.
  • Guardar y cerrar la ventana de Visual Basic, guarde el formulario a continuacion, cambie a la vista formulario. El formulario aparecera con las dos cajas de texto y un boton. Rellene el formulario y haga clic en el Zip boton para probar el formulario.

Consejos & Advertencias
  • En la interfaz de linea de comandos, las comillas son necesarias ya que la carpeta 'Archivos de Programa' contiene un espacio. La adicion de dos citas juntos dentro de una VBA literal pone una cita en la cadena de texto.

Cómo comprimir Archivos Usando VBA

Cuando la programación en Microsoft Visual Basic para Aplicaciones (VBA), a veces es necesario abrir o llamar a otros programas desde dentro de Word, Excel o Access. La forma más sencilla de realizar esta tarea es a través de VBA de comandos de SHELL. Este comando inicia otro Windows o programa de línea de comando para ejecutar independiente de la Oficina del programa. Una vez que el otro se está ejecutando un programa, el programa de Office se pueden seguir para realizar otras tareas. El uso de una técnica fácil de ejecutar Winzip y de archivo de un conjunto de archivos mediante un formulario de Microsoft Access.
Recommander aux amis
  • gplus
  • pinterest

Comentario

Dejar un comentario

Clasificación