Automatski prisilite pravilno, veliko ili malo slovo - primjeri VBA koda

Trebate li automatski promijeniti tekst ćelije u Pravilno, Gornje ili Malo slovo nakon što ga korisnik unese? Postoji više načina da se to postigne, a mogući su i brojni zahtjevi. Evo primjera koji automatski mijenja sve nakon što se unese u određeni stupac. Nadam se da možete graditi iz ovog primjera!

1. Pritisnite ALT i F11 da otvorite kodni prozor

2. Dvaput kliknite naziv lista koji želite automatski

promijeniti slučaj

3. Stavite ovaj kôd u prozor koda:

Promijenite tekst u ispravna slova

Kod za Ispravan slučaj

Privatni pod -radni list_Promijeni (ByVal cilj kao Excel.Range) Application.EnableEvents = False If Target.Column = 5 Tada Target = StrConv (Target, vbProperCase) End If Application.EnableEvents = True End Sub

Promijenite tekst u velika slova

Za Velika slova možete promijeniti

StrConv (Target, vbProperCase)

do

Ucase (meta)

Promijenite tekst u mala slova

Za Mala slova možete promijeniti

StrConv (Target, vbProperCase)

do

Lcase (meta)