|
Inventor VBA : Stückliste Zeilen addieren
rkauskh am 12.02.2013 um 07:13 Uhr (0)
HalloMeines Wissens kann die Stückliste zwar gleiche Bauteilnummern (nicht deine Spalte) zusammenfassen, aber die Gewichtsaddition dürfte das Problem sein. Alternativ:- lauf durch die Stückliste (Ansicht "nur Bauteile")- erstelle für jede neue Zeile eine Zeile in einem Array oder einer Liste- addiere bei einer schonmal vorhandenen Zeile das Gewicht- erstelle eine Excel-Tabelle daraus.------------------MfGRalf
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Excel Datei in IDW einbetten
rkauskh am 16.02.2013 um 17:57 Uhr (0)
HiWas meinst du mit die eingebettete Datei wird nicht mitgezogen? Fehlt sie nach dem Einchecken in der IDW? Oder wird deine originale Exceldatei nicht mit eingecheckt, was bei einer eingebetteten Datei korrekt wäre?Ich glaub mit einer Tabelle wird das nichts, da die meines Wissens keine Verknüpfungen zu anderen Dateien kann. Dafür gibts ja die eingebetteten Exceldateien.Warum stellst du eigentlich dreimal die gleiche Frage? ------------------MfGRalf
|
| In das Form Inventor VBA wechseln |
|
Inventor : Stückliste Excel und iLogic
rkauskh am 16.04.2013 um 15:29 Uhr (0)
HalloDie Stückliste (BOM) besteht je Ebene aus Zeilen (BOMRows), die jeweils (mindestens) ein zugehöriges Dokument haben. In der strukturierten Stückliste können die Zeilen Kinder (ChildRows) besitzen. Will man durch die Struktur laufen, prüft man die Anzahl der Kinderzeilen und wenn die größer 0 ist, ruft man die "For Each BOMRow in BOMRows" Schleife neu auf und übergibt ihr die aktuelle Stücklistenzeile als Anfangswert (Stichwort Rekursion).Aus den referenzierten Dokumenten der Stücklistenzeilen kannst d ...
|
| In das Form Inventor wechseln |
|
Inventor : Fehlermeldung Excel Hyperlink zu idw
rkauskh am 15.06.2024 um 16:08 Uhr (1)
MoinDie alternativen Datenströme haben nur indirekt mit den Netzlaufwerken zu tun. Hat eine Datei mal diesen Eintrag, muss er entweder durch setzen des Häkchens in den Einstellungen oder durch Verschieben auf ein nicht-NTFS Laufwerk entfernt werden.Egal, nächster Versuch:Erstelle im Regeditor unter ComputerHKEY_CLASSES_ROOTInventor.DrawingDocument einen neuen DWORD-Wert "EditFlags" und trag als Hexadezimalwert 10000 ein. Die ganzen anderen unwirksamen Einstellungen solltest du, wenn möglich rückgängig mach ...
|
| In das Form Inventor wechseln |
|
Inventor VBA : Part macro bei doppelklick in baugruppe nutzen
rkauskh am 15.08.2012 um 18:42 Uhr (0)
HalloProbier mal den:Code:Public Sub Passflächen() Dim oObject As Object Dim oBool As Boolean oBool = True While oBool = True Set oObject = ThisApplication.CommandManager.Pick(kPartFaceFilter, "Wähle eine Fläche ...") oBool = FlaecheFaerben(oObject) ThisApplication.ActiveView.Update WendEnd SubPublic Function FlaecheFaerben(oFace As Face) As Boolean If oFace Is Nothing Then FlaecheFaerben = False Exit Function End If Dim strColorName As Str ...
|
| 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 : STEP-Import einer BG leer
rkauskh am 09.02.2012 um 12:57 Uhr (0)
HalloDanke, dann kann ich aufhören den Fehler zwischen meinen Ohren zu suchen. Wie erstellt man solche "verteilten" Exporte? Kann Catia V5R19da mehr als Inventor?Ist das ansteckend? Habe heute von einem anderen Kunden für ein anderes Projekt die selbe Konstellation, aber als IGES erhalten. ------------------MfGRK
|
| In das Form Inventor wechseln |
|
Inventor VBA : Excel Datei in IDW einbetten
rkauskh am 16.02.2013 um 19:01 Uhr (0)
HalloEuer Dateiverwaltungsprogramm entfernt eingebettete Objekt aus einer Zeichnung? Da würde ich mal einen Bug beim Hersteller der Dateiverwaltung melden.Stimmt, die CustomTable hat eine AddLink-Methode. Probier doch einfach aus was passiert wenn die als FullFileName deine Exceltabelle angibst.Eine größere Resonanz wirst du mit dem Doppel- und Dreifachposten nur von den Moderatoren bekommen. Aber nicht in der Art wie du es dir erhoffst. Ich behaupte mal, das alle die sich mit der Programmierung beschäfti ...
|
| In das Form Inventor VBA wechseln |
|
Inventor : Objektfangfunktionen
rkauskh am 06.08.2012 um 23:47 Uhr (0)
HalloJa, dein Denkansatz ist der Falsche. Die Position vom Bogenmittelpunkt zum Quadranten wird z.B. über eine Koinzidentabhängigkeit des Bogenmittelpunktes zum Kreis und einer Horizontal- bzw Vertikalabhängigkeit des Bogenmittelpunktes zum Kreismittelpunkt definiert. Catia und Inventor sind eben kein Autocad. Schieb mal in MDT den Bogen wieder weg vom Kreis. Kommt der Kreis automatisch mit??? Nö, denn beide Elemente liegen nur "zufällig" aufeinander.------------------MfGRalf
|
| In das Form Inventor wechseln |
|
Inventor : iLogic - Baugruppen-Generator über Excel steuern
rkauskh am 29.03.2023 um 13:54 Uhr (1)
HalloDer Inventor Read-Only Mode unterstützt iLogic? Das kann ich mir nicht vorstellen, da iLogic ein Zusatzmodul ist und Zusatzmodule im Read-Only nicht unterstützt werden. Prüf das bitte mal als Erstes.Für jede geometrische Änderung ist Zugriff auf das vollständige Modell erforderlich und das kann mM nur der volle Inventor.Gegenvorschlag: Erzeuge aus deiner Baugruppe zu jeder Variante ein Neutralformat 3D-PDF, DWF oder ähnliches und verknüpfe das mit einer Auswahl. Wozu die ganzen Informationen nach auße ...
|
| In das Form Inventor wechseln |
|
Inventor VBA : Excel Datei in IDW einbetten
rkauskh am 16.02.2013 um 20:59 Uhr (0)
HalloHier mal ein Beispiel wies gehen müßte:Code:Public Sub AddCustomTable()Dim oDrawDoc As DrawingDocumentSet oDrawDoc = ThisApplication.ActiveDocumentDim oPoint As Point2dSet oPoint = ThisApplication.TransientGeometry.CreatePoint2d(15, 15)Dim oCTableColumnTitles(1 To 10) As StringSet oCTableColumnTitles(1) = "A"Set oCTableColumnTitles(1) = "B"Set oCTableColumnTitles(1) = "C"Set oCTableColumnTitles(1) = "D"Set oCTableColumnTitles(1) = "E"Set oCTableColumnTitles(1) = "F"Set oCTableColumnTitles(1) = "G"Set ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Excel Datei in IDW einbetten
rkauskh am 17.02.2013 um 11:39 Uhr (0)
MoinDu hast da ein Verständnisproblem. Eingebettete Objekt liegen in der Datei. Sie sind Bestandteil der Datei. Das Ursprungsdokument hat nach dem Einbetten nichts mehr damit zu tun. Es dient sozusagen nur als Kopiervorlage. Es gibt nur die IDW zum Einchecken. Das die ursprüngliche Exceldatei nicht mitgenommen wird ist richtig.Das Verknüpfen mit anderen Dateien ist eine Zeitbombe. Spätestens wenn du zwei IDWs mit verknüpfter Exceldatei auscheckst und beide verknüpften Dateien habe den gleichen Namen bekomm ...
|
| In das Form Inventor VBA wechseln |
|
Inventor VBA : Text in Excel Tabelle
rkauskh am 07.03.2013 um 22:29 Uhr (0)
HalloFunktioniertCode:oExl.ActiveWorkbook.Sheets(ExcelBlatt).Cells(ExcelZeile, "C").Font.Bold=Truenicht?Code:Sub BesonderesWetter() Dim rngZelle As Range Dim strText As String Dim intPos As Integer Set rngZelle = [B1] suche in Zelle B1 strText = "besonders" Wort, das in der Zelle gesucht werden soll intPos = InStr(rngZelle.Value, strText) Sucht das Wort in der Zelle If intPos 0 Then Wenn das Wort in der Zelle enthalten ist, dann : With rngZelle.Characters(Start:=intPos, Length:=Len(strText)).Fon ...
|
| In das Form Inventor VBA wechseln |
