---

bräuchte für den inventor 8 prof
folgendes vba programm

wenn ich z.b. eine test.ipt (oder test.iam) habe, soll das programm mittels eines button`s, automatisch eine test.idw (im vorlagenverzeichnis die norm.idw nehmen) erzeugen, der speichername soll der gleiche name sein wie in der ipt, ist jedoch die test.idw bereits gespeichert (vorhanden) dann soll automatisch die test.idw geöffnet werden

hat jemand so etwas schon programmiert?

vielen dank im voraus

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

---

Hallo kleiner,

die Idee dazu verdient schon mal viele Units!

Wenn wir uns jetzt zusammen tun, dann haben wir so was auch schnell gemacht!

------------------
Gruß Lothar

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

---

Zitat:

---

Original erstellt von lbcad:
... Wenn wir uns jetzt zusammen tun, dann haben wir so was auch schnell gemacht!...

---

Dieser Satz... Wow... Also, ich habe Gänsehaut bekommen  Ich hätte auch schon einen Namen für euere Koalition: web.de & gmx.de Corporation  Spass bei Seite... Viel Spass beim Coden Jungs 

------------------
Grüße daywa1k3r

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

---

Zeichnung_anlegen.bas.txt

Hi,

ich habe da mal was zusammengestellt.

Hoffentlich hilft's  -->

------------------
Gruß Lothar

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

---

Ich brauche es zwar nicht, aber bei mir funzt es ! 

 

------------------
Grüße daywa1k3r

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

---

Guten Morgen,

ich brauche es, aber leider funktioniert es nicht!:-(

Gruß Arne

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

---

Hallo, suche auch so etwas ähnliches. Bei mir reicht es aber wenn zu der gerade geöffneten IDW die IPT geöffnet wird.

Ist eigentlich einfach.

Dateiname des aktiven Dokuments auslesen, hinten die erweiterung abknapsen, dann idw bzw ipt dranhängen und die datei mit dem Namen öffnen.

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

---

Hallo Schattenbacke,

das ist ja noch einfacher:

RMB auf die Ansicht - "Öffnen" auswählen und fertig  .

andersherum geht es auch, wenn man Subscription hat:

in der Modelldatei: IPT oder IAM

"Zeichnung öffnen".

BINGO

------------------
Gruß Lothar

---------------------------------------------------

Während man es aufschiebt, verrinnt das Leben.
Lucius Annaeus Seneca (ca. 4 v. Chr - 65 n. Chr.)

-----------------------------------------------------
Wir unterstützen die Arbeit der:
- Rettungshundestaffel des DRK Viersen
- Rettungshundestaffel Isar Ost

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

---

frmIDW.zip

Hallo,

für alle ohne Subscription und mit Userform zur Erstellung einer IDW sollte noch keine bestehen.
Anzupassen ist der Pfad zum IDW-Template und die Behandlung des Zeichnungsrahmens.

Anwendung auf eigene Gefahr!

Gruß
Reinhard

[Diese Nachricht wurde von rtend12 am 18. Apr. 2009 editiert.]

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

---

Zitat:

---

Original erstellt von lbcad:

RMB auf die Ansicht - "Öffnen" auswählen und fertig  ;).

---

Hallo, welche "Ansicht" denn?

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

---

Hallo,

die Ansicht der IDW deren Modell Du öffnen willst.

Gruß
Reinhard

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

---

@rtend12

hey vielen Dank für dein Programm! Das kann ich genau für meine Zwecke gebrauchen. Nun würde ich auch gerne mal das mit dem Rahmen machen. Nur leider bin ich wohl noch zu Nooby um in dem Programm zu sehen wie ich den Rahmen einstelle. Alles andere funktioniert soweit. Kannst du mir da nur kurz helfen, wenigstens die Zeilen sagen? Unities gibts natürlich auch 

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

---

Hallo Schsttenbacke,

folgender Code ist für Auswahl und einfügen des Rahmens zuständig:

On Error Resume Next
osheet.Border.Delete

Code:

---

Dim oBorder As BorderDefinition
For Each oBorder In oIDW.BorderDefinitions
    If InStr(oBorder.Name, osize_str) <> 0 Then
        osize_str = oBorder.Name
    End If
Next

osheet.AddBorder (osize_str)
On Error GoTo 0

---

Wie Du siehst ist es notwendig, dass Blatt und Rahmen den gleichen Namen haben.
Solltest Du eine andere Zuordnung wünschen mußt Du den Code deinen Wünschen anpassen.

Gruß
Reinhard

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