|
INVENTOR VBA : Officeanbindung
Meyer01 am 05.03.2006 um 17:20 Uhr (0)
Einen guten Tag. Nachdem ich mit der Makro Technik meine Modell- und Zeichnungsdateien erstellen kann, möchte ich diese gern mit Word dokomentieren (Qualitätsprotokoll). Dazu möchte ich gern eine Bilddatei der Zeichnung, oder der Modelle in das Worddokument einbinden. Also das Worddokument und die Bilddatei zu erstellen ist kein Problem. Jedoch diese Bildatei in das Worddokument einzubinden gelingt mir einfach nicht. Hat jemand eine Idee? ------------------Meyer01
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : .DisplayName
3D-User am 02.04.2013 um 19:50 Uhr (0)
Hallo ForumFolgender Code: Dim oDrawDoc As DrawingDocument Set oDrawDoc = ThisApplication.ActiveDocument Dim oFileName As String oFileName = Left(oDrawDoc.DisplayName, Len(oDrawDoc.DisplayName) - 4)....In “oDrawDoc.DisplayName” steht eigentlich der Dateiname der Zeichnung (12345678.idw).Aber nicht immer!Auf manchen Rechner ist das Ergebnis nur „12345678“ ohne .idw!Die Rechner sollten eigentlich gleich sein, die Software auch.Hat jemand eine Erklärung dafür?Mfg 3D-User
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Bauteil-Achsen in Zeichnungen einschließen
KAME-WJ am 07.08.2018 um 14:49 Uhr (1)
Hallo KraBBy,bis jetzt funktioniert alles einwandfrei! Danke nochmal.Wäre es denn möglich ein neues Makro in Anlehnung an dieses zu erstellen, um in einer Zeichnung die Schnittbeteiligung eines einzelnen Bauteils zu ändern? jetziger Arbeitsverlauf: Bauteil auswählen - Rechtsklick - Schnittbeteiligung - "Schnitt" oder "Kein" wählenHätte es selber versucht aber leider nicht geschafft.------------------"ENGINEER"noun. [en-juh-neer]Someone who does precisionguesswork based on unreliabledata provided by those o ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Stückliste per Makro auslesen
rkauskh am 23.08.2012 um 16:17 Uhr (0)
HalloJa, eine Baugruppe und Zeichnungsableitung davon. Der Code ist sauber, der läuft bei mir mit 2011 und 2013 problemlos. Kannst du mal eine Demobaugruppe machen, die iProps füllen (mit Fantasiename und -teilenummer), Zeichnung mit Teileliste davon (Schriftfeld entfernen) erstellen und das als Zip hier reinstellen, falls mit der Demo-BG die gleichen Probleme auftreten?Die Bezeichnung die im Textfelddialog angezeigt wird, ist mM ein typischer Übersetzungsfehler im Inventor. Mal übersetzt man Description m ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Schweißnahtnummern in IDW einfügen
dittmarc am 16.07.2012 um 08:08 Uhr (1)
Hallo Ralf,funktioniert soweit super. Es wird auch angezeigt was es für eine Schweißnaht ist.Die Einschränkung bezüglich Ansicht und Nummerierung ist OK, da die Schweißnahtnummern i.d.R. nur in einer Ansicht platziert werden.Zwei Sachen fallen mir auf: 1. Ich kann die Ansicht nicht speichern, d.h. nachdem ich die Zeichnung geschlossen habe und wieder öffne sind die Positionsnummern weg...Und 2. Ist es Möglich die Sechseckige Form der Positionsnummern für die Schweißnahtnummern zu verwenden?.Gibt es die Mög ...
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Zeichnungstexte einfügen in IDW per VBA-Macro
PaulSchuepbach am 21.07.2006 um 09:37 Uhr (0)
Hallo Helmut,txt-Datei auslesen: Dim actLine As String Open "Pfad&DateinamemeineTXTdatei.txt" For Input As #1 Do While Not EOF(1) Zeilenweise auslesen, bis Dateiende erreicht ist Line Input #1, actLine Testausgabe Debug.Print actLine Loop Close #1Text in Zeichnung einfügen: s. in der API-Hilfe unter Samples: Add a general note to a drawing sheetBTW: bitte solche Beiträge ins IV-VB(A)-Forum stellen...Grüsse, Paul www.morecam.ch www.thinkcad.de [Diese Nachricht wu ...
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : IDW:(PL) Add-In-Funktin von Drittanbieter ausführen und auf Place-Funktion reagieren?
mb-ing am 16.04.2020 um 10:13 Uhr (1)
Zitat:Original erstellt von RolandD:Wie wäre das:1. an beliebige Stelle (z.B. 0,0) platzieren lassen2. mit VBA auf die gewünschte Position verschiebenHallo Roland,danke für Deine Antwort.Leider geht das nicht, da das Add-In des Drittanbieters explizit einen Klick mit der linken Maustaste auf eine Position in der Zeichnung erwartet.Bevor das nicht erfolgt ist, wird keine Stückliste aus dem PLM auf der ZN platziert...Danke und GrüßeMB-Ing.------------------Wissen ist Macht. Nichts wissen macht auch nichts
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Eigenschaftsfelder via API ändern
ChristianS am 11.11.2004 um 09:24 Uhr (0)
Hi Gemeinde, ich möchte in bestehenden Zeichnungen via API ein Eigenschaftsfeld auslesen, bzw. dessen Zuordnung verändern. Auf die titleblockdefinitions bin ich schon gekommen, jedoch finde ich den Punkt nicht, wie ich an die Eigenschaftsfelder komme. sind das vielleicht die Textboxes im Sketch ? Der Ablauf den ich erstellen will sieht in etwas so aus : 1.) Zeichnung öffnen 2.) Eigenschaftsfelder in den Schriftfeldern durchsuchen und herausfinden, welche auf Modelleigenschaften gemappt sind 3.) Mapping ...
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Layer in automatisch erstellter DXF-Datei
SKING am 08.05.2008 um 12:53 Uhr (0)
Hallo Roman1000,um die lässtigen Punkte loszuwerden, gehe ich folgendermaßen vor:(natürlich alle Abläufe mit VBA in Inventor)1. DXF von der Abwicklung erstellen2. eine idw-Vorlage die ohne Rahmen und Schriftkopf ist öffnen3. die erstellte DXF importieren ( dabei lässt Inventor die Punkte weg)4. die Zeichnung als DXF speichernIn der idw-Vorlage kann man auch gleich die Verdecktelinien undGewindelinie sowie alle Layer die man nichtbenötigt ausschalten,damit diese nicht in der DXF auftauchen.Ich hoffe Du kann ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Stückliste in Excel Zeit?
Andreas01 am 28.11.2013 um 08:57 Uhr (5)
Hallo zusammen,ich habe mir ein Addin geschrieben mit dem ich die Stückliste aus der Zeichnung in die Excel-Vorlage eintrage. Das Funktioniert auch alles einwandfrei, nur was mich etwas stört ist die Zeit.Wenn ich eine Stückliste mit 75 Positionen habe dauert das ca.6s bis die Daten eingetragen werden. Da der Eine oder Andere sich auch so ein Addin geschrieben hat würde ich gerne Wissen wie lange es denn bei Euch dauert.
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Vorschaubild abfragen
yamaha am 01.07.2004 um 21:12 Uhr (0)
Hallo daywa1k3r, danke für den Code. Funktioniert natürlich, aberrr Geht´s nicht doch irgendwie über eine API -Funktion, weil wenn ich mir die Vorschau einer idw anschauen möchte, wird diese idw ja erstmal geladen, und das dauert unter je nach Zeichnung recht lange. Aber auf der anderen Seite passt die Frage natürlich auch nicht so ganz ins VBA-Inventor Forum. wenn ich selbst was finde lasse ich von mir hören. eine API -Funktion hat natütlich nichts ------------------ Gruß
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Zeichnungsresourcen abgleich
Bluejay am 28.09.2012 um 08:31 Uhr (0)
Guten Tag zusammen,Fals es jemand braucht ein Makro das die Zeichnungsresourcen(Rahmen, Symbole usw) und die Stilbiliothek mit einer Vorlage Datei bzw mit der globalen Stilbibliotek abgleicht und die nicht verwendete Stile löscht.Sub Zeichnungsresourcen()ersetzt die Zeichnungsresourben in der aktuellen Zeichnung durch die der Template If ThisApplication.ActiveDocumentType = kDrawingDocumentObject Then Dim ZielDoc As DrawingDocument Set ZielDoc = ThisApplication.ActiveDocument Dim Blatt As Sheet Set Blatt = ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Prüfbemaßung einfügen
noctis79 am 23.05.2011 um 10:08 Uhr (0)
Hallo,folgender Sachverhalt:Ich möchte automatisch in einer Zeichnung alle Maße durchlaufen undMaße die eine Passung oder Toleranz enthalten mit einem Prüfmaß versehen.Dabei tritt folgendes Problem auf:Beim Ausführen von:Code:oDrawDoc.ActiveSheet.DrawingDimensions.Item(i).SetInspectionDimensionData (kRoundedEndsInspectionBorder)Wird bei Bezeichnung ein Leerzeichen eingefügt.Dadurch erhalte ich einen | vor der Bemaßung.Kann man das irgendwie beeinflussen?Wenn ich es mit (kRoundedEndsInspectionBorder, "", "" ...
|
| In das Form Inventor VBA wechseln |
