Office: MsgBox 2 Buttons

Hallöchen,
an was könnte das liegen? Ich habe eine MsgBox mit 2 Buttons (YesNo). Aber ich kann keine 2 unterschiedliche Enden programmieren. Einzeln funktionierts, zusammen nicht. (bei Yes soll er sub abbrechen, bei No soll er auf Tabellenblatt1 zurück)
Was mache ich falsch?
viele Grüße
Christina

 

Hallo,

Du mußt das sinngemäß so programmieren: If Antwort = vbNo Then end else sheets("Tabelle1").select

Grß
J.

 

Hi,

der Code sieht dann z.B. so aus (nur als Ergänzung zu John):

Code:

Sub MsgBox_Arten()

If MsgBox("Willst du weitermachen?", vbYesNo, "MsgBox-Test") = vbYes Then
    MsgBox "hier geht dann der code weiter!"
Else
    MsgBox "hier endet es!"
    Exit Sub
End If

End Sub

 

Hi,
vielen Dank für die beiden Antworten. Ich habe das mit ca. 50 unterschiedlichen Varianten versucht, aber es funktioniert einfach nicht. Er führt immer für beide Buttons das gleiche aus. Hier mein Text:

MsgBox "Umsatzanteil geprüft?", vbYesNo
If Antwort = vbYes Then
End
Selection.Clear
Else
GoTo Fehler
End If

Fehler:
MsgBox "Möchten Sie die Umsätze jetzt überprüfen?", vbYesNo
If intA = vbNo Then
End
Selection.Clear
Else
Sheets("Tabelle1").Select
End If

Was mache ich falsch?
Bitte helft mir :cry:
Christina

 

Hallo Christina,

Sub test()
Antwort = MsgBox("Umsatzanteil geprüft?", vbYesNo)
If Antwort = vbYes Then
End
Selection.Clear
Else
Fehler
End If
End Sub

Sub Fehler()
intA = MsgBox("Möchten Sie die Umsätze jetzt überprüfen?", vbYesNo)
If intA = vbNo Then
End
Selection.Clear
Else
Sheets("Tabelle1").Select
End If
End Sub

Gruß
J.

 

Hi schau Dir meine Code doch mal genau an. So müsste es bei Dir aussehen:

Code:

Antwort = MsgBox ("Umsatzanteil geprüft?", vbYesNo) 
If Antwort = vbYes Then 
End 
Selection.Clear 
Else 
GoTo Fehler 
End If 

Fehler: 
intA = MsgBox ("Möchten Sie die Umsätze jetzt überprüfen?", vbYesNo) 
If intA = vbNo Then 
End 
Selection.Clear 
Else 
Sheets("Tabelle1").Select 
End If 

Bei dir wird in "intA" und "Antwort" nichts gestanden haben - das füllst Du mit dem Rückgabewert der MsgBox - und das ist das Klickereignis.

BTW: nicht di Deklaration der Variablen vergessen. Das sollte man immer machen - zur eigenen Sicherheit!

[EDIT] --- John war schneller.......

 

Jetzt klappt es! *Freu*
Vielen Dank an euch beide
Christina