---

Hallo

ich möchte in einer VBA-Sub den Befehl "AUTOPUBL" absetzen.

Mein erster Versuch lautete
                ThisDrawing.SendCommand ("AUTOPUBL" & vbCr)
Der Befehl wird in der Befehlszeile mit dem Hinweis Fehler bei Ausführung angezeigt.
Drücke ich RETURN wird der Befehl auch ausgeführt.

Mein zweiter Versuch lautete
                ThisDrawing.SendCommand ("AUTOPUBL" & vbCr & vbCr)
Der Befehl wird zwar in der Befehlszeile angezeigt aber nicht ausgeführt.
Es folgt auch hier der Hinweis : Fehler bei Ausführung

Vor und hinter dem SendCommand habe ich für Testzwecke eine Abfrage eingebaut.
Die Eingabeaufforderung (Versuch 1) erschien auch erst nach Beendigung der Sub
in der Befehlseingabezeile von ACad.

Hier mein Testcode:

Sub BEF_AUTOPUBL
    strEingabe = InputBox("vor AUTOPULB")
    ThisDrawing.SendCommand ("AUTOPUBL" & vbCr)
    strEingabe = InputBox("hinter AUTOPUBL")
End Sub

Hat jemand einen Tip wie ich den Befehl innerhalb der Beide Abfragen starten kann 

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

---

Nur ne idee
anstelle des 2ten vblf mal vbcrlf versuchen - weil DAS ist return !

------------------
Wer es nicht versucht, hat schon verlorn 
Und bei 3 Typos gibts den vierten gratis !

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