[GastForen Programme Print/Bildbearbeitung Corel Draw/ Corel Designer/Corel CAD Seiten in Corel X7 automatisch umbenennen

  • Suche
  • Hilfe
  • Lesezeichen
  • Benutzerliste
Print/Bildbearbeitung - Photos, Layout, Design
Themen
Beiträge
Moderatoren
Letzter Beitrag

Seiten in Corel X7 automatisch umbenennen

Mike05
Beiträge gesamt: 63

28. Apr 2015, 11:49
Beitrag # 1 von 8
Bewertung:
(5714 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo liebe Leute,

ich suche eine Möglichkeit in einer großen Corel Draw X7 Datei (Seriendruck - 1000 Seiten) diese Seiten automatisch zu benennen.
Ideal wäre es, wenn ein Seriendruckfeld ausgelesen würde und dieser Inhalt dann den jeweiligen Seitenname ergäbe.

Hat irgend jemand eine Idee??? Vielleicht mittels Makro??

Danke schon einmal im voraus

Mike
X

Seiten in Corel X7 automatisch umbenennen

Henry
Beiträge gesamt: 950

28. Apr 2015, 17:09
Beitrag # 2 von 8
Beitrag ID: #539232
Bewertung:
(5679 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hi,
ich kenn die Seriendruckfunktion von Corel gar nicht, aber vermutlich sind im "zusammengeführten Dokument" keinerlei Bezüge mehr zu den Datenfeldern vorhanden?
Das Problem ist also, auf den 1000 Seiten jeweils genau DEN Text (=ehemaliges Datenfeld) rauszupicken, der den neuen Seitennamen ergeben soll?!

Frage: Ist es möglich, im Seriendruck-Hauptdokument dem gewünschten Datenfeld einen bestimmten Namen (also statt "Grafiktext" z.B. "als_Seitenname") zu geben, und dieser neue Name wird auch vom/im "zusammengeführten Dokument" auf allen Seiten übernommen?
DANN sollte dieses Makro die Aufgabe lösen:
Code
Sub Neue_Seitennamen_zuweisen() 
Dim doc As Document
Dim p As Page
Dim s As Shape

Set doc = ActiveDocument
For i = 1 To doc.Pages.Count 'alle Seiten durchlaufen
Set p = doc.Pages(i)
'nun die Seite nach einem Textobjekt namens "als_Seitenname" durchsuchen
Set s = p.FindShape(Name:="als_Seitenname", Type:=cdrTextShape)
If s Is Nothing Then 'Warnmeldung ausgeben
MsgBox "Ein Textfeld 'als_Seitenname' wurde nicht gefunden auf Seite " & p.Index
Else
p.Name = s.Text.Story 'Seite umbenennen
End If
Next i
End Sub



als Antwort auf: [#539213]

Seiten in Corel X7 automatisch umbenennen

Henry
Beiträge gesamt: 950

29. Apr 2015, 08:57
Beitrag # 3 von 8
Beitrag ID: #539252
Bewertung:
(5618 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Antwort auf [ Henry ] Frage: Ist es möglich, im Seriendruck-Hauptdokument dem gewünschten Datenfeld einen bestimmten Namen (also statt "Grafiktext" z.B. "als_Seitenname") zu geben, und dieser neue Name wird auch vom/im "zusammengeführten Dokument" auf allen Seiten übernommen?

Antwort: Ja, der Objektname wird an alle Seiten des Serien-Dokuments weitervererbt! :-)
Hab es eben kurz ausprobiert.


als Antwort auf: [#539232]

Seiten in Corel X7 automatisch umbenennen

Mike05
Beiträge gesamt: 63

29. Apr 2015, 13:19
Beitrag # 4 von 8
Beitrag ID: #539282
Bewertung:
(5565 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
@ Henry super vielen Dank
klappt hervorragend.

Jetzt habe ich aber noch eine weitere Frage :-)
Kann man in Corel auch aus einem Seriendruckfeld heraus ein Farbfläche füllen?

Es geht um Etiketten für einen Farbhersteller. (so knapp 8.000 Stück, verschiedene Füllgrößen u.ä.)
alle Daten liegen in einer Excel Datei und werden über die Seriendruckfunktion in das Hauptdokument eingefügt.
Nun soll aber auch die jeweilige Farbe auf dem Etikett erscheinen.(HKS als C4 angelegt)
Bisher denken wir an viel Handarbeit, aber vielleicht gibt es ja noch eine andere Möglichkeit?
Für alle Hinweise offen….. und schon mal vielen Dank
Mike
.


als Antwort auf: [#539213]

Seiten in Corel X7 automatisch umbenennen

Henry
Beiträge gesamt: 950

29. Apr 2015, 18:42
Beitrag # 5 von 8
Beitrag ID: #539312
Bewertung:
(5525 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Antwort auf [ Mike05 ] ...
Kann man in Corel auch aus einem Seriendruckfeld heraus ein Farbfläche füllen?...

Ich gehe mal davon aus, dass sowas nicht möglich ist, auch nicht in X7 oder X99. Mit der Seriendruckfunktion befüllst du doch nur vorgegebene Textfelder mit Daten!? Deshalb ist diese simple Funktion für komplexere "Datenbankoperationen" auch nicht besonders geeignet.

ABER über den Trick mit den Objektnamen lassen sich später im zusammengeführten Dokument* alle gewünschten Elemente per Makro unkompliziert addressieren, und dann kannst mit diesen Elementen ALLES 'vollautomatisch' bewerkstelligen: auslesen, manipulieren, löschen und auch einfärben. :-)

*) großer Nachteil ist halt, dass man/CorelDraw dann schon 1000 oder 8000 Seiten an der Backe hat, damit würde manch anderes Programm ganz schwer in die Knie gehen


als Antwort auf: [#539282]

Seiten in Corel X7 automatisch umbenennen

Mike05
Beiträge gesamt: 63

30. Apr 2015, 12:17
Beitrag # 6 von 8
Beitrag ID: #539334
Bewertung:
(5456 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Henry,

danke für die Info.
Dass "MAN" mit Makros das alles machen kann finde ich gut. Leider gehöre ich nicht zu diesen man :-(
Wie wäre den dann so der Workflow?
Ich(!) kann über die Seriendruckfunktion auf der Seite dem Feld den gewünschten Namen zuweisen, dann zusammenfügen, und dann habe ich 1000 Seiten auf denen jede Seite ein entsprechendes Feld hat, das auf die einzusetzende Farbe verweist. soweit verstanden, aber...
Wie bringe ICH dem Dokument bei, nun die entsprechende Farbe in dieses Feld einzusetzen??
Hast du da eine Idee??
(wie gesagt, es geht letztlich um ca. 8.000 Artikel)
Danke Mike


als Antwort auf: [#539312]

Seiten in Corel X7 automatisch umbenennen

Henry
Beiträge gesamt: 950

4. Mai 2015, 09:34
Beitrag # 7 von 8
Beitrag ID: #539389
Bewertung:
(5330 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Also falls Interesse besteht, könntest du mir aus deinem Seriendoc 3 oder 4 Seiten abspeichern und zwar in der/als Version X4. Muss nicht das endgültige Layout sein - nur sollten schon alle Datenfelder/Grafikelemente enthalten sein. Dann würde ich mir das in den nächsten Tagen mal näher anschauen.
Eine meiner "E-Müll"-Adressen habe ich (kurzfristig) im HDS-Profil hinterlegt.


als Antwort auf: [#539334]

Seiten in Corel X7 automatisch umbenennen

Mike05
Beiträge gesamt: 63

4. Mai 2015, 18:45
Beitrag # 8 von 8
Beitrag ID: #539404
Bewertung:
(5241 mal gelesen)
URL zum Beitrag
Beitrag als Lesezeichen
Hallo Henry,
Danke für das Angebot.
Nun habe ich seit heute die Info, das der "Neue tolle Drucker" sich die Farben selbst aus einer Tabelle zieht.
Es muss lediglich eine Farbfläche mit einer Schmuckfarbe im Hauptdokument als Farbfläche definiert sein, und fertig.
Problem gelöst, nur einmal anlegen, Maschine macht den Rest. Alles gut.
Nochmal Danke
Mike


als Antwort auf: [#539389]
X

Aktuell

Farbmanagement
colorant_300

Veranstaltungskalender

Hier können Sie Ihre Anlässe eintragen, welche einen Zusammenhang mit den Angeboten von HilfDirSelbst.ch wie z.B. Adobe InDesign, Photoshop, Illustrator, PDF, Pitstop, Affinity, Marketing, SEO, Büro- und Rechtsthemen etc. haben. Die Einträge werden moderiert freigeschaltet. Dies wird werktags üblicherweise innert 24 Stunden erfolgen.

pdf-icon Hier eine kleine Anleitung hinsichtlich Bedeutung der auszufüllenden Formularfelder.

Veranstaltungen
02.02.2023

Prozesse optimieren und effizient gestalten

Zürich
Donnerstag, 02. Feb. 2023, 08.00 - 10.00 Uhr

Digitalisierung, Webauftritt

Digitalisierung mitgestalten - Worauf kommt es an? Wie wichtig ist die Webseite? Webseite mit Word Press? Interne Prozesse optimieren

Ja

Organisator: B. Isik - SNF Academy

Kontaktinformation: Birol Isik, E-Mailinfo AT bkcc DOT ch

https://digitalisierung-heute.ch/digitalisierung-informationstag-schweiz/

Veranstaltungen
01.03.2023 - 09.03.2023

Online
Mittwoch, 01. März 2023, 00.00 Uhr - Donnerstag, 09. März 2023, 00.00 Uhr

Online Webinar

Wie gehen wir mit diesen Veränderungen um? Was ist notwendig, damit wir die Digitalisierung im Unternehmen klappt? Veränderungsprozesse verstehen und entsprechend handeln Mitarbeiter als Botschafter Webseite mit WordPress erstellen SEA /SEO (Ads aufschalten)

Ja

Organisator: B. Isik - SNF Academy

Kontaktinformation: B. Isik, E-Mailinfo AT snfa DOT ch

https://www.fernstudiumfitness.ch/digitalisierung-schweiz/