Thema Datum  Von Nutzer Rating
Antwort
12.01.2017 08:20:57 Daniel K.
NotSolved
Blau Makro zum Speichern, wahnsinnig langsam
 12.01.2017 09:14:26 SJ
NotSolved
12.01.2017 10:23:28 Daniel K.
NotSolved
23.01.2017 07:45:00 Daniel K.
NotSolved

Ansicht des Beitrags:
Von:
SJ		 Datum:
12.01.2017 09:14:26		 Views:
618		 Rating:
     
Antwort:
  Ja
Thema:
Makro zum Speichern, wahnsinnig langsam

Guten Morgen,

versuch bitte Mal folgendes Makro auszuführen:

Option Explicit

Public Sub speichern()
    Dim calc As Variant
    Dim wkb As Workbook
    Set wkb = ActiveWorkbook
    
    With wkb
        .SaveAs "J:\Bestand\2017xxheutexx Bestand.xlsm", FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
        .Worksheets("2017xxheutexx Bestand Upload").SaveAs "J:\Bestand\2017xxheutexx Bestand Upload.txt", FileFormat:=xlText, CreateBackup:=False
        calc = Application.Calculation
        Application.Calculation = xlCalculationManual
        .Worksheets("Bestandsabgleich").Columns("E:E").ClearContents
        .Worksheets("Bestandsabgleich").Range("E1").Value = "Bestand"
        .Worksheets("Config").Columns("A:D").ClearContents
        Application.Calculate
        Application.Calculation = calc
        .SaveAs "J:\Bestand\2017xxmorgenxx Bestand.xlsm", FileFormat:=xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False
    End With
    
    Set wkb = Nothing
End Sub

Gruß

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
12.01.2017 08:20:57 Daniel K.
NotSolved
Blau Makro zum Speichern, wahnsinnig langsam
 12.01.2017 09:14:26 SJ
NotSolved
12.01.2017 10:23:28 Daniel K.
NotSolved
23.01.2017 07:45:00 Daniel K.
NotSolved