Hallo,
ich habe ein Makro, dass nacheinander 8 Sheets erzeugt und diese jeweils mit Daten befuellt. Jetzt moechte ich, dass die erste Zeile immer gleich formatiert ist. Fett, zentriert, SChriftart, etc.
Man kann das bestimmt wie folgt machen:
Worksheets("Tabelle1").Range("A1:J1").Font.Bold = True
aber ich wurde gerne einen With Rahmen verwenden und zwar fuer die ganze erste Zeile. Leider komme ich mit folgendem Konstrukt nicht klar.
With Worksheets("Tabelle1").Range("A1:J1")
With Font
.Bold = True
.Size = 12
.Name = "Arial"
End With
End With
Kann mir jemand helfen?
Vielen Dank
Christian