---

Hallo Leute,
kann mir jemand weiter helfen?

Und zwar ich habe z.ß  in Sub XY() ein Fenster programmiert. Falls der User den knopf "Abbrechen" drückt soll der Programm komplett  Abbrechen. Ich habe mit EXIT SUB probiert aber der geht nur von den Sub XY()raus nicht von Sub CATmain()...

ICH DANKE EUCH IM VORAUS;-)
MFG
BM
Sub CATMain()
....
Call XY()

Call YY()
End Sub

Sub XY()
Dim Box As String
Box=inputbox("Hallo Bitte wählen Sie etwas","Abfrage",Box)
End Sub

Sub YY()
.....
End Sub

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

---

Was machst Du mit Deiner Box Variable ? Du wertest sie ja gar nicht weiter aus.

Axel

------------------
Inoffizielle deutsche CATIA Hilfeseite  Netiquette von cad.de

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

---

Ich bin mir nicht ganz sicher aber würde es mal mit dem Befehl "End" probieren.

Gruss

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

---

Hallo Sucher2010,

probiers mal so

Code:

---

  Sub XY()
Dim Box As String
Box = InputBox("Hallo Bitte wählen Sie etwas", "Abfrage", Box)
If Box = "" Then
    End
End If
End Sub
 

---

mfG
Mario

Edit: Ups, ich war zu spät... 

[Diese Nachricht wurde von roccat am 01. Nov. 2010 editiert.]

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

---

Das geht im VBA nicht.

Kannst nur dein Form durch unload beenden.
Musst halt eine Exception nach oben durchreichen, oder eine Division durch 0 machen.

------------------
Mit freundlichen Grüßen,
Henry Schneider
alias Lila

Es gibt einen ewigen Wettkampf zwischen der Natur und den Ingenieuren:
Die Ingenieure versuchen, immer idioten-sicherere Systeme zu bauen,
die Natur versucht, immer bessere Idioten zu bauen

Xing

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

---

Danke euch ..... Ich probiere es mal;-)

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