mehere Zellblöcke in Großbuchstaben
20.10.2006 13:46:48
Uwe
das hab ich an Code für einen Bereich an Zellen für Großschreiben....
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim rngUCase As Range
Set rngUCase = Range("E4:P63")
If Not Intersect(Target, rngUCase) Is Nothing Then
Set Target = Intersect(Target, rngUCase)
Target.Cells(1) = UCase(Target.Cells(1))
End If
End Sub
...wie bekomme ich das hin damit er mir z.b. den Bereich ("E82:P95")auch mit Großschrift versieht.
Hab da schon hin und her probiert.
Wenn ein Bereich geht geht der andere nicht.
Na halt Anfänger....:-)
kann mir da einer helfen!
Dank schon mal im vorraus.
Gruß Uwe