---

Hallo Edger,

ich bin auf der Suche nach einer Möglichkeit in bereits vorhandenen Zeichnungen die Hintergrundblätter durch die der mittlerweile geänderten Normal.Dft zu ersetzen.

Ein Weg wäre über die Zwischenablage mit Kopieren und Einfügen zu arbeiten. Das ist aber grausame Handarbeit und bei mehr als 500 Zeichnungen findet sich auch kein Freiwilliger dafür.

Hat jemand einen Makro dafür?

------------------
Gruß

Markus Gras
Unitec Informationssysteme GmbH

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

---

Hallo Markus

Ein Makro hab ich Dir leider nicht, aber ich würd gerne auch so eins kriegen. Solche Fälle kommen ab und zu vor hier...

Gruss

Eru...

------------------
P4 1.8GHz, Win 2k, GeForce3 Ti 200, SE V14 SP 10

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

---

Tach zusammen,

im SE-Programm Ordner gibts ein Tool "Open and Save", vielleicht könnt Ihr damit was machen. Müßte vielleicht über verknüpfungen gehen mit einem Makro. Binnicht drin im makro programmieren.

Gruß Stephan

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

---

Moin,

.. dennoch ist es ggf. nicht trivial was ist mit all den Referenzen,
die sich (meist) im Schriftteil befinden? Wo damit hin im neuen ...

Klaus

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

---

Hallo Klaus,

das ausfüllen der Felder im Schriftfeld ist nicht mehr das Problem.
Das macht ja jetzt ein Tool, aber in den alten Zeichnungen sind die Felder dafür noch nicht definiert, deswegen sollen ja die Hintergründe aus der neuen Vorlage übernommen werden.

------------------
Gruß

Markus Gras
Unitec Informationssysteme GmbH

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

---

Hi,

Moment, ich z.B.: habe diverse Referenzen, die zum Teil auf das Part
verweisen, im Schriftfeld -- wie man die (autom.)uebernehmen sollte ist mir nicht ganz klar. Zum  Teil sind es auch Ref. auf eigene Custom Felder.

Klaus

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

---

Servus Markus,

ich kann leider wegen der Sicherheitseinstellung auf unserer Firewall keinen VB-Code nach CAD.DE hochladen. Ich hab Dir aber unseren Code per Mail geschickt. Wenn möglich könntest Du bitte diesen Code für alle zugänglich hier posten.

Jürgen

------------------
50* SEV14SR10, 4* SEV15

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

---

ChangeBackgroundsheets.zip

Hallo Edger,

herzlichen dank an Jürgen anliegend das von mir gesuchte Tool für alle.
Hab allerdings selbst noch nicht reingesehen, wenn Ihr also Fragen habt, fragt mich nicht. 

------------------
Gruß

Markus Gras
Unitec Informationssysteme GmbH

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

---

Hallo Jürgen,
kannst du bitte mal ne kurze Anleitung geben wie das
funktioniert?
Ich kann auch die .vbp Datei mit VB6 nicht öffnen.

Ciao
Chris

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

---

Hi,

was fuer einen Fehler bekommst Du denn bei VB6 als hier war es AEG
no problems.

Klaus

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

---

Beim Doppelklick auf die Datei fängt VB das laden an,
bricht aber kurz danach ohne Fehlermeldung ab.

???

Chris

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

---

Hi,

dascha gediegen -- ist vielleicht beim download/entpacken etwas daneben
gegangen? hatt' ich schon mal nach dem neuladen gings. Ansonsten schick
mir 'ne mail dann sende ich Dir das, was bei mir lief, denn ohne Umwandeln wird es nicht gehen (Dateinamen)

Klaus

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

---

ChangeBackgroundSheets.zip

Hi,

so ich hab's das Tool mal schnell hacked, so dass es auch diejenigen
ohne VB6 benutzen koennen (Dateinamen). Wie ueblich: ohne Garantie, netz
doppelten boden, hosentraeger, fallschirm, boot ... <g>

Klaus

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

---

Hallo Jürgen

Bei mir meldet das Tool nach dem Start:
"Draftvorlage konnte nicht gefunden werden. Wenden Sie sich an den Administrator."
Was ist da falsch?

Gruss

Eru...

------------------
P4 1.8GHz, Win 2k, GeForce3 Ti 200, SE V14 SP 10

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

---

Hi,

hast Du's neu umgewandelt ansonsten gibt es diese Konstanten:
Const c_sVorlagenPfad As String = "\\solidserv\daten\Admin\Vorlagen\SeV14\"
Const c_sDraftVorlage0 As String = "normal.dft"
Const c_sDraftVorlage1 As String = "EngChinNormal.dft"

in jedem Fall muessen alle beide Vorlagen vorhanden sein egal welche Du auswaehlst.

