Office: (Office 2013) PDF nach speichern nicht öffnen

Moin,
ich habe dieses Makro:
Sub PDF()
With ActiveSheet
With .PageSetup
.PrintArea = "$A$1:$e$46"
.Orientation = 2
End With
.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:="H:\Dienstpläne\" & "" & _
Range("I1")
End With

MsgBox ("PDF ist gespeichert")
End Sub

um PDF zu speichern.
Ich möchte es aber, wenn es gespeichert wurde, das die PDF sich nicht öffnet.

Vielen dank für die Mühen.

 

Hola,
mach mal ein leere Tabelle auf, speichere diese als PDF. Hier solltest du nach der Wahl des Ordners und der Wahl des Typs PDF eine Option sehen: Datei nach Veröffentlichen öffnen. Mach den Haken mal weg und speicher das Dokument. Excel schließen, deine Datei mit dem Makro aufmachen, laufen lassen. Wird das PDF immer noch automatisch geöffnet?
Gruß,
steve1da

 

Moin,
Danke hat geklappt.

Ich hätte da noch eine frage.
Ich habe für jeden Fahrer ein Makro, das das Excelblatt als PDF gespeichert wird.
Gibt es die Möglichkeit, alle 17 gleichzeitig auszulösen?
PS: klappt doch nicht.
einmal hat es geklappt, aber jetzt nicht mehr.
Vielen dank für die Mühen.

 

Sorry, aber ich bin kein VBA'ler.

 

Leider klappt es nur bei einem Blatt.
die anderen öffnen sich alle, wenn sie gespeichert wurden.

 

Moin steve,
vielleicht kein VBA'ler, aber sicher ein klasse Formel-Jongleur, meinen dicken Respekt

VBAstler gibt's hier: www.vbasteleien.de

Aber die Vorschläge dort: gleich zwei VBAstler hatten ihm eine Komplett-Lösung für seine geschätzten 1200 Probleme angeboten, sind Jens/Hobbit noch nicht mal eine Antwort wert.

Also lassen wir den Foren-Nomaden mal weiterziehen...

Grüße

 

Danke für die Blumen und den Hinweis.
Schade das er das mehrfache Crossposting nicht mitgeteilt hat. So haben halt mehrere Leute umsonst oder doppelt gearbeitet...

 

Hi,

die ExportAsFixedFormat-Methode hat doch noch den Parameter 'OpenAfterPublish'
Den musst Du mit False angeben.

 

@{Boris}
Vergebene Liebesmüh.
Er wird sich bedanken und den Tipp in spätestens einer Woche, nachdem er fünf weitere Fragen gestellt hat, wieder vergessen.
Es gibt leider Fragende, deren Lernkurve einer Asymptote zur Horizontalen ähnelt.
[sorry für die harschen Worte]

 

@rpp_neu: harsch? traurig aber wahr ...

 

Sag mal, Hobbit!? Geht's noch??