|
Inventor : Exemplarnamen in Zeichnung anzeigen Inventor 2021
rkauskh am 02.05.2024 um 13:12 Uhr (1)
MoinIch vermute du hast Positionsnummern mit einer Führungslinie, die aus 2 oder mehr Segmenten besteht? Da könnte bereits der Fehler sein. So genau hab ich mir das Beispiel nicht angesehen.Ersetz mal die Zeile Code:Set leaderNode = leader.AllNodes(2)oberhalb der angemeckerten Zeile durch:Code:Set leaderNode = leader.AllNodes.Item(leader.AllNodes.Count)------------------MfGRalf
|
| In das Form Inventor wechseln |
|
Inventor : Ilogic Zeichnung Blattoptionen steuern?
rkauskh am 20.04.2020 um 13:25 Uhr (1)
HalloIch überlege noch, ob ich jetzt nicht mehr verwirrt bin als vorher. Aus deiner Grafik lese ich zwei mögliche Zustände:Wenn Blatt 1 aktiv, alle anderen auf nicht zählen/drucken.Wenn Blatt 2 oder 3 oder ... aktiv, Blatt 1 auf nicht zählen/drucken, aber alle anderen auf zählen/drucken.Korrekt oder daneben?------------------MfGRalf
|
| In das Form Inventor wechseln |
|
Inventor VBA : Makro für Prüfmaße in Tabelle auf Zeichnung
rkauskh am 13.03.2026 um 23:35 Uhr (1)
MoinAnfangen könnte man mit der API-Referenz von Autodesk. Davon die ersten beiden Kapitel lesen. Im ersten ist auch eine Übersicht des Inventor object model. Diese Baumstruktur wird man, nachdem man Kapitel 2 gelesen und im VBA-Editor mal den Debuggingmodus aktiviert hat, im VBA-Editor wiederfinden und kann sich aktuelle Werte der Objekte ansehen. Das macht es relativ leicht die gesuchten Infos zu finden. Geht natürlich nicht immer so einfach, aber für den Anfang reicht das. Ansonsten kann man ja hier nac ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : XYZ-Koordinate und Bezeichnung von einem Punkt in der Zeichnung anzeigen
rkauskh am 23.05.2020 um 14:15 Uhr (1)
HalloHab das Makro nochmal ein wenig präzisiert, dass nur Arbeitspunkte akzeptiert werden. Damit sollte der Fehler weg sein. Du hast eine Mittelpunktmarkierung in der Bohrungsmitte erstellt. Das ist ein Punkt, der nur auf dem Zeichnungsblatt existiert und keine Entsprechung im 3D-Modell hat. Damit kann man keine Koordinaten im dreidimensionalen Raum ermitteln.Im Modellbrowser der Zeichnung mit der rechten Maustaste auf den Arbeitspunkt klicken und "Einschließen" auswählen. Funktioniert mit dem Ursprung ebe ...
|
| In das Form Inventor VBA wechseln |
|
Inventor .NET : Zeichnung zu aktuellem bauteil/Baugruppe finden (Referencinhdocuments)
rkauskh am 08.10.2021 um 20:24 Uhr (1)
HalloKlare Antwort: NeinApprentice unterstützt kein Multithreading. Man kann nur mehrere .EXE starten und jede startet einen eigenen Apprentice. Man könnte die .EXE von einem Masterprogramm aus steuern. Immer 50 Dateien an eine .EXE übergeben und laufen lassen. Im Groben dürfte es der Aufgabenplaner von Inventor mit einer Massenmigration ähnlich machen. ------------------MfGRalfRKW Solutions GmbHwww.RKW-Solutions.com
|
| In das Form Inventor .NET wechseln |
|
Inventor VBA : Ungleichnamige Zeichnung zu Bauteil öffnen
rkauskh am 09.11.2012 um 01:14 Uhr (0)
MoinGänzlich ohne Prüfungen und Fehlerbehandlung ginge es so:Code:Option ExplicitPublic Sub OpenDocument()Dim oDoc As DocumentSet oDoc = ThisApplication.ActiveDocumentDim sProp As StringsProp = oDoc.PropertySets.Item("User Defined Properties").Item("Zeichnungsnummer").ValueDim sPath As StringsPath = Left(oDoc.FullDocumentName, InStrRev(oDoc.FullDocumentName, ""))Dim sDrawDocName As StringsDrawDocName = sPath & sProp & ".idw" Dim oDrawDoc As DrawingDocumentSet oDrawDoc = ThisApplication.Documents.Open(sDraw ...
|
| In das Form Inventor VBA wechseln |
|
Inventor : Arbeitsblattname in Zeichnung einfügen
rkauskh am 17.02.2023 um 10:41 Uhr (1)
MoinMakro geht immer. Du könntest eine iLogicregel erstellen und es mit folgendem Schnipsel versuchen. Im Schriftfeld muss ein Text mit der angeforderten Eingabe "Blattname" existieren. Ausführen musst du manuell. Ich hoffe der 2011er unterstützt bereits alles erforderliche. Testen kann ich es nicht.Code:Dim oDrawDoc As DrawingDocument = ThisDrawing.DocumentDim oSheet As SheetDim oTitleBlock As TitleBlockDim sPromptStrings(0) As StringFor Each oSheet In oDrawDoc.Sheets If oSheet.TitleBlock IsNot Nothing T ...
|
| In das Form Inventor wechseln |
|
Inventor VBA : Schweißnahtzeichen / Schweißnähte (Vorderansicht) in Zeichnung auslesen/ändern
rkauskh am 29.09.2026 um 11:12 Uhr (1)
MoinWurde da eventuell nur der Skalierfaktor des Schweißsymbols auf 0.85 gestellt? Mir ist keine Stelle bekannt die Nahtbreite fix einzustellen.Zitat:Irgendwie kann ich mir nicht vorstellen, dass VBA keinen Zugriff auf die Schweißnahtzeichen hat...Da glaubst ja nicht, worauf die API noch alles keinen Zugriff hat. Das sind jahrzehnte alte Lücken, die nie mehr geschlossen werden.------------------MfGRalf
|
| In das Form Inventor VBA wechseln |
|
Inventor : VBA Makro xyz Koordinaten Rohr Leitungs Biegetabelle erstellen auf einer Zeichnung
rkauskh am 25.10.2024 um 10:06 Uhr (1)
MoinKannst du mal eine Beispieldatei erstellen, hochladen und beschreiben welche Punkte das Makro einbezieht die deiner Meinung ausgelassen werden sollten? Es läßt sich vermutlich anpassen.------------------MfGRalf
|
| In das Form Inventor wechseln |
|
Inventor VBA : Schweißnahtzeichen / Schweißnähte (Vorderansicht) in Zeichnung auslesen/ändern
rkauskh am 29.09.2026 um 16:48 Uhr (1)
MoinDie einzige Breite die ich im Schweißsymbol finden konnte, befindet sich unter Code:Sheet.DrawingWeldingSymbols.Item(x).Definitions.Item(y).WeldSymbolOne.WidthSheet.DrawingWeldingSymbols.Item(x).Definitions.Item(y).WeldSymbolTwo.WidthIch habe keinen Inventor mehr, daher kann ich nicht selbst nachsehen was dieser Wert wirklich macht. Beschreibung klingt aber brauchbar.------------------MfGRalf
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Stückliste in einer Zeichnung neu nummerieren
rkauskh am 19.05.2022 um 13:45 Uhr (1)
HalloAlso die Bauteilliste. Als iLogic für alle Teilelisten des aktiven Blattes:Code:Dim oSheet As Sheet = ThisDrawing.Document.ActiveSheetDim oPartsList As PartsListFor Each oPartsList In oSheet.PartsLists oPartsList.Renumber NextWenn zusätzlich noch durch alle Blätter gewandert werden soll:Code:Dim oCurrSheet As Sheet = ThisDrawing.Document.ActiveSheetDim oSheet As SheetFor Each oSheet In ThisDrawing.Document.Sheets oSheet.Activate Dim oPartsList As PartsList For Each oPartsList In oSheet.PartsLists oP ...
|
| In das Form Inventor VBA wechseln |
|
Inventor : Masse auf Zeichnung durch Button ausblenden
rkauskh am 06.01.2023 um 09:37 Uhr (1)
MoinWillkommen im Forum. Bearbeite die Schriftfelddefinition in der IDW und lösch das Property einfach raus oder definiere ein zweites Schriftfeld mit ohne Masse und tausche es aus. Dazu muss nicht programmiert werden.Wenn du unbedingt programmieren willst, musst du auch entweder ein zweites Schriftfeld als Ersatz definieren und sicherstellen das es auch ein zweites gibt. Oder du suchst in der Schriftfelddefinition nach der Textbox mit dem Masseproperty und ersetzt im FormattedText den String mit deinem T ...
|
| In das Form Inventor wechseln |
|
Inventor : Properties von Modell in Zeichnung übernehmen
rkauskh am 27.03.2009 um 19:55 Uhr (0)
HiSchulung worin? Im Hellsehen was so ein Satz bedeuten soll?So wie ich den Fragensteller verstehe, geht es nicht darum irgendwelche iProps aus dem Bauteil auf der IDW darzustellen, sondern z.B. das iProp "Bauteilnummer" der IPT soll in das iProp "Bauteilnummer" der IDW kopiert werden und am besten automatisch.Inventor bietet meines Wissens im Standard diese Möglichkeit nicht. Ein führendes PDM-System könnte das unter Umständen, wenn die Möglichkeit gegeben ist relationale 1:n Verbindungen zwischen Bauteil ...
|
| In das Form Inventor wechseln |
