auf Tabelle anwenden
19.08.2015 15:12:17
Thomas
ich möchte gern die spaltenbreite einer Tabelle einstellen.
dazu habe ich den befehl autofit gefunden. Mit dem untenstehenden Macro kann man die Spalte a auf maximal 10 zeichen beschränken. Ich bekomme es einfach nicht mit der ganzen tabelle hin. wenn ich With Columns("A:zz") schreibe funktioniert es einfach nicht.
Weiss jemand Rat?
liebe grüsse thomas
Sub Spaltenbreite()
With Columns("A:A")
.EntireColumn.AutoFit
If .ColumnWidth > 10 Then
.ColumnWidth = 10
End If
End With
End Sub