Excel VBA - Cells

Aus SAP-Wiki
Wechseln zu: Navigation, Suche
'Held, S. 200
'Die Spaltenbreite wird automatisch optimiert. Genauso wie die Zeilenhöhe.
Private Sub Worksheet_Change (ByVal Target As Excel.Range)
  Anpassen
End Sub
Sub Anpassen()
  Cells.EntireColumn.AutoFit
  Cells.EntireRow.AutoFit
End Sub