---

Hallo Leute,

ich benötige mal wieder eure Hilfe!

Hier meine Frage:

Wir haben im Schriftfeld den Eintrag Kostenstelle, dieser wird auch immer von Hand in den iProperties in jeder Zeichnung (Modell) des Projektes eingetragen! Ist es möglich diesen im Schriftfeld der IDW zu automatisieren, da sich viele Projekte wiederholen und sich nur die Kostenstelle für Buchhaltung und Werker ändert?

Vielen Dank im voraus!
R.Riedel

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

---

Schriftfeld_Kostenstelle.jpg

du mußt nur hinterlegen das das iPropertie im Zeichnungskopf aus dem Modell übernommen wird.

Dafür die definition Bearbeiten und an der Stelle wo es händisch eingetragen wird ein Textfeld vom Typ Eigenschaften Modell mit Eigenschaft Kostenstelle.

MfG MacFly

------------------
- - - der Erleuchtung ist es egal wie du Sie erlangst - - -
- - - Wir leben alle unter demselben Himmel, aber wir haben nicht alle denselben Horizont - - - (K. Adenauer)

[Diese Nachricht wurde von MacFly8 am 06. Jun. 2013 editiert.]

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

---

Hallo MacFly8,

genau das wollte ich gerade nicht!

Nach deinem Vorschlag muss ich dies dann in jeder Modell-Datei(IPT)im Projekt machen.
Ich möchte die Kostenstelle an einer zentralen Stelle ändern, mit auswirkung auf alle Zeichungen (IDWs)im Projekt.

MfG
R.Riedel

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

---

Hey Möve,

ich denke dass Du Auftragsbezogen arbeitest und den Kostenrträger als Referen auf der Zeichnung haben möchtest.
Das mag der Buchhalter vielleicht Kostenstelle nennen ist aber eigendlich nur eine Projektbezeichnung.
Diese bleibt dann mit den Zecinungen fest verheiratet wenn Du sie von der ipt ableitest.

Also musst Du irgend eine andere Info abfragen.

Wie wäre es mit dem Speicherort?
Wenn Deine Zeichnungen immer in einem Projektordner liegen kannst Du den da einfügen.

------------------
Gruß Frovo

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

---

Hallo Frovo,

diese überlegung hatte ich auch, dachte dabei aber mehr an den Namen der Projekt-Datei(IPJ).
Leider konnte ich hierzu nichts in den iProperties finden!
Der Speicherort ist auch einfach zu lang da dies in Server, Laufwerk, Kunde, Jahr, Projekt, Projekt-Datei... aufgegliedert ist. Am liebsten wäre mir wie gesagt die Kostenstelle an einer Zentralen stelle zu ändern!

MfG
R.Riedel

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

---

Dann kannst Du noch die Kostenstelle nehmen und die dann im Windows Explorer ändern.
Dazu musst Du dann nur im Explorer nach *.ipt suchen und dann in der Trefferliste alle markieren RMK - Reiter iproperties und die Kostenstelle Eigenschaft eingeben. Das gilt dann für alle markierten ipt!

------------------
Gruß Frovo

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

---

Anmerkung:

es kann auch sein das dass Projekt das gleiche ist, es ist halt nur ein neuer Auftrag 1 Jahr später.
Bedeutet aber für die Konstruktion und Werker Abrechungsstunden nach neuer Kostenstelle.
Im Augenblick wird dies dann in jeder Zeichnung geändert, oder von Hand vermerkt (dies ist leider sehr Aufwendig aber nötig da jeder bei uns seine Stunden nach KST aufschlüsseln muss und sie dem Projekt zugeordnet werden).

MfG
R.Riedel

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

---

Hallo Frovo,

leider ist das nicht möglich.
So bald eine KST in der IPT eingetragen wurde, kann ich im Win-Explorer nur eine Datei ändern, bei markieren von mehreren ist das Feld Kostenstelle ausgegraut.

MfG
R.Riedel

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

---

Code:

---

'Nachsehen ob der Parameter Kostenstelle ausgefüllt ist
Title = iProperties.Value("Project","Cost Center")
If Title = "" Then
'Dialogbox zum Ausfüllen der Kostenstelle
Title = InputBox("Bitte die Kostenstelle eintragen", "iProperties Check", "Kostenstelle")
iProperties.Value("Project","Cost Center") = Title

End If

---

da hast du ein bißchen Ilogic Code.
Mit dem passenden Ereignisauslöser hast du jetzt zumindest schonmal eine Abfrage nach dem Wert.

Wenn man ein paar mehr InfoŽs hätte kann man bestimmt noch was besseres basteln...
z.B. auf alle im aktiven Dokument referenzierten Teile anwenden.

Codeidee ist von hier

http://ww3.cad.de/foren/ubb/Forum50/HTML/029220.shtml

vielleicht hilft dir ja der weg mit der externen Excelliste.

Mfg MacFly

------------------
- - - der Erleuchtung ist es egal wie du Sie erlangst - - -
- - - Wir leben alle unter demselben Himmel, aber wir haben nicht alle denselben Horizont - - - (K. Adenauer)

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

---

Zitat:

---

Original erstellt von Möve:
Hallo Frovo,

leider ist das nicht möglich.
So bald eine KST in der IPT eingetragen wurde, kann ich im Win-Explorer nur eine Datei ändern, bei markieren von mehreren ist das Feld Kostenstelle ausgegraut.

MfG
R.Riedel

---

Wenn Du dann tŽrotzdem in das Feld gehst und den richtigen Kostenträger eingibst wird dieser Text schwarz. Dann Ok und alle sind geändert.

------------------
Gruß Frovo

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

---

Hallo frovo,

vielen Dank!!
Für mich war das ausgegraut Feld nicht bearbeitbar, da in anderen Felder die Schrift schwarz war.
Ich werde diese Variante erstmal bevorzugen.

McFly8
Bei iLogic und VBA muss ich mich erst noch belesen, habe zwar über VBA Änderungsdatum/Zeit und Maßstab in Schriftfeld eingefügt, aber zum Programmieren reicht das nicht.

Vielen Dank an euch beide  !!!

MfG R.Riedel

[Diese Nachricht wurde von Möve am 07. Jun. 2013 editiert.]

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