|
Inventor VBA : Revisionstabelle und Revisionsbezeichnungen löschen
st.w am 30.09.2013 um 11:34 Uhr (1)
Hallo vba-ler,gerne würde ich in einer idw eine vorhandene Revisionstabelle mit den Revisionsbezeichnungen löschen....Also die Tabelle lösche ich mit Code: If oDrawDoc.ActiveSheet.RevisionTables.count 0 Then Call oDrawDoc.ActiveSheet.RevisionTables.Item(1).Delete End Ifnur die Revisionsbezeichnungen bleiben noch Zeichnung.Wie kann ich die alle löschen?Danke für einen Tipp,Stefan------------------IV2008
|
| In das Form Inventor VBA wechseln |
AWM-Kopieren.exe.txt |
Inventor VBA : Copy Design - Tool
rkauskh am 11.04.2012 um 19:53 Uhr (0)
HalloWenn die Ordnerstruktur Unterverzeichnisse des Ordners sind, in dem die Zeichnung liegt, probier mal diese Version. Liegen die Ordner irgendwo auf der Festplatte wird es nicht funktionieren.Das Tool kopiert nur Dateien, die in den IDWs referenziert sind. Alle sonstigen Dateien die mit im Ursprungsverzeichnis liegen werden ignoriert.------------------MfGRK[Diese Nachricht wurde von rkauskh am 11. Apr. 2012 editiert.]
|
| In das Form Inventor VBA wechseln |
 |
