Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen

Abfrage in Makro ???

Betrifft: Abfrage in Makro ??? von: Paul
Geschrieben am: 27.08.2004 14:31:28

Hallo liebes Forum,
ich habe eine Anfängerfrage:
Ich möchte das vor der Ausführung eines von mir aufgezeichneten Makro, eine Abfrage erscheint ob die Aktion tatsächlich ausgeführt werden soll.
Jedoch habe ich keine Ahnung wie der zusätzliche Makrotext hierfür ausehen muß.

Würde mich über eine Hilfe riesig freuen.

1000 Dank
Paul

  


Betrifft: AW: Abfrage in Makro ??? von: P@ulchen
Geschrieben am: 27.08.2004 14:42:31

Hi Paul,

Sub Abfrage()
If MsgBox("Wollen Sie die Aktion durchführen ?", vbYesNo) = vbNo Then Exit Sub
'Hier Dein Makro reinkopieren
End Sub




Gruß aus Leipzig
P@ulchen

Das Forum lebt auch von den Rückmeldungen !


  


Betrifft: AW: Abfrage in Makro ??? von: Giuseppe
Geschrieben am: 27.08.2004 14:48:02

hallo Paul
am Anfang deine Macro schreibt:
If MsgBox(" Soll ich weiter?", vbYesNo, "Kontrolle")= 7 Then Exit Sub
Ciao
Giusppe


  


Betrifft: DANKE an alle von: Paul
Geschrieben am: 27.08.2004 15:04:14

Spitze !!!

Ich danke euch für die Hilfe.
Problem ist gelöst, und ich habe wieder dazugelernt.

1.000 Dank
Paul


  


Betrifft: AW: Abfrage in Makro ??? von: Jens M
Geschrieben am: 27.08.2004 14:50:55

Hallo Paul!

z. B. so was:

...
i = MsgBox("Soll die Datei xyz.XLS wieder geschlossen werden?", 4, "Frage:")
If i = 6 Then Workbooks("xyz.XLS").Close SaveChanges:=True
If i = 7 Then [dein Befehl]
...

Schau hierzu auch mal mit F1 in der Excel-VBA-Hilfe nach. Da findest du Beispiele für Message- und Inputboxes bzgl. der Ziffern usw ...

Schönes Wochenende,
Jens


 

Beiträge aus den Excel-Beispielen zum Thema "Abfrage in Makro ???"