mit VBA PDF-Datei speichern

Dein Mac hat ein Sandbox-Feature und nun kannst Du nicht mehr auf Pfade ausserhalb Deines Containers zugreifen.

Auf deutsch: Ende im Gelände, das geht nicht mehr.

https://www.rondebruin.nl/mac/mac034.htm

Andreas.

Hallo,

wenn es nur darum geht, das Dokument als PDF zu versenden, so kannst du den entsprechenden Befehl "Senden" der Symbolleiste für den Schnellzugriff hinzufügen. Es wird eine E-Mail erstellt, der das Dokument als PDF-Datei angehängt ist.

Geht es darum, das Dokument per einfachem Mausklick (ohne Rückfrage) als PDF-Datei zu speichern, findest du in folgender Diskussion ein passendes Makro: http://ideophone.org/one-click-save-as-pdf-word-2007-2010-2013/

Soll bei jedem (Zwischen-)Speichern des Dokuments gleichzeitig eine Kopie unter gleichem Namen im selben Ordner als PDF-Datei hinterlegt werden, müsstest du ebenfalls eine VBA-Lösung verwenden.

Viele Grüße

Lisa

Hallo Claus,
<br />das hat bestens geklappt, Dankeschön.
<br />Claus ,ich habe jetzt das Programm auf den Windowsrechner übertragen. Alle Pfade etc entsprechend umgestellt. Soweit bis auf eine Fehlermeldung ist auch alles ok.
<br />Ich bekomme jetzt aber in der Tabelle "AuswertungSchuelerliste" bei einer Datenprüfung der Namen den Fehler "Funktion ungültig"
<br />Die Funktion wurde auf dem Rechner folgendermaßen verändert;
<br />=_xlfn._xlws.FILTER(Anwesenheitsliste!B15:B116;ISTZAHL(SUCHEN(AuswertungSchueler!H5;Anwesenheitsliste!B15:B116));"Nicht gefunden")
<br />vorher war es
<br />=FILTER(Anwesenheitsliste!B15:B116;ISTZAHL(SUCHEN(AuswertungSchueler!H5;Anwesenheitsliste!B15:B116));"Nicht gefunden")
<br />Ich kann das auch nicht rückgängig machen
<br />Weißt du, was da passiert ist?
<br />VG
<br />Andreas
<br />

Hallo Mallorca

Ich bin Anna und helfe Ihnen gerne bei Ihrer Frage. In diesem Forum sind wir Microsoft-Verbraucher wie Sie.

Entschuldigung für den Ärger, den dies verursacht haben könnte. Ich sehe, dass Sie Excel als PDF mit VBA speichern möchten, wenn Sie das Recht haben, sehen Sie sich bitte den folgenden Link an, um dies zu speichern

https://exceloffthegrid.com/vba-code-save-excel-file-as-pdf/

Hinweis: Dies ist eine Website, die nicht von Microsoft stammt. Die Seite scheint genaue und zuverlässige Informationen zu liefern. Hüten Sie sich vor Werbung auf der Website, die für Produkte wirbt, die häufig als PUPs (potenziell unerwünschte Produkte) klassifiziert werden. Recherchieren Sie gründlich über jedes Produkt, das auf der Website beworben wird, bevor Sie es herunterladen und installieren.

Ich hoffe, das hilft ;-), lassen Sie mich wissen, wenn dies im Widerspruch zu dem steht, was Sie brauchen, ich wäre immer noch hilfreich, um mehr von Ihren Fragen zu beantworten.

Alles Gute

Anna

Geben Sie der Gemeinschaft etwas zurück. Helfen Sie der nächsten Person mit diesem Problem, indem Sie angeben, ob diese Antwort Ihr Problem gelöst hat. Klicken Sie unten auf Ja oder Nein.

Diese Antwort ist automatisch übersetzt worden. Daher kann sie grammatikalische Fehler oder fremde Ausdrücke enthalten.
<br />

Hallo Andreas,
<br />probiere es mal so:
<br />

Sub PDF()

With ActiveSheet

With .PageSetup

.PrintArea = "$A$1:$R$31"

.Orientation = 2

End With

.ExportAsFixedFormat Type:=xlTypePDF, _

Filename:="C:\Users\claus\Desktop\ErgebnisseSchueler\" & Date & "_" & _

Range("H5") & "_" & Range("J5") & ".pdf", Openafterpublish:=True

End With

MsgBox ("PDF ist gespeichert")

End Sub

Claus
<br />