Inventor VBA : IDW: Layer unsichtbar schalten
SKYSURFER am 18.03.2019 um 20:48 Uhr (15)
Zitat:Original erstellt von BernoAn:Hallo,Ich habe Inventor 2018Ich habe auch festgestellt wenn du eine Ansicht in der Zeichnung anklickst wird die Layerliste auch aktualisiert.Du bräuchtest also nur kurz eine Ansicht mit VBA selektieren.GrußBernoHallo,das war eine gute Idee. Erste Ansicht kurz markieren und danach ein DoUnSelect. Vielen Dank.GrußSKYSURFER
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Stückliste sortieren
3D-User am 22.03.2013 um 22:40 Uhr (0)
Hallo RalfMit der Sub “ExportDXFWithApprentice()” komme ich nicht klar.Ich habe alle Pfade gesetzt aber ich komme nicht weiter.Set oApprDoc = oAppr.Open(sFile) da öffnet sich die Zeichnung nicht!Call oApprDoc.Sheets.Item(2).Activate FehlermeldungSet DXFAddIn = oAppr.ApplicationAddIns…. Fehlermeldung Datentyp unverträglich….Kannst du dirs nochmal anschauen.Mfg3D-User
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Zeichnungsansichten automatisch anpassen
mssoftware am 14.08.2009 um 09:20 Uhr (0)
Hallo,ich habe gerade das gleiche Problem: http://ww3.cad.de/foren/ubb/Forum50/HTML/023363.shtml Nun hab ich mich mal in VB.Net ein kleines Prg geschrieben um den Maßstab zu ändern, klappt ganz gut.Allerdings weiß ich nicht, wie der Quelltext in Inventor Makro Format umgeschrieben werden kann bzw. wie ich es erreiche, dass das Makro beim Starten und Aktualisieren einer Zeichnung automatisch ausgeführt wird.Hat da vieleicht jemand eine Idee??GrußMaik
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Plot auf Verschiedenen Formaten
eud am 21.02.2006 um 14:55 Uhr (0)
Hallo VBA-ProfisFolgendes Problem: Wenn ich eine neue Zeichnung zum ersten mal ausdrucke muss ich immer 3xA3 und 1xA4 ausdrucken. Das ist ziemlich umständlich weil ich jedes mal die Papiergrösse in den Druckereigenschaften änder muss.Ich habe mich gefragt ob es möglich ist das ganze über ein Makro zu steuern.Habe leider nur wenig erfahrung mit VBA (autodidaktisch).Hat jemand ein ähnliches Makro, dass ich ändern könnte.Viele Grüsse aus der SchweizDominique
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Defer update via macro
Eman1 am 04.12.2008 um 20:40 Uhr (0)
Hallo,Danke fuer den Hinweis. Wir waere schon geholfen wenn ich ein macro code haette den ich in mein default.ivb kopieren kann der den hacken "defer update" in einer zeichnung setzt.Falls jemand das hat, waere gut, ansonsten werd ich halt weiter mit der inventor eingabe kaempfen...Danke E.------------------XP Pro, Inventor 2009 & SW 08, Grafic Quadro 750XL, Ram 1500,CPU 3.0
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Blattnummer an Zeichnungsnummer anhängen
BernhardU am 10.03.2006 um 18:18 Uhr (0)
Hi ftg!Das versteh ich nicht ganz!Du willst die Blattnummer an die Bauteilnummer anhängen!Du hast aber Pro idw nur eine Bauteilnummer (in den IProps) zur verfügung kannst aber viele Blätter einfügen! Oder willst du einfach nur die gesamte Blattanzahl an die Bauteilnummer anhägen?oder nur im schriftkopf?Also ich habe für jede zeichnung eine eigene idw! ist einfacher und eindeutig! mfg Bernhard
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Blattnummer und Blattanzahl auslesen
rkauskh am 15.06.2010 um 14:01 Uhr (0)
HalloCode:Private Sub Blattnummerzahl()Dim oDoc As DrawingDocumentSet oDoc = ThisApplication.ActiveDocumentMsgBox "Blattzahl: " & oDoc.Sheets.Countaktives Blatt findenDim oSheet As SheetDim i As Integeri = 1For Each oSheet In oDoc.Sheets If oSheet.Name = oDoc.ActiveSheet.Name Then Exit For End If i = i + 1NextMsgBox "Blattnummer der aktiven Zeichnung: " & iEnd SubDas is die einfache Variante, die nicht die Blatteigenschaft "nicht zählen" berücksichtigt.------------------MfGRK
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Makro zum drucken aller Zeichnungen einer Baugruppe
DanielLTS am 20.07.2012 um 16:26 Uhr (0)
Ich möchte nicht das System ändern, sondern mit Hilfe eines Makros bei offene aktive Baugruppe, alle Zeichnungen der Bauteile (befinden sich in unterschiedliche Ordnern) in einem bestimmten Ort speichern.Kann man überhaupt über VBA bei aktive Baugruppe, die Zeichnung (Speicherort und Dateiname) eines bestimmten Bauteils ausfindig machen?Hat irgendjemand dies schonmal geschafft?
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : I-Prppperties anlegen
RODER am 29.01.2013 um 07:30 Uhr (0)
Hallo VolkerMit dem "For Each" wird überprüft ob es das IProp mit diesem Namen schon gibt.Wenn ja wird mit dem If der neue Inhalt zugewiesen, wenn nicht (Else) wird das IProp erzeugt und anschliessend der Inhalt zugewiesen.Das Schnipsel stammt aus einem VBA Skript mit welchem ich die jeweiligen Massstäbe der Erstansichten der verschiedenen Blätter einer Zeichnung (idw) herauslese und in die IProps übertrage.------------------Grüsse, ToniRechtschreibefehler gehören dem findigen Finder
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Ilogic Regel zur automatischen PDF-Erstellung
chense am 11.07.2021 um 02:45 Uhr (1)
Hallo zusammen,ich habe heute eine etwas ausführlichere Frage an euch.wir haben immer wieder mal größere Mengen an Zeichnungen (so etwa 100-250 Stück) die schnell in ein PDF mit Datum umgewandelt werden sollen. Das dauert dann zusammen mit der dem Eingeben der Indexierungsnummer und Revision für die Zertifizierung ziemlich lange.Nachdem mich dass das letzte mal ziemlich genervt hat habe ich schonmal ein kleines Programm das für mich erstmal gut funktioniert hat und folgendermassen abläuft.Ich suche das Bau ...
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Absturz mit Addin/Bearbeitungssymbole
DanielHunziker am 30.11.2004 um 16:01 Uhr (0)
Hallo, ich schlage mich grad mit einem VB6-Addin rum das im Context-Menü (z.B. rechteMaus auf Zeichnung) Einträge macht, jetzt kriege ich bei Inventor9 immer einen Absturz wenn in einem idw ein Bearbeitungssymbol eingetragen werden soll, dies immer nachdem ich mit rechter Maus auf Weiter gedrückt habe da kommt noch ein grauer Kasten und dann ist Inventor weg. Idee woran das liegen könnte? Gruss Daniel
|
| In das Form INVENTOR VBA wechseln |
