HERBERS
Excel-Forum
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Makro ausführen beim Wechsel auf Tabellenblatt

Makro ausführen beim Wechsel auf Tabellenblatt
07.04.2005 14:23:46
Patrick
Hallo an alle,
ich würde gerne mit einem Tabellenblatt ein Makro verknüpfen. D.h. wenn jemand auf ein Tabellenblatt wechselt, dann soll das Makro ausgeführt werden.
Idialerweise sollte eine Abfrage stattfinden nach dem Motto: "Soll das Makro ausgeführt werden?"
Nehme natürlich auch gerne verweise auf das Archiv, bin da nur leider nicht fündig geworden.
Danke Euch!

1
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Benutzer
AW: Makro ausführen beim Wechsel auf Tabellenblatt
07.04.2005 14:41:24
Frank
Hallo,
in "DieseArbeitsmappe" folgenden Code einfügen
Option Explicit

Private Sub Workbook_Activate()
Dim Result As Integer
If ActiveWorkbook.Name = "Mappe1" Then
Result = MsgBox("soll ich was machen ?", vbQuestion + vbOKCancel)
If Result = vbOK Then Call RunMe
End If
End Sub

dann ein Modul und folgenden Code einfügen:
Option Explicit
Public Sub RunMe()
MsgBox "Hi!"
End Sub
dann in dem Workbook ein zweites einfügen also "Mappe2" und nun zwischen "Mappe1" und
"Mappe2" wechseln!
Gruss
Frank

Meistgelesene Forumthreads (12 Monate)