ich würde gerne nach dem Bearbeiten der Tabelle mittels VBA diese als Tabelle formatieren. Leider habe ich den Schritt im Excel Makro nicht herausgefunden bez. konnte nicht abändern.
Hier der Code aber wie kann ich jetzt nur die Markierung zb. als Tabelle mittel 12 einfärben/formatieren.
Da die Zeilenanzahl täglich wechselt kann ich keinen festen Wert nehmen.
Sub BBM_Total()
' BBM_Total Makro
Columns("A:B").Select
Selection.Delete Shift:=xlToLeft
Columns("B:B").Select
Selection.NumberFormat = "0.00"
Selection.NumberFormat = "0.0"
Selection.NumberFormat = "0"
Columns("F:F").Select
Selection.Delete Shift:=xlToLeft
Columns("G:N").Select
Selection.Delete Shift:=xlToLeft
Rows("1:1").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Range("F1").Select
ActiveCell.FormulaR1C1 = "=SUM(R[2]C:R[284]C)"
Range("F1").Select
Selection.Font.Bold = True
ExecuteExcel4Macro "PATTERNS(1,0,65535,TRUE,2,3,0,0)"
Columns("A:E").EntireColumn.AutoFit
Range("A2").CurrentRegion.Select
End Sub
Ich möchte nach dem letzten Schritt jetzt die Tabelle einfärben (Zb. Tabelle mittel 12) GelbWelchen Befehl kommt da ran?
Besten Dank für eure Hilfe