| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SolidEdge |
Autor
|
Thema: Eigenschaftsfelder zusammenfügen ??? - Bitte um Hilfe (2574 mal gelesen)
|
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 04. Aug. 2006 11:24 <-- editieren / zitieren --> Unities abgeben:
Hi Community Habe folgende Frage, Ist es möglich, zwei Eigenschaftsfelder, (z.B. Titel und Thema) in ein Eigenschaftsfeld (z.B. Kommentar) zusammen zu kopieren (per Macro,.....???) , sodass wir beim Erstellen der Stückliste als Spalte dann z.B. das Eigenschaftsfeld Kommentar einfügen können. Hintergrund ist, das unter Titel unsere Projektnummer (z.b. 103) steht, und unter Thema die Teilenummer (1_02_03) steht. Unsere Zeichnungnummer lautet dann wie folgt 103_1_02_03, und sollte auch in der Stückliste ersichtlich sein. Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 04. Aug. 2006 11:44 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
|
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 04. Aug. 2006 11:56 <-- editieren / zitieren --> Unities abgeben:
|
Rüben-Rudi Ehrenmitglied V.I.P. h.c. Landwirt, Konstrukteur
Beiträge: 3002 Registriert: 06.12.2002 SE ST7 MP5
|
erstellt am: 04. Aug. 2006 14:47 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
du kannst doch über Legendentexte die Felder auswählen ... wenndu beide Felder mit einem Unterstrich verbindest, hast du deine geforderte Ansicht ... Gruß Bernd ------------------ Was der Bauer nicht kennt, das frisst er nicht! Würde der Städter wissen was er frisst, er würde Bauer werden! Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 04. Aug. 2006 14:50 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
|
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 04. Aug. 2006 15:23 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Moin, wenn's ein Addin ist sollte es ueber: Applikation --> Addinmanager sichtbar und aktivierbar sein. Moeglich das man es auch als Desktop Shortcut plazieren kann modeng ------------------ And then one wonders why a man/woman ages so fast in this nutty business Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 07. Aug. 2006 08:27 <-- editieren / zitieren --> Unities abgeben:
Hi, ich schaffs leider noch immer nicht, kann das AddIn im Part nicht ansteuern??? Habs im Asm geschafft, jedoch finde ich keinen Weg die Variable TITLE oder THEMA dabei einzufügen... Bitte erneut um Hilfe, Thx Jürgen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
VBSpawn Mitglied Programmierer
Beiträge: 514 Registriert: 23.08.2005 Sorgfältige Planung ersetzt niemals pures Glück.<P>S.W.X 2005/2006/2007 S.E 14-17 A.I.P 9-11 Win.XP + SP2
|
erstellt am: 07. Aug. 2006 08:52 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Hi und Moin Vielleicht hilft dir das schon weiter... Kopiere das in deinen z.b. Excel VBA Editor und drücke F5 Sub Prop() Dim se As Object 'SolidEdgeFramework.Application Dim mDoc As Object 'SolidEdgeFramework.SolidEdgeDocument Dim mSum As Object 'SolidEdgeFramework.SummaryInfo
Dim hlpStr As String On Error Resume Next Set se = GetObject(, "SolidEdge.Application") If Err.Number <> 0 Then MsgBox "Kein SE :-)", vbInformation + vbOKOnly, "myApp" Exit Sub End If Set mDoc = se.ActiveDocument If mDoc Is Nothing Then MsgBox "Kein doc :-)", vbInformation + vbOKOnly, "myApp" Exit Sub End If Set mSum = mDoc.SummaryInfo hlpStr = mSum.Title & mSum.Subject mSum.Comments = hlpStr 'mSum.Title = "" 'mSum.Subject = "" End Sub 'Gruß 'Micha ------------------ http://classicvb.org/petition/ Zitat: Interpunktion und Orthographie des Postings sind frei erfunden. Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 07. Aug. 2006 09:40 <-- editieren / zitieren --> Unities abgeben:
|
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 07. Aug. 2006 09:42 <-- editieren / zitieren --> Unities abgeben:
|
VBSpawn Mitglied Programmierer
Beiträge: 514 Registriert: 23.08.2005 Sorgfältige Planung ersetzt niemals pures Glück.<P>S.W.X 2005/2006/2007 S.E 14-17 A.I.P 9-11 Win.XP + SP2
|
erstellt am: 07. Aug. 2006 09:43 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Zitat: Original erstellt von Billy_Boy: Hi Micha,Sollte im prinzip so funktionieren ! Jedoch sollte bei jedem Speichern dieses Makro automatisch ausgeführt werden... ist das irgendwie möglich?
Klaro geht das nur hast du eine VB Version ? Gruß Micha
------------------ http://classicvb.org/petition/ Zitat: Interpunktion und Orthographie des Postings sind frei erfunden. Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
VBSpawn Mitglied Programmierer
Beiträge: 514 Registriert: 23.08.2005 Sorgfältige Planung ersetzt niemals pures Glück.<P>S.W.X 2005/2006/2007 S.E 14-17 A.I.P 9-11 Win.XP + SP2
|
erstellt am: 07. Aug. 2006 09:58 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Zitat: Original erstellt von VBSpawn: Klaro geht das nur hast du eine VB Version ? Gruß Micha
Falls du keine hast ... -Öffne deinen Excel VBA Editor und erzeuge eine Form. -Füge auf dieser Form einen Button ein -Verweise auf SolidEdge setzen (siehe Bild) -Füge als FormularCode das ein: Private seApp As SolidEdgeFramework.Application Private WithEvents mEvents As SolidEdgeFramework.ApplicationEvents Private iCNT As Long Private Sub CommandButton1_Click() Set seApp = GetObject(, "SolidEdge.Application") Set mEvents = seApp.ApplicationEvents End Sub Private Sub mEvents_BeforeDocumentSave(ByVal theDocument As Object) iCNT = iCNT + 1 Call Prop(theDocument) End Sub Sub Prop(ByVal mDoc As Object) Dim se As Object 'SolidEdgeFramework.Application 'Dim mDoc As Object 'SolidEdgeFramework.SolidEdgeDocument Dim mSum As Object 'SolidEdgeFramework.SummaryInfo
Dim hlpStr As String On Error Resume Next Set mSum = mDoc.SummaryInfo hlpStr = mSum.Title & mSum.Subject mSum.Comments = hlpStr 'mSum.Title = "" 'mSum.Subject = "" Debug.Print "prop beim Speichern :" & hlpStr End Sub -Starte die Form mit F5 -Klicke auf den Button und vor dem Speichern wird jetzt die Prop geändert. Das ist zwar einwenig umständlich geht aber auch ... ---------- Micha
------------------ http://classicvb.org/petition/ Zitat: Interpunktion und Orthographie des Postings sind frei erfunden. Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 07. Aug. 2006 10:18 <-- editieren / zitieren --> Unities abgeben:
Hi, habe leider nur das VBA aus Excel, kann kaum damit umgehen :-) Ist es möglich, aus deinem Oberen Code ein Macro zu machen, welches ich in SE mit einem Button versehe.....wo ich dann draufdrücke,.... das ganze sollte dann einfach die Variablen mSum.Subject & "_" & mSum.Title ins Kommentar Feld eintragen und im Anschluss die normale Speicher Routine ausführen! Ist das sehr aufwendig... Besten Dank erstmal... Jürgen
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
VBSpawn Mitglied Programmierer
Beiträge: 514 Registriert: 23.08.2005 Sorgfältige Planung ersetzt niemals pures Glück.<P>S.W.X 2005/2006/2007 S.E 14-17 A.I.P 9-11 Win.XP + SP2
|
erstellt am: 07. Aug. 2006 11:26 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Hallo Jürgen, Die beigefügte DLL erzeugt dir dei ASM, PAR, PWD einen Button welcher die Eigenschaften überträgt ein HowTo liegt im zip. Alles was du damit machst geschieht natürlich auf eigene Gefahr. Gruß Micha ------------------ http://classicvb.org/petition/ Zitat: Interpunktion und Orthographie des Postings sind frei erfunden. Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 07. Aug. 2006 12:56 <-- editieren / zitieren --> Unities abgeben:
Hallo Micha, Besten Dank für deine Mühen, das Programm funktioniert wirklich wunderbar, das war genau was wir gesucht haben,... Jedoch hätte ich noch eine kleine Programmänderung anzumerken, falls nicht zu viel Aufwand: Wäre es möglich, nach dem Schließen (mit OK) des Dialogfeldes "Dateieigenschaften" und VOR dem Speichern nochmals das Variablenfeld KOMMENTAR aktualisieren zu lassen? Weiters wäre es toll, wenn du das Abfragefeld "Speichern ? - JA/NEIN" entfernen könntest und dort fix JA zu bestätigen... Vielleicht könntest du auch noch das im Anhang angefügte ICON als Programmsymbol vergeben... ICh möchte mich hiermit im Namen unseres Teams bei dir für dieses tolle "Service" bedanken. Du erleichterst unsere Arbeit sehr wesentlich.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 07. Aug. 2006 12:59 <-- editieren / zitieren --> Unities abgeben:
|
VBSpawn Mitglied Programmierer
Beiträge: 514 Registriert: 23.08.2005 Sorgfältige Planung ersetzt niemals pures Glück.<P>S.W.X 2005/2006/2007 S.E 14-17 A.I.P 9-11 Win.XP + SP2
|
erstellt am: 07. Aug. 2006 13:42 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Was tut man nicht alles für ne Kiste Bier <fg> Es sollte ausreichen die dll einfach zu ersetzen (SE vorher beenden). Ansonsten nochmal die .reg ausführen. Gruß Micha
------------------ http://classicvb.org/petition/ Zitat: Interpunktion und Orthographie des Postings sind frei erfunden. Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 07. Aug. 2006 14:05 <-- editieren / zitieren --> Unities abgeben:
Perfekt, wüste eigentlich nicht mehr, was wir noch verbessern könnten, außer vielleicht, das man beim öffnen der Dateieigenschaften direkt auf die Registerkarte INFO kommt und nicht auf die Übersicht ! Bei Lust und Laune könntest du in diesem Sinne auch eine dll generieren, welche bei einer geöffneten ASM alle darin enthaltenen PAR, bzw. PSM - Dateieigenschaften öffnet und auch dort das Feld KOMMENTAR aktualisiert, bzw. generiert.
Besten Dank nochmals für all deine Mühen,... hoffe auch andere können dieses Tool nützlich verwenden hab dir im Anhang was angefügt.... Grüße vom Gesamten TEAM Jürgen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 07. Aug. 2006 14:10 <-- editieren / zitieren --> Unities abgeben:
|
VBSpawn Mitglied Programmierer
Beiträge: 514 Registriert: 23.08.2005 Sorgfältige Planung ersetzt niemals pures Glück.<P>S.W.X 2005/2006/2007 S.E 14-17 A.I.P 9-11 Win.XP + SP2
|
erstellt am: 08. Aug. 2006 08:19 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
|
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 08. Aug. 2006 09:08 <-- editieren / zitieren --> Unities abgeben:
Hi Micha, Es funktioniert prima, wenn ich nun auf DATEI - DATEIEIGENSCHAFTEN gehe,.... jedoch meinte ich, dass beim klicken auf das von dir erstellte ICON (dann kommt ja beim ersten mal Speichern das Dialogfeld DATEIEIGENSCHAFTEN) dort sollte es dann direkt auf die INFO Registrierkarte springen Sorry wenn ich mich weiter oben etwas unverständlich ausgedrückt habe... Grüße Jürgen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 08. Aug. 2006 09:22 <-- editieren / zitieren --> Unities abgeben:
Micha, mir ist noch etwas eingefallen, Ist es möglich, eine if - Anweisung einzufügen, welche folgende Routene aufweist: Sollte im EigenschaftsFeld Dokumentnummer (Registrierkarte Projekt) etwas stehen (bei Normteilen der Fall --> Thema und Title sind leer), so soll dies ins EigenschaftsFeld Manager kopiert werden und im Kommentar kein Eintrag erfolgen. Andernfalls, falls EigenschafsFeld Dokumentnummer leer ist (bei allen anderen von uns generierten Parts oder PSM),gewohnte Routine, wie jetzt. Besten Dank wiedereinmal....
Hat keinen Stress ! Grüße Jürgen Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 17. Aug. 2006 07:56 <-- editieren / zitieren --> Unities abgeben:
|
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 18. Apr. 2007 08:56 <-- editieren / zitieren --> Unities abgeben:
Hi Micha Ich hoffe wir dürfen dich wiedermal belästigen... Und zwar funktioniert dein speichertool prima und läuft auch mit V19, allerding nur wenn man den restordner von v18 der unter c:\programme drinbleibt nicht löscht. wenn allerdings nur V19 auf dem PC läuft kann man es leider nicht ausführen. Gibts da eine möglichkeit das Tool einfach an v19 anzupassen? besten dank im vorraus Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bwr Mitglied Konstrukteur
Beiträge: 131 Registriert: 21.02.2007 Win10 64-bit NVIDIA T500 Inventor 2022 Catia V5-6R2020
|
erstellt am: 20. Apr. 2007 12:02 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Hallo, schade daß bei den obigen Beiträgen die Anhänge nicht mehr funktionieren. Die hätten mir bei meiner Arbeit wahrscheinlich weiter geholfen. Leider habe ich nichts vergleichbares mehr gefunden. Ich möchte vor dem Speichern eines Dokuments noch einige Aktionen durchführen. Ich hätte es erst einmal mit VBA und Excel probiert, das mit 'ner dll erscheint mir jetzt noch zu kompliziert. Ich habe mich am Beitrag vom 07. Aug. 2006 09:58 orientiert. Die Projektnummer mit Excel auszulesen ist kein Problem. Ich bekomme es aber einfach nicht hin, daß diese beim Speichern in einer msgbox angezeigt wird oder in die benutzerdefinierten Eigenschaften übertragen wird. Ich kapiere nicht was mit "-Verweise auf SolidEdge setzen (siehe Bild)" gemeint ist. Was ist zu tun? Kann mir jemand auf die Sprünge helfen? Viele Grüße andi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Billy_Boy Mitglied Konstruktion
Beiträge: 58 Registriert: 21.07.2005
|
erstellt am: 23. Apr. 2007 07:26 <-- editieren / zitieren --> Unities abgeben:
Hi andi Ich hab dir mal den letzten Anhang erneut raufgeladen. Mit diesem Tool hat unsere Arbeit bisher besten funktioniert (abgesehn auf das kleine Problem mit V19). Hoffe es hilft dir weiter Grüße Jürgen [Diese Nachricht wurde von Billy_Boy am 23. Apr. 2007 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bwr Mitglied Konstrukteur
Beiträge: 131 Registriert: 21.02.2007 Win10 64-bit NVIDIA T500 Inventor 2022 Catia V5-6R2020
|
erstellt am: 24. Apr. 2007 11:08 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Hallo Jürgen, danke für die Unterstützung, nur leider habe ich beim speichern etwas andere Aktionen auszuführen als du. In die dll kann ich halt leider nicht reinschauen, darum hätte ein bißchen mit Excel gespielt. Trotzdem vielen Dank. Gruß Andi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 24. Apr. 2007 11:20 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Moin, [...] nur leider habe ich beim Speichern etwas andere Aktionen auszuführen [...] und welche waeren das? Ohne diese Angabe ist wohl kaum ein Loesungsvorschlag denkbar. modeng ------------------ Unser Unwissen erobert immer weitere Welten. (S.J. Lec) Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
bwr Mitglied Konstrukteur
Beiträge: 131 Registriert: 21.02.2007 Win10 64-bit NVIDIA T500 Inventor 2022 Catia V5-6R2020
|
erstellt am: 24. Apr. 2007 16:45 <-- editieren / zitieren --> Unities abgeben: Nur für Billy_Boy
Hallo modeng, ein Anliegen von mir wäre, daß aus den benutzerdefinierten Eigenschaften der Eintrag "Codice" als Dokumentennummer gesetzt wird. Bei dft Dateien soll automatisch ein pdf erzeugt werden. Ich weiß, daß es hierzu bereits Hilfsmittel gibt. Nur soll der Dateiname des pdf ebenfalls 'Codice'.pdf lauten und am gleichen Ort wie das zugehörige dft gespeichert werden. So etwas habe ich noch nicht gefunden und muß wahrscheinlich erst gemacht werden. Mit meinen Programmierkenntnissen bin ich erst im Aufbau. Daher hätte ich gerne solche Funktionen zuerst über VBA u Excel probiert und dann erst später mit dem Code an eine dll gewagt. Dafür ist die Lücke in meinem Wissen jetzt noch zu groß und kompilieren, registrieren und probieren zu aufwendig. Ich wäre zunächst mit einer Excelvorlage, die das Speicherereignis beim Solid Edge abfängt bedient. Viele Grüße Andi Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |