Speichern ohne ordner öffnen
09.11.2002 16:27:37
Ralf
Ich komm nicht weiter versuche bestimmte celleninhalte ( a1 A2 A3 )einer Excel Vorlage in einem anderem Ordner(C:\Daten\....xls ) zu speichern, ohne den Ordner zu öffnen.
Ich habe bis jetzt nur die möglichkeit gefunden, wo Die ...xls datei geöffnet wird
Sub AutoForm7_BeiKlick()
Workbooks.Open "c:\daten\9.xls"
If Range("A1") <> "" Then
Range("a1").CurrentRegion.Rows(Range("A1").CurrentRegion.Rows.Count + 1).Activate
End If
ActiveCell = Workbooks("Probe.xls").ActiveSheet.Range("A1")
ActiveCell.Offset(0, 1) = Workbooks("Probe.xls").ActiveSheet.Range("B2")
ActiveCell.Offset(0, 2) = Workbooks("Probe.xls").ActiveSheet.Range("C5")
Workbooks("9.xls").Save
End Sub
Anzeige