sexta-feira, 5 de outubro de 2012

VBA - COMANDOS ÚTEIS

Pessoal, boa noite!

Como prometido estou postando alguns comandos úteis que podem facilitar a vida vcs com Macros e VBA, segue abaixo:



'Fecha o arquivo "NomeDoArquivo" sem salvar
Workbooks("NomeDoArquivo").Close False


'Fecha o arquivo "NomeDoArquivo" salvando
Workbooks("NomeDoArquivo").Close true


'Abre o programa "Google Chrome" (para abrir outro arquivo basta alterar o caminho)
Shell ("C:\Program Files\Google\Chrome\Application\chrome.exe")


'Abre outra planilha, no caso "Pasta1"
Workbooks.Open "C:\Users\AVELL\Desktop\Pasta1.xlsx"


'Exibir tela inteira
Application.DisplayFullScreen = True


'Abri a planilha teste localizada em “C:\” . Para abrir outra planilha basta mudar caminho e nome do arquivo
Workbooks.Open Filename:="C:\Teste.xlsm"


'Abri pasta de trabalho teste localizada na unidade C:
Shell "C:\teste"


'Salva a área de trabalho da planilha em PDF, no endereço destinado.
ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:="C:\ " & “Teste” & ".pdf"


Lembrando que cada um desses comandos precisa estar entre o "SUB e o "END SUB" ou dentro de um controle ActiveX, na guia desenvolvedor...

Forte abraço e até a próxima!

Prof. Darlan

Sem comentários:

Enviar um comentário