VBA Aplicada a Eventos
Por: Nair Pereira Silva • 2/4/2015 • Projeto de pesquisa • 525 Palavras (3 Páginas) • 425 Visualizações
Macro
[pic 1]
Convertendo macros em VBA
[pic 2]
[pic 3]
Janela do VBA
[pic 4]
Obs - Modulo de classe serve somente para formulários e relatórios.
Modulo padrão – para o banco de dados inteiro.
Acionando Janela de propriedades
[pic 5]
Acessando VBA
[pic 6]
Ou atalhos - ALT + F11
Codificando.
Renomeando um módulo
[pic 7][pic 8][pic 9]
Option Compare Database
Compara todos os caracteres digitados com o banco de dados o windowns.
Facilita na digitação em reconhecer caracteres.
No VBA
Sub teste_01() ' esta é uma rotina sub-rotina de VBA
'comentário inicial do meu VBA
Call teste_02
MsgBox " Voltando a Executar o teste_01" _
& Chr(13) & " linha de baixo"
End Sub
Sub é utilizada para informar qual é um procedimento Ex: Procedimento_01()
End Sub – Finaliza o procedimento
‘ apóstrofe é comentário no VBA
Call = Chamar – responsável por chamar outra função.
No VBA toda a linha de comando deve estar na mesma linha , mas para evitar esse problema de linhas de códigos enormes utilizar espaço_ ele reconhece que a linha de baixo faz parte do comando.
& - concatenador , geralmente o VBA apresenta possíveis erros com os concatenadores , para evitar erros na linha de código deve-se incluir espaço$ espaço , isso corrige.
Comando para pular de linhas dentro de uma caixa de texto.
VbCrLf
VbLF
Chr(13)
Exemplos de como utilizar informações
'Exemplos de como utilizar as informações
MsgBox " Hoje é domingo"
MsgBox 12346
MsgBox 123.456 'Usar ponto para decimal
MsgBox #12/25/2009# 'uSAR MM/DD/AA
MsgBox #3:15:00 PM#
MsgBox (((2 + 3) - 4) / 5) * 6
MsgBox Date
MsgBox Time()
MsgBox "Data:" & Date & _
vbLf & "Horario:" & Time()
Formatações
Obs(A primeira instrução é o que eu quero formatar a 2ª é de qual maneira.[pic 10][pic 11]
MsgBox Format(Time, "short time")
MsgBox Format(Time, "long time")
MsgBox Format(Date, "short date")
MsgBox Format(Date, "ddd/mmmm/yyyy")
MsgBox Format(53459.45698, "#,###.00")
MsgBox Format(11.75, "000.000")
MsgBox Format(0.0005, "0.00%")
MsgBox Format("OLA", "<")
MsgBox Format("Isto e tudo", ">")
End Sub
Metodo – è uma ação
Propriedade - Algo do
Executa comandos
Comando , Ação , Modo de exibição , , , modo de segurança , abertura da janela[pic 12][pic 13][pic 14][pic 15][pic 16]
DoCmd.OpenForm "frmpadraocidades", acNormal, , , acFormReadOnly, acDialog
DoCmd.OpenReport "rprpadraopedidos", acViewPreview, , , acDialog
DoCmd.OpenRunSQL "insert into tblcidades(cidade,uf,pais) values('moscou','gg','Rússia')"
End Sub
Esse código informa o nome do formulário aberto. A definição do nome é de acordo com a ordem de abertura dos formulários
Abri o formulário X - o nome dele é 0 ... abri formulário X2 – o Nome dele é 1
...