Cum se convertesc litere mici în litere mari pentru câteva coloane folosind VBA în Microsoft Excel
În acest articol vom învăța cum să convertim textul în litere mari în coloane specifice (nu în toate celulele) folosind codul VBA.
Întrebare): Vreau cod care să înlocuiască textul introdus cu litere mici cu majuscule în unele coloane (nu toate).
Spuneți că nu vreau ca codul să ruleze pe coloanele 4, 6, 9, 12 și 13, adică dacă este introdus un text în aceste coloane, atunci codul nu va fi declanșat.
Pentru a obține litere mari în timp ce introduceți litere mici; trebuie să urmăm pașii de mai jos pentru a lansa editorul VB
- Faceți clic pe fila Dezvoltator
- Din grupul de coduri, selectați Visual Basic
Copiați următorul cod în modulul Foaie
Foaie de lucru privată sub schimbare (ByVal Target As Excel.Range)
Dacă Target.Column = 4 Sau Target.Column = 6 Sau Target.Column = 9 _
Sau Target.Column = 12 Sau Target.Column = 13 Apoi ieșiți din Sub
On Error GoTo ErrHandler
Application.EnableEvents = Fals
Target.Formula = UCase (Target.Formula)
ErrHandler:
Application.EnableEvents = Adevărat
Sfârșitul Sub
- Codul va funcționa în foaia 1 numai pe măsură ce codul este introdus în foaia1
- Codul va înlocui automat litera mică tastată din greșeală sau în ignoranță imediat cu litere mari în toate coloanele, cu excepția 4, 6, 9, 12 și 13.
În acest fel, putem converti textul în majuscule în coloane specifice folosind codul VBA.
Descărcare - Cum se convertesc literele mici în litere mari - xlsm