Klaus

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

---

Hi

Nee, hab nix umgewandelt, ich kann VB gar nicht kompilieren.
Tja mit dem Vorlagenpfad haperts natürlich, könnt man den nicht variabel programmieren?
Und warum es eine EngChinNormal.dft braucht, kapier ich auch nicht ganz.

Gruss

Eru...

------------------
P4 1.8GHz, Win 2k, GeForce3 Ti 200, SE V14 SP 10

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

---

Moin,

ein paar Anmerkungen zum ChangeBackgroundsheets von Juergen:

1) das Programm prueft ob *beide* neuen Vorlagen vorhanden
  sind. ggf. also identische Namen eintragen

2) es wird generell an Hand der Formnummer ausgetauscht!
  Also ein altes A4-Hoch (29) durch ein neues A4-Hoch (29)
  Ist in einer alten Vorlage statt eines Normblattes z.B.: eine
  Stueckliste und enthaelt die neue Vorlage fuer diese Form
  ein Normblatt so wird die Stueckliste ueberschrieben.

3) es *kann* in der Endverarbeitung zu einem Runtime-Error
  kommen. Der Grund ist wahrscheinlich eine Version bei der
  das Schluesselwort "Vorlage" der SummaryInformation nicht
  vorhanden ist. Dies laesst sich pruefen:
  im Draft --> Datei/File
                --> Datei Eigenschaften/File Properties
                    --> Summary
  Unten links steht das Schluesselwort, ist es nicht "Vorlage"
  so ist in der Zeile im:
  Modul clsSolidEdgeDraft Funktion: ersetzeHintergrundblaetter()

  AktuellesDraft.Properties("SummaryInformation").Item("Vorlage").Value = FileString.ermittleDateiname(sNeueVorlage)

  der Wert fuer Item entsprechend zu ersetzen oder einfach auf Kommentar
  zu setzen. das Ganze trifft sicher nur auf die zu, die eine englische
  Version von SE haben.

4) es *scheint* das im gleichen Modul, gleiche Funktion noch ein Fehler
  enthalten ist, der zu einem nicht korrekten Ueberschreiben einer
  Vorlage fuehrt:

  Nach dieser Abfrage

  If Not bVorlagenSheetgefunden Then Debug.Print "Kein Blatt mit gleicher größer in Vorlage gefunden"

  laeuft das Programm weiter als ob ein Blatt gefunden worden waere und
  ueberschreibt das gerade aktuelle Blatt mit der letzen gefundenen neuen
  Vorlage z.b: aktuell Form 29 (Din A4 hoch) letztes neues Blatt Form 28
  DIN A4 Quer dann wird A4 hoch mit A4 Quer ueberschrieben.

  Abhilfe das:  IF .. Then  Konstrukt mit einem ELSE Zweig ergaenzen:

        [...]
        next
        If Not bVorlagenSheetgefunden Then
          Debug.Print "Kein Blatt mit gleicher größer in Vorlage gefunden"
  -->  Else
          AktuellesDraft.Activate
          Call objSEApp.StartCommand(DetailViewBackgroundSheet)      'Hintergrundblatt
   
          [...]
   
          Call objSEApp.StartCommand(DetailEditPaste)                'Zwischenablage einfügen
          Call System.Pause(1, True)
  -->  End If
    Next

Weitere Probleme sind nicht aufgetaucht -- Klasse Tool, verschaerftes Lob <g>

Klaus

@elsbet

ueber Deinem posting steht das Makro in dem Du die Namen vergeben kannst ansonsten hier
http://www.incobase.de/Download.html#chabackgrd

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

---

Hallo

Hab das Tool jetzt getestet, es lief jedenfalls.
Mein Problem ist primär, dass die ausgefüllten SMAP Organizer-Felder natürlich überschrieben werden. Dies lassen sich zwar wieder ausfüllen über den Organizer, aber eben, automatisch geht das nicht im Batchlauf.
Hat da einer ne Idee, wie das noch zu lösen wäre?

Gruss

Eru...

------------------
P4 1.8GHz, Win 2k, GeForce3 Ti 200, SE V14 SP 11

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

---

Hi,

hmm, vermutlich -- aber wie heissen die und wo stehen die?
noetigenfalls eMail

Klaus

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

---

Nachtrag: welche Version verwendest Du, die von meiner site ueberschreibt zumindest nichts in 'Custom' -- sin das GEDAS Felder
die bei Dir nach Lauf drinstehen?
Falls es brennt 04287 681 ggf. haeckseln wir das gleich Online rein

Klaus

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

---

Hallo

