Blog Archive
-
▼
2004
(73)
-
▼
outubro
(12)
- Mover de uma célula para outra (s) com a tecla TAB...
- Apagar registos iguais numa coluna
- Limitar a visibilidade de uma ou várias folhas
- Variar a opção por defeito nas "message boxes"
- Chamar um form através de duplo clique numa célula
- Sequência de números
- Funções de Data
- Repetição de números
- Utilizar o símbolo do Euro no Excel97
- Copiar de Colunas para Linhas
- Demasiados formatos
- 1: Excel - O problema do aparecimento de: "#/DIV0!"
-
▼
outubro
(12)
About Me
Com tecnologia do Blogger.
Seguidores
Estatisticas
2004-10-29
5:01 da tarde | 
Publicada por
JRod - PORTUGAL
Nas "message boxes", o foco encontra-se, por defeito, no botão "SIM". Ora, se pretendermos mudar o foco para "NÃO" ou para "CANCELAR", então temos que recorrer a um expediente do VBA.
Exemplo:
Sub TesteMsg()
MsgBox "Tem a certeza? (Foco no SIM)", vbDefaultButton1 + vbYesNoCancel, "Opção por Defeito"
MsgBox "Tem a certeza? (Foco no NÃO)", vbDefaultButton2 + vbYesNoCancel, "Opção por Defeito"
MsgBox "Tem a certeza? (Foco no CANCELAR)", vbDefaultButton3 + vbYesNoCancel, "Opção por Defeito"
End Sub
Exemplo:
Sub TesteMsg()
MsgBox "Tem a certeza? (Foco no SIM)", vbDefaultButton1 + vbYesNoCancel, "Opção por Defeito"
MsgBox "Tem a certeza? (Foco no NÃO)", vbDefaultButton2 + vbYesNoCancel, "Opção por Defeito"
MsgBox "Tem a certeza? (Foco no CANCELAR)", vbDefaultButton3 + vbYesNoCancel, "Opção por Defeito"
End Sub
