Einheiten umstellen (Autodesk/Inventor VBA)


	Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte
Autor	Thema: Einheiten umstellen (1501 mal gelesen)
GeorgK Mitglied Beiträge: 619 Registriert: 06.06.2001	erstellt am: 11. Jan. 2013 11:50 <-- editieren / zitieren --> Unities abgeben: Hallo zusammen, wie kann ich bei allen Teilen einer Baugruppe die Einheiten von cm auf mm umstellen? Vielen Dank Georg Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
RODER Mitglied Maschineningenieur Beiträge: 494 Registriert: 04.01.2003 Inventor 2023 Pro Win10 64Bit i9-10900K 3.7GHz 64GB RAM Nividia Quadro P2200 SpaceMouse	erstellt am: 11. Jan. 2013 18:06 <-- editieren / zitieren --> Unities abgeben: Nur für GeorgK Schau dir doch mal die Aufgabenplanung an, ev. klappts damit... ------------------ Grüsse, Toni Rechtschreibefehler gehören dem findigen Finder Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
rkauskh Moderator Dipl.-Ing. (FH) Versorgungstechnik Beiträge: 2166 Registriert: 15.11.2006 Windows 10 x64, AIP 2022	erstellt am: 11. Jan. 2013 22:58 <-- editieren / zitieren --> Unities abgeben: Nur für GeorgK Hi Rekursion durch die ReferencedDocuments der Baugruppe noch dazu und dann sollte das laufen. Code: Public Sub InventorUOM() ' Set a reference to the UnitsOfMeasure object of the ' active document. Dim oUOM As UnitsOfMeasure Set oUOM = ThisApplication.ActiveDocument.UnitsOfMeasure ' Get the current length units. Dim eLengthUnits As UnitsTypeEnum eLengthUnits = oUOM.LengthUnits oUOM.LengthUnits = kMillimeterLengthUnits oUOM.LengthDisplayPrecision = 4 End Sub ------------------ MfG Ralf Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
GeorgK Mitglied Beiträge: 619 Registriert: 06.06.2001	erstellt am: 14. Jan. 2013 17:03 <-- editieren / zitieren --> Unities abgeben: Hallo Ralf, vielen Dank. Werde die Rekursion einbauen. Grüße Georg Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP
RODER Mitglied Maschineningenieur Beiträge: 494 Registriert: 04.01.2003 Inventor 2023 Pro Win10 64Bit i9-10900K 3.7GHz 64GB RAM Nividia Quadro P2200 SpaceMouse	erstellt am: 14. Jan. 2013 17:15 <-- editieren / zitieren --> Unities abgeben: Nur für GeorgK Hallo Georg Sorry für den nicht sehr hilfreichen und ebenso sinvollen Tipp. Wer lesen kann ist klar im Vorteil... Hab nur deine Frage gelesen und nicht geschaut in welchem Brett sich diese Frage befindet. ------------------ Grüsse, Toni Rechtschreibefehler gehören dem findigen Finder Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP

Anzeige.:
X

Anzeige: (Infos zum Werbeplatz >>)