Supportnet / Forum / Tabellenkalkulation
ein Knopf zum automatischen Speichern
Frage
Hallo an Alle,
Ich möchte ein Rechnungprogram schreiben,
soweit klappt es, aber ich muss am ende die Rechnung manuell speichern und einen Name geben.
Ist es möglich mit einem Schaltknopf die fertig gestellte Rechnung automatisch speichern und eventuell auch jedes Mal mit einem neuen Name(z.B. das Wort aus der Zelle A2), oder Nummer gespeichert werden.
Ich hoffe, dass ich mich verständlich ausgedrückt habe,
und die Profis hier mir helfen.
MFG
Alex
Antwort 1 von JoeKe
Moin Alex,
folgnden Code in in StandartModul und einer Schaltfläche zuweisen:
Sub speichern()
ActiveWorkbook.SaveAs Filename:="C:\Rechnungen\Rech.Nr " & Range("A2") & ".xls"
ActiveWorkbook.Close
End Sub
Hiermit wird die zur Zeit aktive Mappe unter dem Namen "Rech.Nr" und dem Zellinhalt von "A2" auf C:\ im Ordner Rechnungen gespeichert.
MfG
JöKe
folgnden Code in in StandartModul und einer Schaltfläche zuweisen:
Sub speichern()
ActiveWorkbook.SaveAs Filename:="C:\Rechnungen\Rech.Nr " & Range("A2") & ".xls"
ActiveWorkbook.Close
End Sub
Hiermit wird die zur Zeit aktive Mappe unter dem Namen "Rech.Nr" und dem Zellinhalt von "A2" auf C:\ im Ordner Rechnungen gespeichert.
MfG
JöKe
Antwort 2 von Alexx1
Moin JöKe ,
Vielen Dank, das ist ja super , alles funktioniert wie ich wollte.Ich wusste das für Profis, es ist kein Problem.
Vielen Dank nochmal.
MFG
Alex
Vielen Dank, das ist ja super , alles funktioniert wie ich wollte.Ich wusste das für Profis, es ist kein Problem.
Vielen Dank nochmal.
MFG
Alex