Ich verwende die Version von Deiner Site.
Organizer legt bei den benutzerdef. Eigenschaften eine Eigenschaft
"Organizer" an, und bei Wert stehen lauter Hieroglyphen drin.
Diese Werte werden auch nicht überschrieben, ich kann den Organizer auch aufrufen nach dem Changelauf. Aber Organizer arbeitet dann so, dass im Hintergrundblatt die Schriftfelder hocken, die beim drücken des "ausfüllen" buttons im Organizer dann ausgefüllt werden. Diese Felder werden natürlich gelöscht beim Ersetzen der Vorlage.
Ich vermute, da was zu machen wird schwierig.

Gruss

Eru...

------------------
P4 1.8GHz, Win 2k, GeForce3 Ti 200, SE V14 SP 11

[Diese Nachricht wurde von elsbett am 19. Feb. 2004 editiert.]

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

---

Hi,

ach so, also wenn mit 'Benutzer... Eigenschaft' Custom gemeint ist
sollte eigenlich nicht passieren. In meimem A4 steht z.B 'Masse' mit Wert drin un in der neunen Vorlage gibt's den nicht, dennoch ist er
nach dem Lauf wieder da ...
Schick mir vielleicht mal einen screen-shot -- dann blicke ich vielleicht besser durch
Klaus

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

---

ich glaube der Cent ist gefallen. Klar, wenn die neue Vorlage Schriftfelder (mit Variablen etc.) *nicht* enthaelt, dann sind sie
in der neunen Vorlage auch nicht enthalten Die Schriftfelder mit den
Variablen zum Beispiel fuer Titel, Doku-Nummer etc. habe ich manuell
erst ma in die neue Vorlage uebernommen und dann erst -- Schuss.
Aber da wird man sicher was machen koennen ... Beispiel Hintergrund
waere hilfreich (sensitive Daten loeschen bitte)

Klaus

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

---

Moin,

also die manuelle Loesung (wenn's nicht soviel Blaetter sind)
ginge so wenn die Lage der Schriftfelder (X/Y) gleich ist:

1) neue Vorlage sichern (wegen Restore) und open in SE

2) ein gesichertes Draft oeffnen, welches alle Hintergrund-Blaetter, die auch
  in der neuen Vorlage enthalten sind oeffen
 
3) jetzt Hintergrund-Blatt fuer Hintergrund-Blatt:

alles entfernen, was in der neuen Vorlage bereits enthalten ist:
--> Strg-A (Ctrl-A) dann Strg-A festhalten und mit Maus die Teile
    anklicken, die *nicht* geloescht werden sollen
    --> mit Entf/Del alles andere loeschen
dann nochmals mit Strg-A (Ctrl-A) den rest auswaehlen
  --> Strg-C (Ctrl-C)
entsprechendes neues Hintergrundblatt der neuen Vorlage anzeigen
  --> Strg-V (Ctrl-V)

alle Blaetter ?  --> 4)
    |
    V
    3)
   
4) neue Vorlage wenn ok sichern

5) alte Vorlage *nicht* sichern

6) jetzt kann per Programm getauscht werden

Ist zwar ibm jedoch sehr sicher ;-)

Klaus

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

---

hallo modeng,

ich habe das gleiche problem, dass beim dft wechsel die vorlage zwar getauscht wird, aber der zeichnungskopf nicht ausgefüllt ist. hast du noch eine andere lösung wie das in der masse geschehen könnte? wir habe schon über 1000 daten, welche ich anpassen muss, was ich nicht wirklich von hand machen möchte...

danke und gruss suntsi

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

---

Moin,

nein dazu habe ich keine Idee. Es wird nur das uebertragen was
sich auch dem neuen Hintergrundblatt befindet. Wird je Draft
individuell noch etwas in die Hintergrundblaetter geschrieben
so wird dies logischerweise beim Austausch geloescht.

modeng

------------------
For every problem there is one solution which is simple, neat, and wrong

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

---

oj oj oj

warum so kompliziert?
wie macht es konkurenz? auch solid....: ReMT vorlage austauschen und fertich ;-)

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

---

Jaja, ...works ... und dennoch musst du das dann bei jeder Datei manuell erledigen.
Bei 1000enden Zeichnungen auch wenig praktikabel. 

------------------
Gruß
René

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

---

Wer lesen kann ist klar im Vorteil, vor allem wenn er versteht was er liest.

Nehmt mal die Tomaten von den Augen und nehmt die Hilfen und Tips an die man Euch gibt ....

Wenn du einen Verbesserungswunsch hast, wende Dich an deinen Vertriebspartner der dafür sicher einen Call aufmacht.

In 3 Threads das gleiche schreiben zeigt zwar, das derjenige lesen kann ....

VG

Bernd

------------------
Was der Bauer nicht kennt, das isst er nicht!
Würde der Städter wissen was er isst,
er würde Bauer werden!

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