Hot News:

Unser Angebot:

  Foren auf CAD.de (alle Foren)
  Inventor VBA
  Dokument Einstellungen

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:  Dokument Einstellungen (912 mal gelesen)
Bluejay
Mitglied
Ingenieur


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

Beiträge: 198
Registriert: 14.05.2007

Inventor 2011 for Simulation<P>Microsoft Windows XP Professional<P>Dell Precision T3400
Intel(R) Core(TM)2 Duo CPU
E6750 @2,66 GHz
3,00 GB RAM

erstellt am: 06. Dez. 2016 10:48    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 liebes Forum,
gibt es eine möglichkeit bei allen offenen Dokumenten eine Anpassung der Dokumenten Einstellung vorzunehmen. Ich würde gerne unter dem Menü Modellierung den Haken bei "An Baugruppen- und Zeichnungsschnitten beteiligen" entfernen? Manuell wäre sehr müsam. Hat jemand einen Link, eine Hilfestellung bzw. einen Code den ich Anpassen kann?

Für alle Hilfe bedanke ich mich schon mal im voraus

MFG

------------------
MFG

BlueJay

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

KraBBy
Mitglied
Maschinenbau-Ingenieur


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

Beiträge: 601
Registriert: 19.09.2007

Inventor Professional 2020
WinX

erstellt am: 06. Dez. 2016 12:25    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 Bluejay 10 Unities + Antwort hilfreich

Das Makro läuft bei mir (in einem kurzen Test durch). Es werden nur die geöffneten Dokumente behandelt (also die mit eigenem Fenster). Evtl geöffnete iam oder idw werden ignoriert.

Code:
Sub Test_iptOptionen()   
    Dim oVisDoc As Document
    Dim oDoc As PartDocument
   
    For Each oVisDoc In ThisApplication.Documents.VisibleDocuments
        If kPartDocumentObject = oVisDoc.DocumentType Then
            Set oDoc = oVisDoc
            Dim oSett As ModelingSettings
            Set oSett = oDoc.ModelingSettings  'enthält die Einstellungen, analog zum Reiter Modellieren
            'Einstellungen vornehmen
            With oSett
                If .AllowSectioningThruPart Then .AllowSectioningThruPart = False    'an Schnitten beteiligen
                .AllowSectioningThruPart = True
            End With
        End If
    Next 'oVisDoc
End Sub

------------------
Gruß KraBBy

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

KraBBy
Mitglied
Maschinenbau-Ingenieur


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

Beiträge: 601
Registriert: 19.09.2007

Inventor Professional 2020
WinX

erstellt am: 06. Dez. 2016 12:30    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 Bluejay 10 Unities + Antwort hilfreich

sorry, die zweite Zeile im "With" muss raus.
Hatte den Haken für meinen Test gleich wieder gesetzt.

...
With oSett
    If .AllowSectioningThruPart Then .AllowSectioningThruPart = False    'an Schnitten beteiligen AUS
End With
...

------------------
Gruß KraBBy

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



Hardwareentwickler (m/w/d)

Die X2E GmbH ist ein führender Anbieter von Datenloggern für die Automobilindustrie. Außerdem unterstützen wir unsere Kunden bei der Systementwicklung mit vielfältigen Engineering-Dienstleistungen. Als Teil der wachstumsstarken X2E Unternehmensgruppe arbeiten wir mit über 150 Mitarbeiterinnen und Mitarbeitern an vier Standorten daran, mit unseren innovativen Produkten und Lösungen Maßstäbe zu setzen....

Anzeige ansehenHardware-Entwicklung
Bluejay
Mitglied
Ingenieur


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

Beiträge: 198
Registriert: 14.05.2007

Inventor 2011 for Simulation<P>Microsoft Windows XP Professional<P>Dell Precision T3400
Intel(R) Core(TM)2 Duo CPU
E6750 @2,66 GHz
3,00 GB RAM

erstellt am: 06. Dez. 2016 14:09    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

Vielen Dank .. werde ich morgen wenn etwas mehr zeit frei ist ausprobieren!

------------------
MFG

BlueJay

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