Microsoft Excel

Herbers Excel/VBA-Archiv

Großschreibung | Herbers Excel-Forum


Betrifft: Großschreibung von: Dirk Hammermann
Geschrieben am: 22.02.2012 15:53:00

Hallo,

ich habe ein kleines Problem:

In einer Spalte werden in den jeweiligen Zeilen beliebige "Wörter" eingetragen. Ich möchte nun, daß immer nur der Anfangsbuchstabe groß geschrieben wird und der Rest des Wortes in kleinen Buchstabe.

Beispiel:

"WORT" ist geschrieben und soll als "Wort" erscheinen.

ich kann hierzu leider keine Fuktion finden.

Kann mir hier jemand bitte helfen.

Vielen Dank.

Mit freundlichen Grüßen

D. Hammermann

  

Betrifft: AW: Großschreibung von: Josef Ehrensberger
Geschrieben am: 22.02.2012 15:57:48


Hallo Dirk,

' **********************************************************************
' Modul: Tabelle1 Typ: Element der Mappe(Sheet, Workbook, ...)
' **********************************************************************

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
  Dim rng As Range
  'Beispiel für Spalte B
  If Not Intersect(Target, Columns(2)) Is Nothing Then
    Application.EnableEvents = False
    For Each rng In Intersect(Target, Columns(2)).Cells
      If Len(rng) Then
        rng = Application.Proper(rng)
      End If
    Next
  End If
  
  ErrExit:
  Application.EnableEvents = True
End Sub






« Gruß Sepp »



  

Betrifft: AW: Großschreibung von: Dieter
Geschrieben am: 22.02.2012 17:02:51

Hallo Excel-Experten,

ich hätte ohne Prüfung gesagt, daß das mit bedingter Formatierung (benutzerdefiniert und Formel GROSS2) zu lösen sei.
Pustekuchen!
Wenn in A1 "aaa" steht und in B1 =GROSS2(A1) richtig "Aaa" ergibt, wieso ist dann =A1=B1 WAHR?

Oder ist das ein Excel-Bug?

Ich bin gespannt auf Eure Antworten.

Gruß
Dieter


  

Betrifft: AW: Großschreibung von: Josef Ehrensberger
Geschrieben am: 22.02.2012 17:06:50


Hallo Dieter,

bei einem reinen textvergleich unterscheidet Excel nicht zwischen Klein/Groß-schreibung.

Tabelle4

 ABCD
1aaaAaaWAHRFALSCH

Formeln der Tabelle
ZelleFormel
B1=GROSS2(A1)
C1=A1=B1
D1=IDENTISCH(A1;B1)


Excel Tabellen im Web darstellen >> Excel Jeanie HTML 4







« Gruß Sepp »



  

Betrifft: AW: Großschreibung von: Dieter
Geschrieben am: 22.02.2012 17:15:13

Hallo Sepp, hallo Dirk,

Sepp hat recht. Und damit ist auch die Möglichkeit gegeben, das ganze mit Daten - Gültigkeit zu machen.

Und zwar Daten - Gültigkeit - benutzerdefiniert und als Formel eingeben,
ganze Spalte markieren (im Beispiel B) und =IDENTISCH(B1;GROSS2(B1))

Funktioniert

Gruß
Dieter


  

Betrifft: AW: Großschreibung von: Dieter
Geschrieben am: 22.02.2012 17:07:35

Sorry, meinte natürlich nicht bedingte Formatierung, sondern Datengültigkeit :-)


  

Betrifft: AW: Großschreibung von: Dirk Hammermann
Geschrieben am: 22.02.2012 18:38:35

Hallo Dieter, hallo Sepp,

vielen Dank für eure Hilfe.