Home VBA Makro Beispiele Sonstige Codes VBA - Kopie ohne Makro speichern
VBA - Kopie ohne Makro speichern PDF Drucken E-Mail
Geschrieben von: Marcus Rose   
Freitag, 10. Oktober 2014 um 10:13 Uhr

Wenn wir uns eine Kopie unserer Excel Datei ohne Makros abspeichern wollen, können wir leider nicht SaveCopyAs nutzen. SaveCopyAs würde uns zwar eine Datei speichern, diese könnten wir aber nicht mehr aufrufen. Uns wird die Datei als defekt angezeigt. Damit wir uns dennoch eine Kopie anlegen können und unsere Excel Datei auch geöffnet bleibt, können wir folgendes Makro nutzen:

Sub Speichern()
    Dim wks As Worksheet
    Dim strDname As String
    Application.ScreenUpdating = False
        'Bildschirmaktualisierung abgeschaltet
    Application.DisplayAlerts = False
        'schaltet Meldungen aus
    strDname = "C:\Excel\Forumsarbeiten\" & "test.xlsx"
        'Pfad und Name der Kopie
        ' Rest vom Makro
    ActiveWorkbook.SaveAs strDname, FileFormat:=xlOpenXMLWorkbook
        'Datei wird als Kopie gespeichert
    Application.DisplayAlerts = True
        'schaltet Meldungen ein
    Application.ScreenUpdating = True
        'Bildschirmaktualisierung eingeschaltet
End Sub
Zuletzt aktualisiert am Freitag, 10. Oktober 2014 um 10:34 Uhr
 
Copyright © 2017 ms-excel.eu. Alle Rechte vorbehalten.
 

Autoren - Login

Werbung

wichtige Links:
http://ms-excel.eu
Hier habt Ihr eine gute Excel Hilfe
Besucherstatistik
Besucher gesamt: 4.476.129
Besucher heute: 1.576
Besucher gestern: 1.981
Max. Besucher pro Tag: 4.488
gerade online: 16
max. online: 507
counter Statistiken