|
Inventor VBA : benutzerdefinierte iProperties
Enduro am 27.07.2012 um 11:47 Uhr (0)
ACHTUNG! Sie antworten auf einen Beitrag der älter als 1 Jahr ist!Hallo,ich kann die Datei immernoch nicht herunterladen und brauche es dringend... Gruß
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Skizzensichtbarkeit - Makro macht Unsinn
Doc Snyder am 20.08.2009 um 23:26 Uhr (0)
Moin!Ich hab mir das unten zitierte Makro gebastelt, mit dem ich in Baugruppen oder Bauteilen sämtliche Skizzen wechselweise aus- und einblenden kann. Funktioniert soweit schön, nur habe ich bald festgetellt, dass es die Datei beschädigt.Obwohl das Makro den Wert Visible für alle Skizzen wieder auf 1 setzt, was dann sowohl im Browser als auch in der Objektüberwachung zu sehen ist, gibt es in der damit bearbeiteten Datei nun eine Reihe Skizzen, die man trotzdem nicht mehr sehen kann. Nur wenn man sie öffnet ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Skizzensichtbarkeit - Makro macht Unsinn
Doc Snyder am 21.08.2009 um 00:59 Uhr (0)
Zitat:Original erstellt von daywa1k3r:...beende die Bearbeitung und merke Dir die Skizze,in der die Bearbeitung stattgefunden hat. Nachdem Du Dein Makro ausgeführt hast, wechsle wieder in die Bearbeitung...Das würde natürlich den Fehler vermeiden, ist aber ausgesprochen lästig und unbefriedigend. Da ist es ja schon weniger aufwändig, doch wieder wie früher mit RMK im Browser die anderen Skizzen (un)sichtbar zu schalten, das geht nämlich auch, wenn man eine Skizze geöffnet hat. Allerdings nur für die oberh ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : DWG in Unterordner abspeichern
Xaigon am 17.08.2012 um 15:17 Uhr (0)
Hallo,versuche gerade Im Inventor 2012, DWGs automatisch mit einem Button im aktuellen Projektordner abzuspeichern (eigentlich im Projektunterordner), dies funktioniert auch schon im aktuellen Projektordner. Mit der Funktion (oDoc.FullFileName) übergiebt er immer den ganzen Pfad z.B.: C:ArbeitsbereichProjekteBiltenNG-Nr.idw kann also nicht mehr in den DWG ordner im Verzeichnis wechseln.Kann mir jemand helfen, das DWG-File in den Unterordner abzuspeichern?Hier der Code den ich bis jetzt fabriziert habe:Cod ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Hardwareeigenschaften (Grafikeinstellungen) bei Start ändern
lbcad am 28.08.2012 um 08:17 Uhr (0)
Hallo Thiemo,hab es nicht probiert - aber:Du könntest versuchen die Anwendungsoptionen zu importieren. In der XML-Datei ist dann nur der Eintrag mit der Grafik. Alle anderen herauslöschen.------------------Gruß Lothar Boekels-----------------------------------------------------Wir unterstützen die Arbeit der- Rettungshundestaffel des DRK in Viersen Das könnt Ihr auch tun.
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : VBA Inventor: Index des angewählten Bauteils
bwr am 06.09.2012 um 11:25 Uhr (0)
Ich habe von zwei verschiedenen Sachen geschrieben, zum einen von ReferenceKeys und zum anderen vom Proxies. Das sollst du nicht miteinander vermischen.Das obige Beispiel handelt ausschließlich von ReferencdKeys.NativeObject hat mit Proxies zu tun.Ich empfehle dir mal eine Lektüre, die du am besten bei Google suchst: autodesk course ID: MA42-4Gleich das erste Suchergebnis sollte eine zip-Datei mit einem Worddokument bringen. Das bitte lesen und dann evt. weitere Fragen stellen.
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : SaveAs Addin speichert nicht richtig...
Enduro am 10.09.2012 um 08:34 Uhr (0)
Hallo Forum,ich brauche nochmals Eure Hilfe.. Ich möchte ein .idw Datei als PDF speichern und hab ein Dialogfenster eingebaut, das fragen soll wo ich es speichern will. Das Problem ist, es speichert nur in dem Ordner, wo mein .idw auch ist, aber nicht auf dem z. B. Desktop.hier Code: Code:Public Sub PDF() Dim oDoc As DrawingDocument Dim Msg If an error occurs, construct an error message On Error Resume Next Defer error handling. Err.Clear Err.Raise 6 ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Fehlermeldung bei DXF export
Xaigon am 18.09.2012 um 12:39 Uhr (0)
Hallo Zusammen,hab mir ein Makro gebastelt, dass bei Knopfdruck ein Ordner (DWG) erstellt und anschliessend die Zeichnung im DWG format in den Ordner DWG abspeichert. Leider bekomme ich die Fehlermeldung ("Fehler beim Schreiben der Datei"). Kann mir jemand helfen den fehler auszumärzen?Hier noch der Code:Code:Public Sub DWG() On Error Resume Next If ThisApplication.ActiveDocument.DocumentType kDrawingDocumentObject Then Exit Sub End If Dim Pfad As String Pfad = CurDir & "" If Dir(Pfad & "DWG", vb ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Fehlermeldung bei DXF export
rkauskh am 19.09.2012 um 14:35 Uhr (0)
HalloHier eine Version die funktioniert. Wozu eigentlich das CopyFile am Ende?Code:Public Sub DWG() On Error Resume Next If ThisApplication.ActiveDocument.DocumentType kDrawingDocumentObject Then Exit Sub End If Dim oDoc As Inventor.DrawingDocument Set oDoc = ThisApplication.ActiveDocument Dim oFileName As String oFileName = oDoc.FullDocumentName Dim oArray() As String oArray = Split(oFileName, "") If oDoc.FullFileName = "" Then MsgBox "Bitte zuerst die Zeichnung speichern... " Exit ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Verzeichnis öffnen und Datei selektieren
GeorgK am 20.09.2012 um 08:22 Uhr (0)
Hallo zusammen,wie kann ich ein Verzeichnis öffnen und eine Datei selektieren?Wenn ich den Dateinamen direkt mit angebe geht es. Doch wie kann ich eine Variable übergeben?Vielen DankGeorgCode:Sub Explorer_2()Dim Pfad As StringDim DateiPfad As StringPfad = Replace(ThisApplication.ActiveDocument.fullFileName, Split(ThisApplication.ActiveDocument.fullFileName, "")(UBound(Split(ThisApplication.ActiveDocument.fullFileName, ""))), "")DateiPfad = ThisApplication.ActiveDocument.File.fullFileNameMsgBox (Pfad)MsgBox ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Verzeichnis öffnen und Datei selektieren
rkauskh am 20.09.2012 um 08:39 Uhr (0)
MoinOhne es getestet zu haben, vermute ich, das die Variable DateiPfad schlicht nicht geparsed wird, da sie innerhalb der Anführungszeichen als String angesehen wird. Probier mal:Code:Shell "Explorer.exe /select, " & DateiPfad & ", vbMaximizedFocus Geht nicht------------------MfGRalf
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Bauteilanzahl in asm auslesen
Scorbilein am 25.09.2012 um 11:32 Uhr (0)
Einen schönen guten morgen.Ich habe folgendes Problem und es wäre sehr nett eine kl. Hilfestellung oder einen Ansatz zu bekommen um einen Durchbruch zu erlangen.Möchte eine eigene csv Liste aus der Assembly Umgebung von Inventor per Makro generieren. Habe dazu benutzerdefinierte IProperties in die Bauteile geschrieben. Erstens eine Schleife erstellt die mir filtert ob es sich um ein ipt oder iam in der Hauptbaugruppe handelt, dann schreibe ich ein CustomiProperty in das Bauteil (0 oder 1). 0 für ipt und 1 ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Bauteilanzahl in asm auslesen
rkauskh am 25.09.2012 um 21:03 Uhr (0)
So, da bin ich wieder. Mal als Diskussionsgrundlage:Code:Private Sub ExportBOMToCSV()If Not ThisApplication.ActiveDocument.DocumentType = kAssemblyDocumentObject Then MsgBox "Funktion nur in Baugruppen möglich." Exit SubEnd IfDim sFileName As StringsFileName = "C:TempExport.csv"Dim oAssDoc As AssemblyDocumentSet oAssDoc = ThisApplication.ActiveDocumentDim oBOM As BOMSet oBOM = oAssDoc.ComponentDefinition.BOMDim oBOMRow As BOMRowDim sParentDoc As StringDim iCount As IntegerDim sPartName As StringDim o ...
|
| In das Form Inventor VBA wechseln |
