|
Inventor VBA : Messung mit VBA zu einem Spline
PaulSchuepbach am 14.01.2011 um 13:06 Uhr (0)
Hallo,also wenn ich das so mache, dann klappts:Code:Private Sub getDist() Dim oApp As Inventor.Application Set oApp = ThisApplication Dim oDoc As Inventor.AssemblyDocument Set oDoc = oApp.ActiveDocument Debug.Print oApp.MeasureTools.GetMinimumDistance(oDoc.SelectSet(1), oDoc.SelectSet(2))End SubWie holst Du oElement1 und oElement2? Du muss diese uU. vorher nur in Object konvertieren (das SelectSet liefert Daten vom Typ Object).HTH------------------Grüsse, PaulInventor-Programmierung, Inventor-Tools und ...
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Part in Basiskörper konvertieren
MrBurns am 30.10.2003 um 15:09 Uhr (0)
Hallo Waldi, im Prinzip funktioniert das mit der abgeleiteten Komponente, hatte ich auch schon getestet. Bleibt aber trotzdem der Umstand, das Part zu erstellen, abzuspeichern, neues Part erstellen, Ursprungspart als abgeleitet einfügen und dann wieder zu speichern. Das sind mir zu viele temporäre speichern und öffnen Vorgänge! Ich suche hier die Möglichkeit das Part direkt platt-zu-machen und dann direkt neu als Basisteil zu speichern. Vielleicht gibt es nen Ursprungs-Befehl oder Methode ähnlich wie ...
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : iPartsToNormal
mechajo am 10.02.2009 um 09:24 Uhr (0)
Hallo,habe mir ein Makro zum Konvertieren von i-Part-Member zu unabhängigem Bauteil runtergeladen.Ich versuche verzweifelt dieses Macro zum laufen zu kriegen. (siehe Anhang)(erhältlich unter http://www.cbliss.com/inventor/iCode/index.htm)Im Userform1 ist der Aufruf der zentralen Routine auskommentiert. Wenn ich die Kommentierung entferne, bekomme ich allerdings beim Aufruf der Routine direkt einen Fehler beim Kompilieren:Falsche Anzahl an Argumenten oder ungültige Zuweisung zu einer Eigenschaft.Wer von euc ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : DWG-Import mit VBA
CadVbaAdmin am 25.07.2006 um 14:58 Uhr (0)
Hallo Leute!!Ich muss mehrere DWG Files in Arbeitsblattformate konvertieren.Ich habe bereits den Code, der einen Rahmen (BorderDefinition) anlegt. Um den Rahmen zu bearbeiten erhalte ich von der Edit-Funktion eine DrawingSketch. so weit so gutDas Sketch-Objekt enthält aber leider keine Funktionen um autocad-Geometrie einzufügen In der IV-Gui ist das aber sehrwohl möglich.Könnte mir vielleicht irgendjemand einen tipp geben, wie man Dwg-Files automatisiert über Vba in Sketches reinbringt. Es sind über 200 ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Bauteilkomplexität automatisch ermitteln
Chris0804 am 23.08.2021 um 14:50 Uhr (1)
@mb-ing:Danke für den Hinweis mit den Vertices, das ist tatsächlich ganz hilfreich. Die Entscheidung ob gedreht oder gefräst wird, macht nacher der Bediener. Auf andere Daten kann ich leider nicht zugreifen, da die zum gewünschten Zeitpunkt noch nicht vorhanden sind. Mit dem Konvertieren in andere Formate bin ich tatsächlich noch etwas skeptisch. Könnte man dies soweit automatisieren, dass der Bediener nichts umwandeln muss? Also das Umwandlung und Auswertung automatisch passieren? Wenn das so wäre, könnte ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Schweißnahtnummern in IDW einfügen
dittmarc am 06.07.2012 um 11:53 Uhr (1)
Hallo,Jede Schweißnaht die wir im Rohrleitungsbau fertigen muss dokumentiert werden.Daher werden die Schweißnähte mit einer eindeutigen Nummer versehen und in einer Tabelle gelistet.Hinter der Nummer wird dann der verantwortliche Schweißer eingetragen.Erstellt werden die Schweißnähte in der Schweißkonstruktion. Hierzu konvertieren wir die "Normale" Baugruppe zu einer Schweißbaugruppe. In dieser Baugruppe werden die Schweißnähte im Browser angezeigt. i.e. bei Rohrleitung benötige ich Stumpfnähte, welche im ...
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : einen Kreis skizzieren
PaulSchuepbach am 19.05.2004 um 13:01 Uhr (0)
Hallo Simon, erst einmal Willkommen in Inventor-VBA Forum. Ich habe Dein Prog nicht getestet, aber schau Dir in der API -Hilfe die Methode SketchCircles.AddByCenterRadius mal genau an. Als zweites Argument wird der Kreis-Radius als DOUBLE verlangt - Du uebergibst aber einen String. Also erst in eine Double-Variable konvertieren, z.B. Dim myRad As Double myRad = CDbl(txtRadDrchmsr.Text) Set oCircle = oSketch.SketchCircles.AddByCenterRadius(oCoord, myRad) Im weiteren rufst Du Deine Kreis-Sub auf und ueb ...
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Skizzenobjekte in Ansichtsmittelpunkt verschieben
rkauskh am 02.09.2024 um 14:48 Uhr (1)
MoinAlso vom Ablauf würde ich sagen, das Camera.Target des aktiven Views ist ein Point. Den kann man mit ModelToSketchSpace in einen Point2D im Skizzenraum konvertieren und dann ist der Vektor gleich den X,Y-Koordinaten des Punktes, oder?Das Makro setzt ein Bauteil mit aktiver Skizzenbearbeitung voraus.EDIT: Nö, zu früh gefreut. Die Kamera behält die Werte bevor die Skizzenumgebung aktiviert wurde. Code:Option ExplicitPrivate Sub sketchvector()Dim oApp As Inventor.ApplicationSet oApp = ThisApplicationDim ...
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Part in Basiskörper konvertieren
MrBurns am 31.10.2003 um 20:50 Uhr (0)
Genau diesen Part benutze ich schon um die SAT zu schreiben. Anschließend lade ich die frisch erzeugte SAT (über VBA) und hab dann das neue tote Basisteil. Die Properties vom Ursprungspart übertrage ich anschließend auf dieses neue Teil. Anschließend speichere und schließe ich - das tote Teil ist fertig! Von der Sache her auch kein Problem. Nur leider erscheint mir das Ganze sehr umständlich und durch die vielen Datei öffnen und schließen Vorgänge als sehr zeitaufwendig. Als Ziel möchte ich nämlich im Sc ...
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Bauteilkomplexität automatisch ermitteln
mb-ing am 23.08.2021 um 16:18 Uhr (3)
Zitat:Original erstellt von Chris0804:@mb-ing:Danke für den Hinweis mit den Vertices, das ist tatsächlich ganz hilfreich. Die Entscheidung ob gedreht oder gefräst wird, macht nacher der Bediener. Auf andere Daten kann ich leider nicht zugreifen, da die zum gewünschten Zeitpunkt noch nicht vorhanden sind. Mit dem Konvertieren in andere Formate bin ich tatsächlich noch etwas skeptisch. Könnte man dies soweit automatisieren, dass der Bediener nichts umwandeln muss? Also das Umwandlung und Auswertung automatis ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Bauteilkomplexität automatisch ermitteln
mb-ing am 23.08.2021 um 08:55 Uhr (5)
@Chris:Natürlich kannst Du mit der Anzahl der Vertices in VBA auch etwas anfangen.Analysiere einfach ein paar Teile dann bekommst Du ad hoc ein Gefühl, ob Du mit der Zahl etwas anfangen kannst oder nicht.Wie willst Du in VBA ermitteln, ob es ein Dreh- oder Frästeil ist?Kannst Du auch auf andere Daten zugreifen?Bei uns sind die CNC-Programme in der Datenbank hinterlegt, so dass man diese auch analysieren könnte. Ggf. kann man hier Aussagen ableiten:- Anzahl der notwendigen Werkzeugwechsel- ...Oder ist es da ...
|
| In das Form Inventor VBA wechseln |
|
INVENTOR VBA : Part in Basiskörper konvertieren
Robby Lampe am 31.10.2003 um 12:33 Uhr (0)
hier ein beispiel aus der inventorhilfe The export file format is determined by the filename extension, e.g. SAT or IGS. Public Sub ExportToSat() Set reference to active document. Dim oDoc As Inventor.Document Set oDoc = ThisApplication.ActiveDocument Check the Document type is an assembly or part If (oDoc.DocumentType kAssemblyDocumentObject And _ oDoc.DocumentType kPartDocumentObject) Then MsgBox Error ocument type is not assembly/part Set oD ...
|
| In das Form INVENTOR VBA wechseln |
|
Inventor VBA : Massenkonvertierung - Verknüpfungsauflösung & Multithreading
cadtb am 03.12.2008 um 09:11 Uhr (0)
Hi,ich bin noch relativer Einsteiger in der VB Programmierung und komme da an einer Stelle nicht weiter.Ich habe einen Ordner mit vielen Unterordnern. In denen liegen .ipts und .iams.Jetzt möchte ich das ganze per Makro/Programm zu .stps konvertieren. Das klappt auch soweit (mit oFSO). Mein erstes Problem ist nun, das Inventor bei manchen Teilen, bzw. Baugruppen wegen der Verknüpfungsauflösung nachfragt. Das ist natürlich äusserst schlecht, da das ja voll automatisiert ablaufen soll, ohne Usereingaben. Wie ...
|
| In das Form Inventor VBA wechseln |