Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
1008to1012
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Aufruf von Makros mit Abfrage (JA oder NEIN) ?

Aufruf von Makros mit Abfrage (JA oder NEIN) ?
18.09.2008 18:59:00
Makros
Hallo Leute,
wenn ich ein Makro starte, würde ich gerne eine Abfrage (MsgBox) einschalten, wo ich gefragt werde, ob die weitere Makros (siehe Beispiel) tatsächlich ausgeführt werden sollen. Geht das überhaupt?
Beispiel:

Sub Makro1()
Dim rng As Range
For Each rng In Range("A1:A" & Range("A65536").End(xlUp).Row)
If rng.Font.ColorIndex = 17 Then
Range(rng.Offset(0, 1), rng.Offset(0, 26)).Font.ColorIndex = 17
End If
Next
'hier Abfrage, ob die weitere drei Makros ausgeführt werden sollen
Call Makro2
Call Makro3
Call Makro4
End Sub


Vielen Dank im Voraus !
Liebe Grüße
Selma

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Aufruf von Makros mit Abfrage (JA oder NEIN) ?
18.09.2008 19:07:00
Makros
Hallo!
Sub Makro1()
Dim rng As Range
For Each rng In Range("A1:A" & Range("A65536").End(xlUp).Row)
   If rng.Font.ColorIndex = 17 Then
      Range(rng.Offset(0, 1), rng.Offset(0, 26)).Font.ColorIndex = 17
   End If
Next
If MsgBox("Möchten Sie fortfahren?", vbYesNo, "Frage") = vbNo Then Exit Sub
Call Makro2
Call Makro3
Call Makro4
End Sub

Code eingefügt mit VBA in HTML 1.2 ( Hilfe zum Programm)size>
Gruß, René

Anzeige
AW: Aufruf von Makros mit Abfrage (JA oder NEIN) ?
18.09.2008 21:17:56
Makros
Vielen Dank René!
LG,
Selma

312 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige