Spisie treści
Czy po wprowadzeniu przez użytkownika musisz automatycznie zmienić tekst komórki na Właściwy, Wielki lub Mały? Jest wiele sposobów na osiągnięcie tego i wiele wymagań jest możliwych. Oto przykład, który automatycznie zmienia wszystko po wprowadzeniu do określonej kolumny. Mam nadzieję, że możesz zbudować z tego przykładu!
1. Naciśnij ALT i F11, aby otworzyć okno kodu
2. Kliknij dwukrotnie nazwę arkusza, który chcesz automatycznie
zmień wielkość liter
3. Umieść ten kod w oknie kodu:
Zmień tekst na poprawną wielkość liter
Kod dla Właściwy przypadek
Private Sub Worksheet_Change(ByVal Target As Excel.Range) Application.EnableEvents = False If Target.Column = 5 Then Target = StrConv(Target, vbProperCase) End If Application.EnableEvents = True End Sub
Zmień tekst na wielkie litery
Do Duże litery możesz się zmienić
StrConv(cel, vbProperCase)
do
Ucase (cel)
Zmień tekst na małe litery
Do Małe litery możesz się zmienić
StrConv(cel, vbProperCase)
do
Lcase (cel)