Tabelle-Formatieren in einer Withanweisung
18.07.2016 16:56:12
Peter
ich bitte wieder um Eure Hilfe.
Ich möchte eine externe Tabelle formatieren.
Mei Code sieht wie folgt aus:
'Schrift: bold
With .Range(.Cells(5, LetzteS), .Cells(letzteZ, LetzteS)).Font.Bold = True
'Zeilenumbruch einfügen
With .Range(.Cells(2, LetzteS), .Cells(letzteZ, LetzteS))
.WrapText = True
.Orientation = 0
.AddIndent = False
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
'Zeile Zentrieren
With .Range(.Cells(2, LetzteS), .Cells(letzteZ, LetzteS))
.VerticalAlignment = xlCenter
.WrapText = True
.Orientation = 0
.AddIndent = False
.IndentLevel = 0
.ShrinkToFit = False
.ReadingOrder = xlContext
.MergeCells = False
End With
Wahrscheinlich sind die With-Anweisung falsch. Aber was ist dabei falsch?
Lg, Peter
Anzeige