Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1956to1960
1956to1960
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

automatisch in Großbuchstaben umwandeln

Forumthread: automatisch in Großbuchstaben umwandeln

automatisch in Großbuchstaben umwandeln
07.12.2023 08:01:13
Werner Denner
Hallo Excel-Freunde

Gibt es eine Möglichkeit eingegebene Kleinbuchstaben in Großbuchstaben umzuwandeln?
Leider gebe ich aus Versehen immer wieder Kleinbuchstaben in bestimmte Zellen ein, obwohl sie groß geschrieben sein sollen.
Werner
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: automatisch in Großbuchstaben umwandeln
07.12.2023 08:15:17
MCO
Moin!

Du kannst dir ein Makro hinterlegen, dass alles sofort in GROSS umwandelt. 
Private Sub Worksheet_Change(ByVal Target As Range)

    Target = UCase(Target.Value)

End Sub


Gruß, MCO


AW: automatisch in Großbuchstaben umwandeln
09.12.2023 12:37:24
GerdL
Hallo Werner! 

Private Sub Worksheet_Change(ByVal Target As Range)

    

    On Error GoTo Ende

    Const Bereich As String = "A2:C10"  'anpassen

    Dim C As Range

  



    If Not Intersect(Target, Range(Bereich)) Is Nothing Then

        Application.EnableEvents = False

        For Each C In Intersect(Target, Range(Bereich)).Cells

            C.Value = UCase$(C.Value)

        Next C

    End If



Ende:

    If Err.Number > 0 Then Err.Clear

    Application.EnableEvents = True





End Sub


Viel Erfolg!
Gerd
Anzeige
AW: automatisch in Großbuchstaben umwandeln
07.12.2023 10:39:25
onur
Das gibt eine Endlosschleife.
Stimmt. Besser so:
07.12.2023 11:25:25
MCO 
Private Sub Worksheet_Change(ByVal Target As Range)

    Application.EnableEvents = False

    Target = UCase(Target.Value)

    Application.EnableEvents = True

End Sub
AW: Stimmt. Besser so:
07.12.2023 16:12:19
daniel
schon besser.
aber immer noch nicht gut.
man kann auch mal mehrere Zellen gleichzeitig verändern, beispielsweise beim Löschen, oder beim Einfügen mit Copy-Paste, oder durch das Markieren von mehreren Zellen und die Eingabe mit STRG+ENTER
Warum denkt da niemand dran?
Insbesondere, wenn die Events deaktiviert werden, sollte man den Code so programmieren, dass zumindest bei regulärer Benutzung keinen Fehlerabbruch erzeugt.

Gruß Daniel
Anzeige
Noch besser...
07.12.2023 20:29:24
MCO
@Daniel: hättest ruhig selbst den Code vervollständigen können....

So wirds auch mit mehrerern Zellen was 
Private Sub Worksheet_Change(ByVal Target As Range)

    Application.EnableEvents = False

    For Each cl In Target

        cl.Value = UCase(cl.Value)

    Next cl

    Application.EnableEvents = True

End Sub


Gruß, MCO
Anzeige
AW: Noch besser...
09.12.2023 11:58:13
daniel
Ja, hätte ich machen können.
Aber der Lernerfolg ist größer, wenn man nicht nur passiv zuschaut, sondern das erlernte gleich selber anwendet. Dann prägt es sich besser ein und ich möchte ja, dass du bei der nächsten Frage dieser Art gleich daran denkst.

Gruß Daniel

Forumthreads zu verwandten Themen

Hintergrundfarbe in Zahl umwandeln
Timo

Hallo zusammen.
Gibt es über VBA eine Möglichkeit, die Hintergrundfarbe einer Zelle in eine Zahl umzuwandeln und das schneller als mit for- Schleifen?
Habe einen Bereich ("J16:AG39"), wo ich per Zellaktivierung mit der Maus Zellen oder auch Zellbereiche mit einer Hintergrundfarbe verseh...
07.08.2008 19:30:00
Thread-ID: 1000082
4 Beiträge
Verschiedene Werte in bestimmte Zahlen umwandeln
Henning

Hallo, ich versuche grade bei einem Schichtplan die Verschiedenen Zelleninhalte z.B. Zelle A3 Inhalt "U1",Zelle A4 Inhalt"1/3" usw. in Werte umzuwandeln und diese dann als Stunden ausrechennen zu lassen.
Also so soll z.B. aus dem Inhalt von Zelle A3, dort steht "U1" soll dann 8 Stunden ents...
15.10.2008 18:37:00
Thread-ID: 1016648
4 Beiträge
In Zahlen umwandeln
fuxl

