Fehler in diesem Code?
17.11.2006 14:37:38
Flori
ich hab ein Problem mit mit dem unten aufgeführten Code. Und zwar sollte er mir alles von Zelle A10 bis Q225 unter dem unten angegebenen Pfad speichern. Das mit dem speichern in diesem Pfad mit dem Namen der in Zelle C10 steht funktioniet schon, aber: Nur speichert es mit leider diese Zellen (A10-Q225) genau nicht sondern alles andere drum herum was sich auf dem Blatt befindet...
Sub Schaltfläche32_BeiKlick()
ActiveSheet.Copy
With ActiveSheet
.Range("R:IV").Clear
.Range("A10:Q225").Clear
End With
ActiveWorkbook.SaveAs "D:\TEST\" & Range("C10").Value & ".xls"
End Sub
Kann mir jemand weiterhelfen?
Anzeige