---

Hallo Leute

Habe ein kleines Problem.
Ich möchte zwischen zwei geöffneten Zeichnungen umschalten. Aber mit meinem Code funktioniert
das irgenwie nicht.
Ich dacht ich probiers mal so:
Zuerst:
Set actdocument = Documents(0)
Set actdocument = ActiveDocument

zum Aktivieren des ersten documents und nach eine Reihe von Befehlen möchte ich gerne mit

Set actdocument1 = Documents(1)
Set actdocument1 = ActiveDocument

ins zweite geöffnete document springen, aktivieren und anzeigen lassen.

Das mit dem aktivieren funktioniert ja, aber die Zeichnung wird mir nicht angezeigt.
Brauche aber die 2. Zeichnung um mit

ThisDrawing.Utility.GetPoint

einen Punkt auszulesen.

Habt Ihr vielleicht eine Ahnung warum die 2. Zeichnung nicht angezeigt wird?

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

---

Hi,

>> Habt Ihr vielleicht eine Ahnung

...eine ganz dunkle ... 

Code:

---

Public Sub switchToDoc0()
  ThisDrawing.Application.Documents(0).Activate
End Sub
Public Sub switchToDoc1()
  ThisDrawing.Application.Documents(1).Activate
End Sub

---

HTH, - alfred -

------------------
www.hollaus.at

---

Danke für deine rasche Antwort.
Es funktioniert super,

Danke nochmal

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