Ich hab ein AutoOpen Makro in dem ich die Funktion TextinSpalten verwende um den Zelleninhalt in eine Zahl umzuwandeln und die kleinen Dreiecke los zu werden. Das ganze geschieht mit folgender Zeile:
'Tabelle1.Range("H15:H$" & letzteZeile).TextToColumns Destination:=Tabelle1.Range("H15"...
19.11.2008 11:13:06
Thread-ID: 1025937
5 Beiträge
Umwandeln in Zahlen mit VBA
Bernhard

Hallo liebe Excel-Experten,
heute brauche ich Eure Hilfe für folgendes Problem: Ich importiere Daten aus einer anderen Anwendung nach Excel und ich bekomme die Zahlen als Text formartiert. Die Zahlen sehen z.B. wie folgt aus: 4.75m, was als Zahl 4750000 entspricht. Ist es mit einem VBA-Code...
25.11.2008 13:46:12
Thread-ID: 1027705
4 Beiträge
Anzeige
Text in Zahlen umwandeln
u_hoernchen

Ich habe eine Spalte in Excel, in der vereinzelt Zellen sind, in denen Zahlen als Text formatiert sind. Da ich diese Zahlen für die weitere Verwendung als Werte haben muss und ich das dann relativ oft umfrickeln muss (ist leider ein Download aus einem Vorprogramm), frage ich mich, ob es ggf. ei...
26.11.2008 11:09:00
Thread-ID: 1027963
4 Beiträge
Datum in Zahl umwandeln
P.Mackes

Hallo,
was ich machen möchte ist folgendes:
ich habe eine Zahl, die ein Datum darstellt, z.B. 20080507. Dabei handelt es sich NICHT um ein Datumsformat, sondern um eine richtige Zahl. Jetzt muss ich davon allerdings 90 Tage abziehen. Also wandle ich mit Date(left...mid...right) das gan...
27.11.2008 00:37:57
Thread-ID: 1028186
3 Beiträge
ein Format in Zahl umwandeln VBA
Michael

Hallo!
Welche Möglichkeit gibt es über VBA eine Tabelle die ich zugesendet bekomme. Die Werte in Zahlen umzuwandeln. Beispiel
number name___ old__ new Change Change %
500041 system 23.26 23.28 -0.71 -2.45% #WERT!
540014 cpu 69.95 69.99 -0.22 -0.31% #WERT! =F...
29.01.2009 10:37:00
Thread-ID: 1044870
7 Beiträge
Anzeige
VERKETTEN-String in Zahl umwandeln
Steffi

Hi,
bräuchte mal Hilfe:
Ich möchte eine Liste von Zahlen mit WENN-Formeln prüfen. Die Bedingungen mit den jeweiligen Operatoren stehen in anderen Zellen, z.B. "<=2". Ich hab es mit der VERKETTEN-Funktion versucht, aber anscheinend wird das Ergebnis als String interpretiert:
A1: 1...
29.01.2009 17:22:16
Thread-ID: 1045101
5 Beiträge
Datum in Textbox in eine Zahl umwandeln
TCO99

Hallo zusammen,
ich habe folgendes Problem.
In einer Spalte einer Tabelle befinden sich Datumsangaben. Ich filtere diese Liste nach einem Datum. Dieses Datum wird vor der Filterung in eine Textbox eingegeben. Als richtiges Datum fuktioniert die Filterung aber nicht mehr. Da habe ich ei...
26.02.2009 23:31:12
Thread-ID: 1054555
15 Beiträge
Text-String in Datumszahl umwandeln
MBorn

Hallo,
weiß jemand, wie ich einen Textstring ("27.02.1999") in die
passende Datumszahl (36218) umwandeln kann?
Danke,
Born
03.03.2009 13:16:27
Thread-ID: 1055953
4 Beiträge
Anzeige
Text-String in Datumszahl umwandeln
MBorn

Hallo,
weiß jemand, wie ich einen Textstring ("27.02.1999") in die
passende Datumszahl (36218) umwandeln kann?
Interessanterweise funktioniert das in Excel mit Ganzzahl(Datumsstring),
aber in VBA klappt int(Datumsstring) nicht.
Danke,
Born
03.03.2009 13:18:24
Thread-ID: 1055955
2 Beiträge
Datum in Zahl umwandeln
Johannes

Hallo!
Habe eine Frage zu Excel:
Ich möchte über eine WENN-Funktion das Datum aus G2 als Zahl in dem entsprechenden Feld (AJ - AP) haben.
Z.B. für "Freitag, 2. Januar 2009" soll in der Spalte AN eine 1 stehen.

Über Hilfe wäre ich SEHR dankbar.
Liebe Grüße
Johannes
04.03.2009 12:20:18
Thread-ID: 1056301
7 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige