Saiba as funções de caso de VBA para que você possa capitalizar ou aplicar minúsculas ao texto em vez de exigir que os usuários do seu programa para fazê-lo manualmente automaticamente. Aprenda a declaração " Select Case " para reduzir a desordem em seu código. O conhecimento que você ganha de aprender essas afirmações podem ajudá-lo , por escrito, instruções case personalizado , tais como aqueles que ignorar palavras como "o" e "a" para a produção correta de capitalização para títulos em um documento . UCase
A função VBA UCase converte o texto de seu único argumento para todas as letras maiúsculas . Por exemplo, executar a instrução " debug.print UCase ( " Olá " ) resultará em " OLÁ ". Você não precisa de um programa para tentar isso, mas você pode executar o exemplo dado do VBA " janela imediata " . Abra o ambiente de programação Visual Basic for Applications , clicando no botão " Visual Basic ", na guia Desenvolvedor, clique no item " imediata" no menu Janela do VBA. Digite a instrução " debug" que acabamos de descrever para ver o " OLÁ " text aparecer.
função LCase
LCase
do VBA converte texto de entrada para todas as letras minúsculas , o que é útil se você precisa comparar cadeias de texto com casos diferentes. Por exemplo, se o seu programa tem uma variável "x ", cujo valor é " Olá " e um valor "y ", cujo valor é " OLÁ ", então a comparação "x = y " retornaria "Falso ", porque os casos não são iguais. a comparação " LCase (x) = LCase (y) " renderia " Verdade ", no entanto , porque a instrução muda o caso de todas as cartas para baixar .
Select Case
a Selecione a função caso substitui vários se então declarações. a declaração Select Case testa uma variável, enquanto as demonstrações de casos individuais fornecer canais para a execução do programa com base nos resultados do teste. você pode ter quantas instruções Case , conforme necessário. Se você quiser ter certeza que a Select instrução Case pega todas as condições possíveis , incluem um Case Else declaração antes da instrução End Select . um exemplo ilustra como funciona Select Case .
Public Sub testCase ()
Dim idade
idade = InputBox ( "Digite sua idade ").
Select Case idade
processo 13 a 19:
MsgBox " . Você é um adolescente "
Caso 20 a 29 :
MsgBox "Você está em seus vinte anos "
Case Is > = 30 :
MsgBox "Você é mais 30. "linguagem VBA Caso propriedade
End Select End Sub
Palavra
da Microsoft Word tem uma propriedade na forma de função chamado "caso" para a aplicação de título, frase e outros casos de texto. para ver esta propriedade em ação, digite algum texto lowercase em um novo documento e selecione o texto , clique duas vezes nele . Clique na aba da Palavra "Developer" , então clique no botão " Visual Basic " para entrar no ambiente de programação Visual Basic for Applications . cole o seguinte programa para a janela central do ambiente. Este programa usa a propriedade caso do Word para converter o texto selecionado pela primeira vez para sentenciar caso, em seguida, para caso de título . Execute o programa pressionando " F5 ". O texto selecionado será alterado caso, cada vez que você pressionar " Enter".
Sub c ()
MsgBox (" Aqui é caso frase ... " )
Selection.Range.Case = wdTitleSentence
MsgBox (" Pressione ' Enter' para ver caso de título " )
Selection.Range.Case = wdTitleWord
End Sub