Clever-Excel-Forum

Normale Version: Wenn Function Start = End Sub
Du siehst gerade eine vereinfachte Darstellung unserer Inhalte. Normale Ansicht mit richtiger Formatierung.
Hallo Liebe Community,

Ich habe mal wieder ein Problem. Ich möchte eine Anweisung einbauen stehe aber grad auf dem schlauch Huh .
Ich hab auch schon in anderen Foren geschaut finde aber nichts passendes.
Hier mal meine Vorstellung wie Ich das machen wollte:

Also Ich möchte ein Sub bei Workbook_Activate() einbauen das Funktioniert auch.
aber Ich möchte nun das Wenn Ich aus Modul1 eine Sub starte das die Sub in Workbook_Activate() beendet wird bzw. ausgesetzt

Hier mal mein Code:
 
Private Sub Workbook_Activate()
'Startet den Timer nur wenn die BinärWert Sub aus ist
If Modul1.BinärWert = True Then
  Call prcTimerStop
Else
  Call prcTimerStart
End If
End Sub

Mach Ich mir das hier zu leicht oder geht das so gar nicht ? Ich hoffe doch ihr könnt mir helfen.

Lg Florian
Deutsch wird mehrdeutig, wenn man es nicht richtig schreibt und Interpunktion vernachlässigt:

aber Ich möchte nun das Wenn Ich aus Modul1 eine Sub starte das die Sub in Workbook_Activate() beendet wird bzw. ausgesetzt

aber ich möchte nun, dass, wenn ich aus Modul1 eine Sub starte, (dass) die (andere) Sub in Workbook_Activate() beendet bzw. ausgesetzt wird
Hallo Florian,

arbeite dich durch die super Erklärung von Peter Haserodt.