G

Problem Makro
Groß-/Kleinschreibung Mit folgendem Makro kannst Du die Zellen alle in Kleinschreibung ausfüllen und das Makro schreibt Dir jeden ersten Buchstaben eines Wortes groß. Dazu muss der zu korrigierende Bereich selektiert sein.

Sub Anfangsbuchstabe_Groß()
Dim C As Range
For Each C In Selection
On Error Resume Next
C = StrConv(C, vbProperCase)
Next C
End Sub
Mit folgendem Makro kannst Du die Zellen alle in Kleinschreibung ausfüllen und das Makro schreibt Dir JEDEN Buchstaben aller Wörter groß. Dazu muss der zu korrigierende Bereich selektiert sein.

Sub Alles_Gross()
Dim C As Range
For Each C In Selection
On Error Resume Next
C = UCase(C)
Next C
End Sub
GeheZu per Inputbox Sub gehezu()
Wert = InputBox("Bitte geben Sie die Zielzelle in der A1-schreibweise ein")
Range(Wert).Select
End Sub

Es funktionieren auch Bereiche wie "A1:C11"

   


 

Letzte Änderungen auf dieser Seite am 29.10.2006

Valid XHTML 1.0 Transitional    Valid CSS!

Berti's ExcelABC mit vielen Tipps und Tricks rund um Excel und die Makros bzw. VBA

Seitenanfang

A B C D E F G H i J K L M N O P Q R S T U V W X Y Z
Excel: 39  |  Formeln: 1  |  Funktionen: 8  |  Makro / VBA: 40  |  Hintergrundinfos: 7  |  Beispieldateien: 11  |  Komplettlösungen: 1