Länge einer Zelle automatisch anpassen!
18.08.2003 07:29:55
Chris
habe jetzt schon ein Problem mit Excel, bei dem ich selber nicht weiterkomme!
Ich möchte in einem vorbestimmten Zellbereich, ein Makro hinterlegen, welches mir die Zellen je nach Inhalt automatisch anpasst!
Leider funktioniert mein Makro nicht richtig, hat mir jemand einen Vorschlag?
Ich habe das folgende Makro, in das Tabellenblatt hinterlegt:
Sub ZeilenLaenge()
Dim i As Byte
Application.ScreenUpdating = False
For i = 16 To 42
Sheets("Übersichtsblatt").Rows(i & ":" & i).RowLength
Next i
Application.ScreenUpdating = True
End Sub
Vielen Dank im Voraus für Eure Hilfe!
Chris