Ao programar em Microsoft Office Visual Basic for Applications (VBA), às vezes é necessário para abrir ou chamar outros programas de dentro do Word, Excel ou Access. A maneira mais fácil de executar esta tarefa é através do comando VBA SHELL. Este comando lança mais um programa de linha de Windows ou de comando para executar independente do programa Office. Uma vez que o outro programa está em execução, o programa do Office pode continuar a executar outras tarefas. Use uma técnica fácil de executar Winzip e arquivar um conjunto de arquivos usando um formulário do Microsoft Access.
Coisas que você precisa
- Microsoft Access 2000 ou posterior
- WinZip
Abra o Microsoft Access (2000 ou posterior) e criar um novo banco de dados chamado ZipSample.
Criar um novo formulário independente chamado ZipForm. Esta forma não tem tabela associada a ele. Em vez disso, ele irá aceitar pastas e arquivos zip nomes digitados pelo usuário, em seguida, fechar os arquivos quando o botão é clicado.
Adicione duas caixas de texto e um botão no formulário.
Nome caixa de o primeiro texto "nome da pasta" e dar-lhe a legenda "Pasta:"
Nome segunda caixa de texto "Arquivo ZIP" e dar-lhe a legenda "Arquivo ZIP:"
Altere o rótulo no botão para "Fecho eclair."
Botão direito do mouse sobre o botão Zip e escolha Construir seguido pelo código. Isto irá abrir a janela de Visual Basic com um novo método vazio. Dentro do corpo do método (na linha em branco acima End Sub) insira o seguinte código:
CONCHA """c: Program Files WinZip winzip32"" --min --a -r " & Arquivo ZIP & " " & Nome da pasta & "*. *"
Quando avaliada pelo intérprete VBA, este código vai passar o seguinte texto para o interpretador de comandos:
"c: Program Files WinZip winzip32" --min --a -R zipfile.zip folderName *. *
WinZip pode ser executado com um número de parâmetros de linha de comando. Neste caso, o comando está pedindo WinZip para adicionar todos os arquivos na pasta folderName ao arquivo zipFile.zip. O argumento --min diz WinZip para executar minimizado (no fundo), -a indica que é para adicionar arquivos ao arquivo e -R indica que todos os arquivos em subpastas dentro dessa pasta também deve ser adicionado. Consulte o site da WinZip (consulte Recursos) para as opções de linha de comando e uma lista completa de argumentos de linha de comando.
Salvar e fechar a janela do Visual Basic, salvar o formulário, em seguida, mudar para o modo de formulário. A forma aparecerá com as duas caixas de texto e um botão. Preencha o formulário e clique no botão Zip para testar o formulário.
dicas & avisos
- Na linha de comando WinZip, as aspas são necessárias uma vez que a pasta "Arquivos de Programas" contém um espaço. Adicionando duas citações em conjunto dentro de um VBA coloca literais uma citação na seqüência de texto.
Como executar um arquivo jar
Como arquivar documentos do Word
Como executar arquivos exe em cmd
Como adicionar caracteres para mugen
Como executar o windows script host
Como programar um "salvar como" botão no excel vba