|
Inventor VBA : Mehrkörperbauteil als Baugruppe speichern
noctis79 am 29.11.2011 um 12:27 Uhr (0)
Falls es jemand braucht...Vorhaben:Vom Kunden wurde eine CATpart Datei geschickt. Diese beinhaltet eingentlich eine Baugruppe.Beim öffnen im IV wird daraus ein Mehrkörperbauteil.Jeder Volumenkörper in diesem Teil stellt also ein eigenständiges Bauteil dar.Aufgabe:Aus der ipt alle Volumenkörper rausspeichern, in eine asm auf Urpsrung wieder einsetzen und die Teile fixieren.Code:Sub Ref()Dim oapp As Inventor.ApplicationSet oapp = ThisApplicationIf oapp.ActiveDocument Is Nothing ThenMsgBox "Kein Dokument geöf ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : DXF Export auf Desktop
EKW am 21.08.2013 um 08:46 Uhr (1)
Zitat:Original erstellt von Bluejay:Public Sub CreateDXF() On Error Resume Next If ThisApplication.ActiveDocument.DocumentType kDrawingDocumentObject Then Exit Sub End If Dim oDoc As Inventor.DrawingDocument Set oDoc = ThisApplication.ActiveDocument If oDoc.FullFileName = "" Then MsgBox "Bitte zuerst die Zeichnung speichern... " Exit Sub End If oDoc.SaveAs Replace(oDoc.FullFileName, Right(oDoc.FullFileName, 3), "dxf"), True If Err.Number = 0 Then ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Tabellenblatt in Excelliste überschreiben
rkauskh am 05.01.2012 um 14:54 Uhr (0)
HiDann würde ich die Reihenfolge ändern:- Prüfen ob gleichnamige Datei existiert- wenn ja, Excel starten und Datei öffnen - alle Tabellenblätter prüfen, ob eines mit der gleichen Nummer wie in oName existiert - wenn ja, löschen (sollte etwa so gehen: oExl.ActiceWorkbook.Sheets(oName).delete) - Datei schließen und dabei speichern- Export starten- Datei wiederum öffnen und die iProps übertragenCode kann ich dir gerade nicht liefern - Zeitmangel, sorry------------------MfGRK
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Copy Design - Tool
Natire am 19.03.2012 um 10:56 Uhr (0)
In Inventor statt öffnen der Datei rechte Maustaste klicken und Konstruktionsassistenten zum kopieren verwenden!
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Auflösung einer png datei
muelb am 18.10.2011 um 10:24 Uhr (0)
Wie kann ich die Optionen beim Speichern unter *.png-Format verändern?Man kann im Dialog Speichern unter z.B.: bei x=3000 eingeben und kriegt ein schönes hochauflösendes png. Ich möchte dies automatisieren. Ohne Angabe der Option gibt er aber immer ein Bild aus, das der Bildschirmauflösung entspricht.Unten mein Code:Public Sub ExportToPng() Set reference to active document. Dim oDoc As Inventor.Document Set oDoc = ThisApplication.ActiveDocument Überprüfung ob eine Baugruppe oder ein Einzelteil aktiv ist S ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Auflösung einer png datei
PaulSchuepbach am 18.10.2011 um 13:19 Uhr (0)
Hallo,mM nach gar nicht - geht nur bei SavAsBitmapHTH------------------Grüsse, PaulInventor-Programmierung, Inventor-Tools und Inventor API-SchulungOnline 3D-ErsatzteilkatalogeMeine Tochter auf Youtube
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Auflösung einer png datei
muelb am 04.01.2012 um 07:48 Uhr (0)
Mit Inventor 2012 ist es nun möglich auch bei einem png-export die Auflösung zu setzen:lImgWidth = 4000lImgHeight = 3000Call oView.SaveAsBitmap(sFname, lImgWidth, lImgHeight)
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Massen STEP Export
Kizz am 07.02.2017 um 12:17 Uhr (1)
Ja. Habe in dem Ordner nachgescheut in dem auch die Original IPT liegen, aber außer denen liegt dort keine weitere Datei. Habe natürlich mit dem Windows-Explorer geschaut und nicht mit IV ------------------Mit freundlichen GrüßenChris__________________________________"Faulheit ist das Bestreben, mit möglichst wenig Aufwand viel zu erreichen. "
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Stückliste per Makro nach Excel exportieren
noctis79 am 08.01.2012 um 20:03 Uhr (0)
Sorry... Hatte Urlaub ^^Puh, ist schon wieder ne ganze Zeit her...Soll die kpl. Excel- Datei überschrieben werden oder nur ein bestimmtes Blatt?Bin ab morgen wieder im Einsatz...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Teilename im Browser ändern
Didikalle am 09.01.2012 um 17:46 Uhr (0)
Nachtrag:mit ThisApplication.ActiveDocument.Save vor der Namensvergabe klappt die Übergabe auch bei Neuanlegen einer Datei. Soweit sogut.Kann man aber das Macro auch an das IV-eigene Speicherbutton anhängen? quasi als default.Gruß------------------Didi
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : neuen Speicherort definieren / Namen vergeben
tschebyscheff am 15.02.2012 um 15:45 Uhr (0)
Hallo alle miteinander,ich habe folgendes Anliegen. Mit Hilfe einer Makro erzeuge ich im Inventor aus ein Baugruppe(.iam) ein vereinfachtes Teil(.ipt). Dies gelingt relativ gut. Zusätzlich wird automatisch abhängig von den benutzerdefinierten iProperties der iam ein Name für die ipt erzeugt. Und hier fangen die Probleme an. Den Namen für das Teil zu vergeben gelingt mir nur mit FullFileName, FileName ist in diesem Fall nicht verfügbar. Zwar hat die erzeugte ipt dann den gewünschten Namen, allerdings wird g ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Automatisches exportieren in DWG
alterHausmeister am 12.02.2012 um 20:32 Uhr (0)
Hallo an alle ... ,Vorweg, ich habe weder von INVENTOR noch von VBA auch nur den Schimmer einer Ahnung. INVENTOR ist für mich nur ein Bestandteil der AutoDESK Plant 3D Suite Ultimate 2012.Nun habe ich aber die dankbare Aufgabe übertragen bekommen, für über 3000 (in Worten dreitausend ... ) Dateien (IGS-Format) einen Weg in das Format DWG zu finden.Der Weg über den IGS-Import von AutoCAD2012 (Zusatzmodul aus dem Subscriptionscenter) bringt leider nur Flächenelemente. Deshalb habe ich es mit INVENTOR versu ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Automatisches exportieren in DWG
noctis79 am 16.02.2012 um 23:12 Uhr (0)
Abend!Ist sicherlich möglich...Werd ich morgen mal prüfen.Wenn es aber tatsächlich 3000 (in Worten dreitausend :-D) Dateien sind,würde ich über eine .net Lösung nachdenken.D.h. ne eigenständige Exe erstellen.In der Exe gibst Du den Pfad zu dem Ordner der igs- Dateien an.== Jede Datei im IV öffnen, speichern unter als dwg, schließen und gut ist.
|
| In das Form Inventor VBA wechseln |
