ich bins mal wieder...
Hab folgendes Makro gefunden:
Sub Everything_in_Figures()
Dim objCell As Range
Sheets("AB").Select
For Each objCell In ActiveSheet.UsedRange
objCell.Value = objCell.Value * 1
Next
End Sub
Da zeigt er mir leider aber in : objCell.Value = objCell.Value * 1 einen Fehler an. Es sieht so aus als würde er nur ein Zelle nehmen?!
Weiß da einer mehr?
Vielen Dank im Voraus!
Gruß
Fabian