Speicherdialog beim Speichern einer jpg-Datei verhindern

[Karthagos]

wenn ich eine jpg-Datei bearbeite und dann unter dem gleichen Namen speichere (Strg+S) erscheint der Dialog "Exportieren nach JPEG", den ich, auch wenn ich keine Einstellungen (wie z.B. Qualität oder Farbmodus, etc.) verändere, mit OK bestätigen muss.
Eine Möglichkeit, den Filterdialog abzustellen, gibt es nur, wenn ich speichern unter (Strg+Umschalt+S) auswähle:
      
die Einstellung hat aber auf die Exportmaske bei Speichern keinen Einfluss.
 
Wenn ich z.B. in einer Office-Anwendung (Word) in einer bereits gespeicherten Datei "Datei speichern" anklicke, wird das Speichern der Veränderungen ohne weitere Rückfrage ausgeführt.

[koter]

Hallo Günther,

...Wenn ich z.B. in einer Office-Anwendung (Word) in einer bereits gespeicherten Datei "Datei speichern" anklicke, wird das Speichern der Veränderungen ohne weitere Rückfrage ausgeführt....

in Word werden nur die Änderungen gespeichert. Bei einem Format wie JPG oder PNG werden durch den Kompressions-Algorithmus aber auch unbearbeitete Bildbereiche verändert. In den meisten Fällen wirst Du das nicht sehen, es können aber Artefakte und Farbveränderungen entstehen (hatte ich schon).
Bei jedem Speichervorgang erhöht sich dieses Risiko.

Das erscheinen des Dialogs halte ich deshalb für gut und richtig!

Ich benutze während der Bearbeitungsphase ein Format ohne oder mit verlustfreier Komprimierung (meistens CPT, da bleiben Masken und Objekte erhalten). Bei solchen Formaten werden (wie in Word) nur die Änderungen gespeichert. Nicht bearbeitete Bildbereiche bleiben unangetastet und es erscheint kein Dialog beim Speichern.

Erst nach der Bearbeitung exportiere ich in das Zielformat.

Den Dialog kann man nicht abschalten, Du könntest aber ein Makro zum Speichern verwenden:

Code:

Sub SpeichernOhneDialog()
   Dim ExpF As ExportFilter
   Select Case UCase(Right(ActiveDocument.FileName, 3))
       Case "JPG"
           Set ExpF = ActiveDocument.SaveAs(ActiveDocument.FullFileName, cdrJPEG): ExpF.Finish
       Case "PNG"
           Set ExpF = ActiveDocument.SaveAs(ActiveDocument.FullFileName, cdrPNG): ExpF.Finish
       Case Else
           ActiveDocument.Save
   End Select
End Sub

Ich würde die Verwendung des Makros aber aus den oben genannten Gründen nicht empfehlen!

Gruß

Koter

[Karthagos]

Guten Morgen Koter,

danke für die ausführliche Erklärung. Da richte ich mich nach Deiner Empfehlung und nehme den zusätzlichen Klick auf OK in Kauf.

Zur Bearbeitung mit der CPT-Datei; das nutzt mir aber nichts, wenn ich eine schon vorhandene jpg-Datei bearbeiten und speichern will?

[koter]

Hallo Günther,

Zur Bearbeitung mit der CPT-Datei; das nutzt mir aber nichts, wenn ich eine schon vorhandene jpg-Datei bearbeiten und speichern will?

Doch, die kannst Du ja auch als CPT speichern!