Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  Inventor VBA
  Blechstil

Antwort erstellen  Neues Thema erstellen
CAD.de Login | Logout | Profil | Profil bearbeiten | Registrieren | Voreinstellungen | Hilfe | Suchen

Anzeige:

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen nächster neuer Beitrag | nächster älterer Beitrag
  
Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor Thema:  Blechstil (2249 mal gelesen)
Markus Schrepfer
Mitglied
CAD Admin


Sehen Sie sich das Profil von Markus Schrepfer an!   Senden Sie eine Private Message an Markus Schrepfer  Schreiben Sie einen Gästebucheintrag für Markus Schrepfer

Beiträge: 95
Registriert: 01.02.2001

erstellt am: 28. Jan. 2011 07:39    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Guten Morgen zusammen,

kennt jemend den Ansatz, wie ich in einem geöffneten Blechteil über ein Makro die Stile aktualisieren kann?

Ich musste bei verschiedenen Blechstärken einen Korrekturwert ändern und diese Änderung soll natürlich auch auf bestehende Blechteile wirken.
Mit iLogic kam ich auch schon nicht weiter!

------------------
Markus Schrepfer

[Diese Nachricht wurde von Markus Schrepfer am 28. Jan. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

rkauskh
Moderator
Dipl.-Ing. (FH) Versorgungstechnik




Sehen Sie sich das Profil von rkauskh an!   Senden Sie eine Private Message an rkauskh  Schreiben Sie einen Gästebucheintrag für rkauskh

Beiträge: 2166
Registriert: 15.11.2006

Windows 10 x64, AIP 2022

erstellt am: 28. Jan. 2011 19:39    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Markus Schrepfer 10 Unities + Antwort hilfreich

Hallo

Test mal:

Code:
Private Sub UpdateStyle()

Dim oStyle As Style
Set oStyle = ThisApplication.ActiveDocument.ComponentDefinition.ActiveSheetMetalStyle

Call oStyle.UpdateFromGlobal

End Sub



oder falls es mehrere Stile sind:

Code:
Private Sub UpdateStyle()

Dim oStyle As Style
For Each oStyle In ThisApplication.ActiveDocument.ComponentDefinition.SheetMetalStyles
    oStyle.UpdateFromGlobal
Next

End Sub


------------------
MfG
RK

[Diese Nachricht wurde von rkauskh am 28. Jan. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Markus Schrepfer
Mitglied
CAD Admin


Sehen Sie sich das Profil von Markus Schrepfer an!   Senden Sie eine Private Message an Markus Schrepfer  Schreiben Sie einen Gästebucheintrag für Markus Schrepfer

Beiträge: 95
Registriert: 01.02.2001

erstellt am: 31. Jan. 2011 08:53    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Servus rkauskh,

danke für deinen Ansatz.

Leider läuft UpdateFromGlobal in einen Fehler:

Laufzeitfehler '-2147467259 (80004005)':

Die Methode 'UpdateFromGlobal' für das Objekt '_IRxSheetMetalStyle' ist fehlgeschlagen

Ich habe da noch einen Eintrag im Autodesk Forum gefunden:
Dabei dreht sich es um ein DrwaingDocument -  ]http://forums.autodesk.com/t5/Autodesk-Inventor-Customization/UpdateF romGlobal-style-crashes/m-p/2466562

Hast Du noch eine Idee, wie ich da weiterkomme?

------------------
Markus Schrepfer

[Diese Nachricht wurde von Markus Schrepfer am 31. Jan. 2011 editiert.]

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

rkauskh
Moderator
Dipl.-Ing. (FH) Versorgungstechnik




Sehen Sie sich das Profil von rkauskh an!   Senden Sie eine Private Message an rkauskh  Schreiben Sie einen Gästebucheintrag für rkauskh

Beiträge: 2166
Registriert: 15.11.2006

Windows 10 x64, AIP 2022

erstellt am: 31. Jan. 2011 14:42    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Markus Schrepfer 10 Unities + Antwort hilfreich

Hallo

In deiner aktiven Projektdatei ist aber auch das Verwenden der zentralen Stilbibliothek aktiviert oder?
Du kannst in VBA einen Haltepunkt auf die Zeile setzen und dann eine Überwachung von oStyle dazu.
Eventuell reicht es, vorab zu prüfen ob der Stil überhaupt aktualisiert werden muß.
Ich kann den Fehler bei mir leider nicht nachstellen, deswegen stocher ich ein bißchen im Nebel.

------------------
MfG
RK

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Markus Schrepfer
Mitglied
CAD Admin


Sehen Sie sich das Profil von Markus Schrepfer an!   Senden Sie eine Private Message an Markus Schrepfer  Schreiben Sie einen Gästebucheintrag für Markus Schrepfer

Beiträge: 95
Registriert: 01.02.2001

erstellt am: 31. Jan. 2011 17:10    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,

in der Projektdatei arbeiten wir mit einer zentralen Stilbibliothek.

Der Stil müsste aktualisiert werden, denn wenn ich manuell Format-Stile aktualisieren wähle, so wird mir ein Stil zum aktualisieren angeboten.

Ich probiere eben im Bereich ThisApplication.ActiveDocument.ComponentDefinition.UnfoldMethod hier ist auch UptoDate = Falsch. Dein Tipp mit den Prüfen hat mich darauf gebracht.

------------------
Markus Schrepfer

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

rkauskh
Moderator
Dipl.-Ing. (FH) Versorgungstechnik




Sehen Sie sich das Profil von rkauskh an!   Senden Sie eine Private Message an rkauskh  Schreiben Sie einen Gästebucheintrag für rkauskh

Beiträge: 2166
Registriert: 15.11.2006

Windows 10 x64, AIP 2022

erstellt am: 31. Jan. 2011 22:51    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities Nur für Markus Schrepfer 10 Unities + Antwort hilfreich

Hallo

Hab ich grad gefunden. Vielleicht hilft dir das hier weiter.

------------------
MfG
RK

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Markus Schrepfer
Mitglied
CAD Admin


Sehen Sie sich das Profil von Markus Schrepfer an!   Senden Sie eine Private Message an Markus Schrepfer  Schreiben Sie einen Gästebucheintrag für Markus Schrepfer

Beiträge: 95
Registriert: 01.02.2001

erstellt am: 01. Feb. 2011 07:43    Editieren oder löschen Sie diesen Beitrag!  <-- editieren / zitieren -->   Antwort mit Zitat in Fett Antwort mit kursivem Zitat    Unities abgeben: 1 Unity (wenig hilfreich, aber dennoch)2 Unities3 Unities4 Unities5 Unities6 Unities7 Unities8 Unities9 Unities10 Unities

Hallo,

danke Dir für den Link, ist ja genau die Antwort auf meine Frage im ADSK Forum.

Muss ich mir mal anschauen!

------------------
Markus Schrepfer

Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:

Anzeige: (Infos zum Werbeplatz >>)

Darstellung des Themas zum Ausdrucken. Bitte dann die Druckfunktion des Browsers verwenden. | Suche nach Beiträgen

nächster neuerer Beitrag | nächster älterer Beitrag
Antwort erstellen


Diesen Beitrag mit Lesezeichen versehen ... | Nach anderen Beiträgen suchen | CAD.de-Newsletter

Administrative Optionen: Beitrag schliessen | Archivieren/Bewegen | Beitrag melden!

Fragen und Anregungen: Kritik-Forum | Neues aus der Community: Community-Forum

(c)2023 CAD.de | Impressum | Datenschutz