Makro anpassen, UsedRange
27.06.2006 13:54:26
Daniel
ich habe dieses Makro im FAQ Bereich gefunden.
Was muss ich ändern, damit nicht alle Zellen bearbeitet werden, sondern
zum Beispiel nur A5:I16?
Danke für Hilfe!
Daniel
Sub FormatRTD()
For Each rng In ActiveSheet.UsedRange.Cells
If Not IsEmpty(rng) Then
rng.Formula = rng.FormulaLocal
End If
Next rng
End Sub
Anzeige