Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Mappe als gespeichert markieren

Betrifft: Mappe als gespeichert markieren von: Markus
Geschrieben am: 11.07.2008 09:09:59

Hallo,

in einem ADD-IN habe ich folgendes Makro platziert.
Dieses erstellt eine leere Mappe1 und gibt die Standard-Schrift vor.
Wie kann ich aber nach Abschluss der Workbook_Open-Prozedur der Mappe1 folgendes übergeben.
Die Datei soll sobald sie offen ist, den Vermerk erhalten dass sie nur gespeichert werden sollen,
wenn darin auch Änderungen gemacht werden.
Das Problem mit der Speicher-Abfrage (für die Mappe1) ist vor allem dann lästig, wenn ich über den Explorer eine bereits bestehende Mappe öffne, oder ein Seriebenbrief gestartet wird mti einer verknüpften Mappe. Wird Excel nur so aus Spass geöffnet, stört mich die Frage nicht.
Danke für einen Tipp.
Markus
----------------------------------------------------------



Private Sub Workbook_Open()
On Error GoTo Fehler
With ActiveWorkbook.Styles("Normal")
        .Font.Size = 10.5
        .Font.Name = "Century Gothic"
    End With
    Selection.Style = "Normal"
ThisWorkbook.Saved = True
Fehler:
If Err.Number = 91 Or Err.Number = 0 Then Exit Sub
MsgBox "Fehler im Makro" & vbCrLf & "Fehlernummer: " & Err.Number & _
    vbCrLf & "Fehlerbeschreibung: " & Err.Description

End Sub


  

Betrifft: AW: Mappe als gespeichert markieren von: Paddy
Geschrieben am: 11.07.2008 11:03:57

Hallo!

Statt Thisworkbook.saved=true Activeworkbook.saved=true

oder soll etwa das Add-Inn immer als gespeichert gelten... ;-)

Grüße

Paddy


 

Beiträge aus den Excel-Beispielen zum Thema "Mappe als gespeichert markieren"