Formate sichern und zurückschreiben

Dieses Thema Formate sichern und zurückschreiben im Forum "Windows XP Forum" wurde erstellt von nok106, 6. März 2008.

Thema: Formate sichern und zurückschreiben Hallo Excelaner, mit folgendem Makro kopiere ich, vor dem Ausdruck, die Formatierung in ein anderes Blatt. Nach dem...

  1. Hallo Excelaner,

    mit folgendem Makro kopiere ich, vor dem Ausdruck, die Formatierung in ein anderes Blatt.
    Nach dem Drucken sollten die Formate wieder zurück gesetzt werden aber ohne Erfolg.

    Hat jemand eine Idee wo der Fehler liegt ?
    Wenn ja, dann bitte ich um Korrektur.
    Einstweilen herzlichen Dank an alle, die sich für mich bemühen.

    MfG

    Odje

    Code:
    Sub Makro1()
    Application.ScreenUpdating = False
    
    Rem Formate sichen
     Cells.Copy
     Sheets(Ablage).Cells(1, 1).PasteSpecial xlPasteFormats
    
    Rem Füllfarbe löschen
     Range(C2:D2,E2,C7,D7,E7,C31:D31,E31).Interior.ColorIndex = xlNone
    
    Rem Rahmen löschen
     Range(C7,D7,E7,C31:D31,E31).Borders.LineStyle = xlNone
    
    Rem Druckbefehl
    '
    '
    '
    
    Rem Formate zurückschreiben
     Sheets(Ablage).Cells.Copy
     Cells(1, 1).PasteSpecial xlPasteFormats
     Sheets(Ablage).Cells.Clear
     
     Range(A1).Activate
     
    Application.ScreenUpdating = True
    End Sub
    Hat sich inzwischen erledigt, habe den Fehler gefunden !!!! :p
     
Die Seite wird geladen...

Formate sichern und zurückschreiben - Ähnliche Themen

Forum Datum
Änderung des Seitenformates von Quer- in Hochfornat und evtl. wieder zurück. Microsoft Office Suite 28. März 2014
Blu-ray und sonstige HD Videoformate Windows XP Forum 15. Jan. 2009
EAC 1 x einlesen und in mehrere Formate umwandeln Windows XP Forum 5. Jan. 2013
Ungewöhnliche Datei-Formate Windows XP Forum 10. Juni 2011
ASPX-Datei (Film-Datei enthalten) in AVI (oder andere Formate) umwandeln Audio, Video und Brennen 7. März 2010