Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

MSG - Box

Forumthread: MSG - Box

MSG - Box
01.02.2004 14:03:08
helena
Hallo Exelfreunde
möchte für meinen Ablauf denn Start Makro mit Rückfrage gestalten
Sub last_check()
Dim Mldg$
Mldg = MsgBox("Kunden-Nummer korrekt?", _
vbYesNo + vbQuestion, "sind Sie sicher...")
*** Anzeige AKTIVESHEET ZELLEA1 in MSG-BOX
*** MsgBox "Ok, dann speichern"
call mein Makro
*** MSGBOX wenn NEIN
*** beenden
denke so müsste es in etwa sein YES/NO mit YES CALL
und mit NO BEENDEN
DANKE
gruss helena
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: MSG - Box
01.02.2004 14:09:21
Bertram
Hallo Helena,
so etwa?


Sub last_check()
Dim Mldg$
Mldg = MsgBox("Kunden-Nummer " & Range("A1") & " korrekt?", _
vbYesNo + vbQuestion, "sind Sie sicher...")
If Mldg = vbYes Then Call meinMakro
End Sub

     Code eingefügt mit Syntaxhighlighter 2.5

Gruß
Bertram
Anzeige
AW: MSG - Box
01.02.2004 14:12:13
Knut
Option Explicit

Sub last_check()
Dim Mldg As Integer
Mldg = MsgBox("Kunden-Nummer korrekt? " & Space(10) & Chr(10) & ActiveSheet.[a1], _
vbYesNo + vbQuestion, "sind Sie sicher...")
If Mldg = vbNo Then Exit Sub
''Dein Code
End Sub

Knut
Danke beide Var. Tip-Top (oT)
01.02.2004 14:23:22
helena
.
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige