Spaltenbreiten festlegen
11.12.2008 08:35:00
Peter
Mit nachfolgendem Code möchte ich zwei Spaltenbreiten festlegen. Der Code läuft ab, aber die Spaltenbreiten in der entsprechenden Tabelle bleiben unverändert.
Was muss ich ändern?
Danke für eine Antwort.
Gruss, Peter
Sub spaltenbreite1()
Dim wbZiel As Workbook
Set wbZiel = objFile 'Funktionsaufruf (Rückgabewert ist ein Objekt)
With wbZiel.Worksheets("Uebersicht")
.Columns("A:A").ColumnWidth = 12.13
.Columns("B:B").ColumnWidth = 5.5
End With
End Sub
Anzeige