Erster Buchstabe "grossbuchstabe"

Bild

Betrifft: Erster Buchstabe "grossbuchstabe"
von: Graf Zahn
Geschrieben am: 23.02.2005 17:14:22
Hallo Forum,
der Buchsatbe in A1 und A2 soll immer "gross" sein.
macht excel sowas?
danke dafür.
GZ

Bild

Betrifft: AW: Erster Buchstabe "grossbuchstabe"
von: Pascaö
Geschrieben am: 23.02.2005 17:19:25
Hi
Einfache Lösung wäre z.B. in b1=GROSS2(a1) der erste buchstabe wird dann immer groß geschrieben in b1.
A1 könntest Du dann evtl .ausblenden.
Gruß Pascal
Bild

Betrifft: =GROSS(A1) mt.
von: th.heinrich
Geschrieben am: 23.02.2005 17:20:03
hallo GZSZ, bitte mit realvornamen posten,
die formel musst Du allerdings in eine andere zelle eingeben. andere loesung nur mit vba und da bin ich nicht der ansprechpartner.
gruss thomas
ps. bei mehreren buchstaben =GROSS2(A1)
Bild

Betrifft: AW: Erster Buchstabe "grossbuchstabe"
von: UweD
Geschrieben am: 23.02.2005 17:22:29
wenn die gleiche Zelle gemeint ist, dann nur per VBA
...

wenn andere Zelle gemeint ist dann so:
 
 AB
1adgdgdAdgdgd
Formeln der Tabelle
B1 : =GROSS2(A1)
 

Gruß UweD
Bild

Betrifft: AW: Erster Buchstabe "grossbuchstabe"
von: UweD
Geschrieben am: 23.02.2005 17:29:42
per VBA
- rechtclick auf den Tabellenblattreiter, Code anzeigen
- Makro reincopieren

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:A2")) Is Nothing Then
        Application.EnableEvents = False
        Target = Application.Proper(Target)
        Application.EnableEvents = True
    End If
End Sub

Fertig

Gruß und Tschüsssssss
Bild

Betrifft: danke an Alle; Danke Uwe,klappt prima. ot.
von: dieter
Geschrieben am: 23.02.2005 17:59:44

Bild

Betrifft: hallo uwe, dies makro..
von: dieter-j
Geschrieben am: 24.02.2005 15:06:11
geht auf einmal nicht mehr; ich verstehe nicht warum.....
die zellangaben "Range" sind richtig....
weisst du weiter?
danke .dieter

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("B6,C6,B8,B10,C10")) Is Nothing Then
        Application.EnableEvents = False
        Target = Application.Proper(Target)
        Application.EnableEvents = True
    End If
End Sub


Private Sub Workbook_Open()
End Sub

Bild

Betrifft: AW: hallo uwe, dies makro..
von: UweD
Geschrieben am: 24.02.2005 16:05:48
Hallo
Hast du das makro mal abgebrochen? Dann sind evtl. die Events ausgeschaltet geblieben.
So würden die wieder eingeschaltetet

Sub einschalten()
        Application.EnableEvents = True
End Sub

sonst fällt mir nicht dazu ein.
Gruß UWeD
Bild

Betrifft: AW: Gültigkeit?
von: Galenzo
Geschrieben am: 23.02.2005 17:25:43
das läßt Interpretationsspielraum -
willst du nur GRoßbuchstaben zur Eingabe zulassen?
dann kannst du das mit Daten/Gültigkeit/benutzerdef. einschränken:
=UND(LÄNGE(A1)=1;CODE(A1)>64;CODE(A1)<91)
es werden bei der Eingabe nur noch einzelne Großbuchstaben akzeptiert
 Bild

Beiträge aus den Excel-Beispielen zum Thema "Erster Buchstabe "grossbuchstabe""