Herbers Excel-Forum - das Archiv

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
Excel-Beispiele zum Thema "Erster Buchstabe "grossbuchstabe""
In zweiter UserForm Werte aus erster UserForm anzeigen Eingabe in Großbuchstaben wandeln
Nur Buchstaben in eine UserForm-TextBox Zeichenfolge in Ziffern und Buchstaben aufteilen
Ersten mit einem neuen Buchstaben beginnenden Namen fett schreiben Letzte Zeile mit einem bestimmten Anfangsbuchstaben markieren
Umwandlung einer Zeichenfolge in Spalte A in Großbuchstaben In einer Namensliste Großbuchstaben einsetzen
Buchstaben aus Textdatei entfernen und neu speichern Buchstabenindex des Arbeitsblattes mit der Fundzelle