---

Hallo zusammen

Ich versuche den Inhalt der schreibgeschützten Variable "TARGET" auszulesen mit:

Dim sysvar as String
Dim Retval as Variant
sysvar = "Target"
RetVal = ThisDrawing.GetVariable(sysvar)

Obwohl die Variable einen Wert besitzt, bleibt der Rückgabewert der Abfrage leer. Wieso?

Kann mir jemand helfen?

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

---

Hi,

Also bei mir gibt er die 3 Punkte (0,0,0) zurück.

Siehe hier:

Sub test()
Dim sysvar As String
Dim Retval As Variant
sysvar = "Target"
Retval = ThisDrawing.GetVariable(sysvar)
MsgBox "Punkt 1(x)= " & Retval(0) & vbCr & "Punkt 2(y)= " & Retval(1) & vbCr & "Punkt 3(z)= " & Retval(2)
End Sub

Gruß, Carsten

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

---

Vielen Dank, bei mir gehts jetzt plötzlich auch, keine Ahnung wieso 

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

---

Hallo,

Ich will die Target zwar nicht auslesen, aber ich würde sie liebend gerne ändern, weil die bei mir aus irgendeinem Grund immer einen negativen Z-Wert hat (im Layout nicht, nur im Modell) obwohl ich nur auf Ebene 0,0,0 zeichne.

Das Problem ist dann nämlich, dass Objekte die mit dem Express-Tool "Change Space" übertragen werden bei mir auf Z = ca. -8000 landen obwohl alle anderen Objekte auf Z = 0 sind und das ist ziemlich doof.

Kann mir jemand helfen wie ich die wieder zurücksetze?
Die sollte im Modell doch 0,0,0 sein, oder? (bei mir is die wo ganz anders)

------------------
Gruß Andreas

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

---

Hi Andreas,

Schon mal geschaut, wo der Ursprung von deinem BKS ist?!

Stell das BKS auf Welt und dann sollte es klappen.

Gruß, Carsten

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