---

Hallo Forum,

wahrscheinlich stelle ich mich beim Suchen nur ganz blöd an.
Ich bräuchte eine Möglichkeit das ein VBA Makro nicht ausgeführt wird, wenn in der Zeichnung noch keine Zeichnungsansicht existiert.
Ich hoffe das mir dazu jemand einen Tipp geben kann.

Danke an euch
Gruß Udo

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

---

Hallo Udo

Sub main()
    Dim swApp As SldWorks.SldWorks
    Dim swModel As SldWorks.ModelDoc2
    Dim swDraw As SldWorks.DrawingDoc

    Set swApp = Application.SldWorks
    Set swModel = swApp.ActiveDoc
    Set swDraw = swModel

   
   
    If swDraw.GetViewCount - swDraw.GetSheetCount = 0 Then Exit Sub

End Sub

Gruss Winni

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

---

Danke

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

---

Hi Udo,

Willst du das nur für das aktuelle Blatt oder für die komplette Zeichnung Wissen?!
Für die Komplette Zeichnung würde das mit den Remarks bezüglich Anzahl Blätter und Ansichten so gehen: GetViewCount
Für das Aktuelle Blatt dies: GetFirstView und dann prüfen ob es eine erste Ansicht auf dem Blatt gibt.

Gruß, Carsten

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

---

Danke. Die beiden Tipps haben super geholfen.

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