|
INVENTOR VBA : Inventor
VOSTA1 am 02.12.2003 um 10:05 Uhr (0)
Hallo, das gleiche Problem haben wohl alle Inventor Benutzer. Lösung A: Hilfslienen ziehen alles ganz groß zoomen und so gut es geht positionieren. Rahmen mit Hilflinien abspeichern und aufbewahren. Aus der vorlage alle Hilfslinien löschen und Datei unter Templates ablegen. Lösung B: Da man im Inventor in Zeichnungsmodus (*.idw) auch keinen Text genau positionieren kann (nur über Makro möglich, dort können die Variablen angesprochen werden) könnte es sein, dass man im Schriftkopf auch mittels Makros die T ...
|
| In das Form INVENTOR VBA wechseln |
|
INVENTOR VBA : Aus *.iam -> *.ipt öffnen und
VOSTA1 am 07.04.2004 um 15:12 Uhr (0)
Hallo, da ich noch keine Antwort zum Thema bearbeiten der Eigenschaften von *.ipt s ohne die Datei zu öffnen bekommen habe, möchte ich, hier meine Frage mit einem Beispiel wiederholen. Wie muß der 2.Teil des Makros geändert werden. Private Sub getRefs() Dim oApp As Inventor.Application Set oApp = ThisApplication Dim oDoc As AssemblyDocument Set oDoc = oApp.ActiveDocument Dim Teil_i(200) As String Pfad = C:Verwendetete_Bauteile.txt Open Pfad For Output As #1 For i = 1 ...
|
| In das Form INVENTOR VBA wechseln |
|
INVENTOR VBA : Einfache Simulation mit VBA????
VOSTA1 am 12.05.2005 um 09:53 Uhr (0)
Hallo, bis Du VBA und alles beherrscht ist Dein Projekt wohl zu Ende. Mit Inventor 9 und Darstellung (dort können Abhängigkeien aktiviert und deaktivert werden) und animator 4.1.0 For the latest version of Animator see this thread: http://www.mcadforums.com/forums/viewtopic.php?t=1475 kannst Du relativ einfach Bewegungsabläufe simulieren. Das ist mit dem Inventor so nicht zu realisieren. Ich kann mal eine Demo senden. Leider nimmt es das Forum nicht, da Datei zu groß. Schau mal in die PM. MFG [Diese N ...
|
| In das Form INVENTOR VBA wechseln |
|
INVENTOR VBA : Ansprchen von nicht geöffneten Dateien
VOSTA1 am 06.10.2005 um 14:04 Uhr (0)
Hallo, es ist möglich!hier ein VorschlagDaten ansprechen bei nicht geöffneter Datei++++++++++++++++++++++++++++++++++++++Sub Daten_ansprechen()Dim Datei As StringDatei = "C: est.ipt"Dim oApp As Inventor.ApplicationSet oApp = GetObject(, "Inventor.Application") Dim opartDoc As partDocumentSet opartDoc = oApp.Documents.Open(Datei, False) Dim test_prop As Stringtest = opartDoc.PropertySets("{F29F85E0-4FF9-1068-AB91-08002B27B3D9}").Item("Title").ValueBenutzer Eigenschaft "Abmessung" muß erst erzeugt werdenDim ...
|
| In das Form INVENTOR VBA wechseln |