|
Apprenez les cas des fonctions de VBA afin que vous puissiez profiter automatiquement ou appliquer minuscules le texte au lieu d'obliger les utilisateurs de votre programme de le faire manuellement . Apprenez l'instruction " Select Case " pour réduire l'encombrement dans votre code. Les connaissances acquises à partir de l'apprentissage de ces déclarations peut vous aider à écrire des déclarations de cas personnalisés, tels que ceux qui ignorent les mots comme «le» et «a» pour produire correct capitalisation de titres dans un document. UCase
La fonction UCase VBA convertit le texte de son seul argument en majuscules . Par exemple, exécutant l'instruction " debug.print UCase ( " bonjour " ) se traduira par " BONJOUR ". Vous n'avez pas besoin d'un programme d'essayer , mais vous pouvez exécuter l' exemple donné de la VBA " fenêtre d'exécution " . Ouvrez l'environnement de programmation VBA en cliquant sur le bouton " Visual Basic " de l'onglet développeur, puis cliquez sur la rubrique « immédiate» sous le menu Fenêtre de VBA. tapez l'instruction "debug" vient d'être décrit pour voir le texte " BONJOUR " apparaissent .
la fonction de LCase de
LCase
VBA convertit le texte d'entrée en minuscules , ce qui est utile si vous avez besoin de comparer des chaînes de texte avec les différents cas. par exemple, si votre programme est une variable «x» dont la valeur est "Bonjour" et une valeur "y" dont la valeur est " BONJOUR ", puis la comparaison "x = y " reviendrait "False" parce que les cas ne correspondent pas. l' comparaison " LCase (x) = LCase (y) " donnerait " vraie ", cependant , parce que l' instruction modifie le cas de toutes les lettres pour faire baisser .
Select Case
Sélectionner la fonction de cas remplace plusieurs cas alors déclarations. l' instruction Select Case teste une variable , alors que les déclarations de cas individuels fournir des moyens de l'exécution du programme sur la base des résultats du test. vous pouvez avoir autant de déclarations de cas en fonction des besoins . Si vous voulez être sûr que l' instruction Select Case intercepte toutes les conditions possibles , inclure une instruction Case Else avant l'instruction Select End. un exemple illustre comment fonctionne Select Case .
public Sub testCase ()
âge Dim
< p> age = InputBox (" S'il vous plaît entrer votre âge. " )
Select age of Case Case 13 à 19:
MsgBox " Vous êtes un adolescent . "
Case 20 à 29:
MsgBox " Vous êtes dans la vingtaine "
Case Is > = 30 :
MsgBox " Vous avez dépassé 30. "
End Select langage VBA de Case propriété
Microsoft Word de
End Sub
Parole a une fonction semblable à la propriété appelé «l'affaire» pour l'application de titre , une phrase et d'autres cas au texte . pour voir cette propriété en action , tapez du texte en minuscules dans un nouveau document , et sélectionner ce texte en double -cliquant dessus. Cliquez sur l'onglet "Developer " de Word, puis cliquez sur le bouton " Visual Basic " pour entrer dans l'environnement de programmation VBA. Collez le programme suivant dans la fenêtre centrale de l'environnement. Ce programme utilise la propriété de cas de Word pour convertir le texte sélectionné d'abord à cause de la phrase, puis à la casse du titre . Exécutez le programme en appuyant sur "F5 . « Le texte que vous avez sélectionné changera cas, chaque fois que vous appuyez sur "Entrée".
sous c ()
MsgBox (" Voici cas de condamnation ...»)
Selection.Range.Case = wdTitleSentence
MsgBox (" Appuyez sur ' Entrée' pour voir le cas de titre" )
Selection.Range.Case = wdTitleWord
End Sub Photos
|
