Großschrift verschiedenen Zellen

Computer: Software & Programmierung Office Software
1

Ich möchte das in Excel 2010 nach Eingabe von Text in Kleinschrift (in Zelle IH44 und GU46), diese nach dücken der Entertaste automatisch in Großschrift erscheint.
Kennt jemand eine Lösung?

2

Hallo heimat (dies ist eine Anrede, die ist hier üblich),

schön, dass du zu w-w-w gefunden hast.
kennst du dich etwas mit VBA aus? Dann kopiere folgenden Code in das Code-Modul deiner Tabelle:

Private Sub Worksheet\_Change(ByVal Target As Excel.Range)
 If Target.Address = "$IH$44" Or Target.Address = "$GU$46" Then Target = UCase(Target)
End Sub

Dann werden die Eingaben in IH44 und GU46 in Großbuchstaben verwandelt.

Gruß, (das ist ein Gruß, auch der ist hier üblich)
Andreas

3

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Address = „$IH$44“ Or Target.Address = „$GU$46“
Then Target = UCase(Target)
End Sub
Dann werden die Eingaben in IH44 und GU46 in Großbuchstaben
verwandelt.

Hallo Andreas, heimat,

der Code ist theoretisch eine Endlosschleife, er ruft sich laufend sebst wieder auf.
Excel bricht diese Endlossschleife von sich aus nach 221 Aufrufen ab.

Besser ist da dieser Code:

Private Sub Worksheet\_Change(ByVal Target As Range)
If Target.Address = "$IH$44" Or Target.Address = "$GU$46" Then
 Application.EnableEvents = False
 Target.Value = UCase(Target.Value)
 Application.EnableEvents = True
End If
End Sub

Gruß
Reinhard

4

Danke Reihard,

du hast völlig Recht.
Gruß, Andreas

5

Hallo Andreas,
kannst du mir das mit dem VBA bitte näher erklären.
Gruß heimat

6

Hallo Reinhard und Andreas,
der Code von Reinhard funktioniert perfekt.
Danke für die superschnelle Hilfe.
Super Forum hier.

Gru? Frank

7

oder wenn man kein so versierter „Eventhändler“ ist:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = „$IH$44“ Or Target.Address = „$GU$46“ Then
If Target.Value != UCase(Target.Value) Then Target.Value = UCase(Target.Value)
End If
End Sub

(oder statt != - kann ich mir nie merken, welche Sprach was braucht…)

ist zwar mit der Brechstange, sollte sich aber auch nicht ständig neu aufrufen :smile: cu kai

8

Hallo heimat,

kopiere den Code von Reinhard (der ist besser als meiner) mit Strg-C in die Zwischenablage.
Öffne deine Excel-Datei.
Drücke Alt-F11. Jetzt öffnet sich der VBA Editor.
Im Fenster links oben sind die Tabellenblätter deiner Datei aufgelistet.
Doppelklicke auf das Tabellenblatt, um das es geht. Jetzt öffnet sich rechts ein Fenster.
Klicke in dieses Fenster, dann drücke Strg-V, um Reinhards Code dort einzufügen.
Fertig. Wenn du jetzt in deine Excel-Datei wechselst, passiert genau das, was du möchstest: Wenn du in den Zellen IH44 oder GU46 Text eingibst, wird er in Großbuchstaben verwandelt.

Gruß, Andreas