---

Hallo Forum,

obwohl meine Fragen auf reges Intresse stoßen, habe ich leider noch keine Lösung erhalten, bzw. einen Tipp bekommen.

Aktuelle beschäftige ich mich mit dem Problem, dass mittels VBA die Übergabe der entsprechenden benutzerdefinierten Ansicht nicht funktioniert, sondern immer eine Standardansicht ohne Farb- und Sichtbarkeitssteuerung erstellt wird.

Öffent man das IDW manuell und wählt die entsprechende benutzerspezifische Ansicht, geht es jedoch, also müssen die Informationen doch vorhanden sein, oder?

Hier der Quellcode, wo ich den Fehler vermute:

Set Ansicht1Startpunkt = oApp.TransientGeometry.CreatePoint2d(11, 15)
Set Ansicht2Startpunkt = oApp.TransientGeometry.CreatePoint2d(28, 17)

ViewFileName = "C:\Test\Arbeitsbereich\Test.idv"

ViewName = "arne.default"

oDrawingDoc.ActiveSheet.DrawingViews.AddBaseView oAssemDoc, Ansicht1Startpunkt, 0.04, kBottomViewOrientation, kShadedDrawingViewStyle, ViewFileName, ViewName
oDrawingDoc.ActiveSheet.DrawingViews.AddBaseView oAssemDoc, Ansicht2Startpunkt, 0.04, kBottomViewOrientation, kHiddenLineRemovedDrawingViewStyle, ViewFileName, ViewName

Also bitte nicht nur lesen, sondern auch mal antworten!:-)

Gruß und Dank!

Arne

PS Wenn man die gewspeicherte IDW von Hand im IV7 öffnet und RMT "Benutzer..Ansicht" die "arne.default" auswählt, dann stimmt alles!:-(

[Diese Nachricht wurde von Arne am 09. Dez. 2004 editiert.]

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

---

Zitat:

---

Also bitte nicht nur lesen, sondern auch mal antworten!:-)

---

Ich bin mir sicher, dass jetzt alles viel besser wird... Gib Gas, Arne !

------------------
Grüße daywa1k3r

[Diese Nachricht wurde von daywa1k3r am 10. Dez. 2004 editiert.]

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

---

Vielen Dank!

Gruß Arne

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