Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: VBA automatisch UCase nach Eingabe

VBA automatisch UCase nach Eingabe
16.03.2016 09:41:38
Michael
Hallo Forum,
ich suche nach einem Makro, welches mir nach der Eingabe den ersten Buchstaben immer groß macht. Mit folgendem Makro klappt das ansatzweise, jedoch nur wenn ich das Makro ausführe. Es geht darum das dies automatisch nach jeder Eingabe in einer Zelle erfolgt:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim x as Range
For Each x In ThisWorkbook.ActiveSheet.Range("K10:NW23")
x.Value = Application.Proper(x.Value)
Next
End Sub
Das mit der Range ist auch überflüssig. Es geht nur um die aktuelle Zelle damit nicht der gesamte Bereich immer wieder überprüft wird.
Gruß
Michael

Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA automatisch UCase nach Eingabe
16.03.2016 10:02:18
ChrisL
Hi Michael
Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Application.EnableEvents = False
Target = Application.Proper(Target)
Application.EnableEvents = True
End Sub

N.b. bei EnableEvents immer eine Fehlerroutine verwenden. In diesem Fall, weil nur eine Befehlszeile On-Error-Resume-Next.
cu
Chris

Anzeige
AW: VBA automatisch UCase nach Eingabe
16.03.2016 10:15:55
Michael
Vielen Dank Chris!
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige