Jak wymusić wpisywanie wielkich liter w polu tekstowym?
W programie Excel możemy szybko przekonwertować małe litery na wielkie w tekście komórki za pomocą funkcji UPPER, ale czy kiedykolwiek próbowałeś wymusić, aby wprowadzony tekst był pisany wielkimi literami w polu tekstowym? W tym artykule przedstawię prosty kod, aby zakończyć tę pracę.
Wymuś wpisywanie wielkich liter w polu tekstowym z kodem VBA
Wymuś wpisywanie wielkich liter w polu tekstowym z kodem VBA
Wymuszając wpisanie tekstu wielkimi literami w polu tekstowym, następujący kod VBA może wyświadczyć ci przysługę:
1. Po pierwsze, wstaw pole tekstowe, klikając Deweloper > wstawka > Pole tekstowe (formant ActiveX), a następnie narysuj pole tekstowe, jak potrzebujesz, zobacz zrzut ekranu:
2. Po wstawieniu pola tekstowego kliknij je prawym przyciskiem myszy i wybierz Wyświetl kod z menu kontekstowego, aby otworzyć plik Microsoft Visual Basic for Applications okno, a następnie zamień oryginalny kod na następujący kod VBA w pustym module:
Kod VBA: Wymuś, aby tekst był pisany wielkimi literami w polu tekstowym:
Private Sub TextBox1_Change()
TextBox1.Text = UCase(TextBox1.Text)
End Sub
3. Następnie zapisz i zamknij okno kodu i zamknij Tryb projektowania, teraz, kiedy wpiszesz tekst w pole tekstowe, zostanie on zmuszony do wpisania wielkimi literami, patrz zrzut ekranu:
Najlepsze narzędzia biurowe
Zwiększ swoje umiejętności Excela dzięki Kutools for Excel i doświadcz wydajności jak nigdy dotąd. Kutools dla programu Excel oferuje ponad 300 zaawansowanych funkcji zwiększających produktywność i oszczędzających czas. Kliknij tutaj, aby uzyskać funkcję, której najbardziej potrzebujesz...
Karta Office wprowadza interfejs z zakładkami do pakietu Office i znacznie ułatwia pracę
- Włącz edycję i czytanie na kartach w programach Word, Excel, PowerPoint, Publisher, Access, Visio i Project.
- Otwieraj i twórz wiele dokumentów w nowych kartach tego samego okna, a nie w nowych oknach.
- Zwiększa produktywność o 50% i redukuje setki kliknięć myszką każdego dnia!