Hot News:

Mit Unterstützung durch:

  Foren auf CAD.de (alle Foren)
  CATIA V5 Programmierung
  Per Makro als pdf speichern (ohne letztem Blatt)

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Die Gewinne der Zukunft werden mit intelligenten, autonomen Elektrofahrzeugen eingefahren. (3DEXPERIENCE)
Autor Thema:  Per Makro als pdf speichern (ohne letztem Blatt) (131 mal gelesen)
stefan451
Mitglied



Sehen Sie sich das Profil von stefan451 an!   Senden Sie eine Private Message an stefan451  Schreiben Sie einen Gästebucheintrag für stefan451

Beiträge: 51
Registriert: 24.11.2017

PTC Creo Modeling/Annotation 19.0
PTC Creo 5.0
Catia V5R19

erstellt am: 01. Apr. 2021 14:37    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,
wie müsste ich dieses Makro umschreiben damit er mir das letzte Blatt nie als pdf mitspeichert (letztes Blatt soll immer ausgelassen werden):

Sub CATMain()

Dim oDoc As Document
    Dim DocName As String
    Dim DocPath As String
    Dim PDFPath As String
 
    Set oDoc = CATIA.ActiveDocument
 
    DocName = oDoc.Name
    DocPath = oDoc.Path
    PDFPath = DocPath & "\" & Left(DocName, Len(DocName) - 11) & ".pdf"
 
    'Debug.Print "PDF Path: " & PDFPath
 
    oDoc.ExportData PDFPath, "pdf"

End Sub


Vielen Dank im Voraus 

Beste Grüße
Stefan

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

stefan451
Mitglied



Sehen Sie sich das Profil von stefan451 an!   Senden Sie eine Private Message an stefan451  Schreiben Sie einen Gästebucheintrag für stefan451

Beiträge: 51
Registriert: 24.11.2017

PTC Creo Modeling/Annotation 19.0
PTC Creo 5.0
Catia V5R19

erstellt am: 01. Apr. 2021 14:49    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Noch eine Info:
Das letzte Blatt ist immer ein "Detailblatt".
Gibt es irgendeine Möglichkeit die "Detailblätter" beim speichern als pdf auszuschließen?

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

bgrittmann
Moderator
Konstrukteur


Sehen Sie sich das Profil von bgrittmann an!   Senden Sie eine Private Message an bgrittmann  Schreiben Sie einen Gästebucheintrag für bgrittmann

Beiträge: 11340
Registriert: 30.11.2006

CATIA V5R19

erstellt am: 01. Apr. 2021 18:22    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für stefan451 10 Unities + Antwort hilfreich

Servus Stefan

Ich meine dieses Thema wurde schon öfters angesprochen (bitte Forensuche verwenden).
Mögliche Lösungen sind:

  • Zeichnung per PDF-Drucker ausdrucken (dabei Detailsheet ausschließen)
  • PDF per ExportData erstellen und mit einem externen Tool (Ghostscript?) die falschen Seiten entfernen
  • PDF per ExportData erstellen (pro Seite eine Datei) und mit einem externen Tools Seiten zusammenfügen

Gruß
Bernd

------------------
Warum einfach, wenn es auch kompliziert geht.

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2021 CAD.de | Impressum | Datenschutz