Nwlapcug.com


Funzioni case in VBA

Imparare il case funzioni di VBA così automaticamente si può capitalizzare o applicare lettere minuscole al testo invece di richiedere agli utenti del programma di farlo manualmente. Imparare l'istruzione "Select Case" per ridurre l'ingombro nel codice. La conoscenza si guadagna da queste dichiarazioni di apprendimento può aiutarvi nella scrittura di istruzioni case personalizzate, ad esempio quelle che ignora le parole come "il" e "a" per produrre lettere maiuscole corrette per titoli in un documento.

UCase

La funzione VBA UCase converte il testo del singolo argomento in tutte lettere maiuscole. Ad esempio, eseguire l'istruzione "debug. Print che UCase("Hello") si tradurrà in"HELLO". Non bisogno di un programma per provare questo, ma è possibile eseguire l'esempio appena dato dalla finestra "Immediata" di VBA. Aperto l'ambiente di programmazione VBA facendo clic sul pulsante "Visual Basic" nella scheda Developer, fare clic sull'elemento "Immediato" sotto il menu finestra di VBA. Digitare l'istruzione di "debug" appena descritto per visualizzare il testo "HELLO".

LCase

Funzione LCase di VBA converte il testo di input in tutte le lettere minuscole, che è utile se è necessario confrontare stringhe di testo con i vari casi. Ad esempio, se il programma ha una variabile "x" cui valore è "Hello" e un valore "y" il cui valore è "HELLO", quindi il confronto "x = y" Vorrei tornare "False", perché i casi non corrispondono. Il confronto "LCase(x)=LCase(y)" produrrebbe "True", tuttavia, perché l'istruzione modifica il caso di tutte le lettere per abbassare.

Select Case

La funzione Select Case sostituisce diverse se poi istruzioni. L'istruzione Select Case test una variabile, mentre le singole istruzioni Case forniscono canali per l'esecuzione del programma sulla base dei risultati di prova. Si possono avere come molti istruzioni Case come necessario. Se si desidera assicurarsi che l'istruzione Select Case cattura tutte le condizioni possibili, includere un'istruzione Case Else prima dell'istruzione End Select. Un esempio illustra come funziona il Select Case.

Public Sub testCase()

Dim età

età = InputBox ("Inserisci il tuo età.")

Selezionare età causa

Caso 13 a 19:

MsgBox "Sei un adolescente."

Cassa 20 a 29:

MsgBox "sei a vent'anni"

Caso è > = 30:

MsgBox "sei più di 30 anni."

End Select.

End Sub

Proprietà Case di parola

Linguaggio VBA di Microsoft Word ha una proprietà di tipo di funzione denominata "cassa" per applicazione titolo, frase e altri casi al testo. Per vedere questa proprietà in azione, digitare il testo minuscolo in un nuovo documento e selezionare tale testo facendo clic su esso. Fare clic su scheda "Sviluppo" di Word, quindi fare clic sul pulsante "Visual Basic" per entrare nell'ambiente di programmazione VBA. Incollare il seguente programma nella finestra centrale dell'ambiente. Questo programma utilizza proprietà case di Word per convertire il testo selezionato in primo luogo caso frase, poi con lettere iniziali maiuscole. Eseguire il programma con il tasto "F5". Il testo selezionato cambierà il caso ogni volta che si preme "Invio".

C (Sub)

MsgBox ("qui è frase caso...")

Selection.Range.Case = wdTitleSentence

MsgBox ("Press 'Enter' to see title case")

Selection.Range.Case = wdTitleWord

End Sub