Datum

Titel

26.04.2024 17:18:47

Große Datenmenge in komplexes Diagramm verpacken

26.04.2024 16:22:47

Aktualisierung Verknüpfung bei geschlossener Quelldatei

26.04.2024 16:05:28

PivotChart-Stapeldiagramm erstellen

26.04.2024 15:34:42

Überlagernde Textbox-Ansicht

Du findest keine passende Antwort auf Deine Frage?

Stelle Deine Frage in unserem Live-Forum

Archiv - Navigation

1060to1064

Aktuelles Verzeichnis

Verzeichnis Index

Übersicht Verzeichnisse

Vorheriger Thread

Rückwärts Blättern

Nächster Thread

Vorwärts blättern

HERBERS

Excel-Forum (Archiv)

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

Rückwärts Blättern

Aktuelles Verzeichnis

Übersicht Verzeichnisse

Vorwärts blättern

Inhaltsverzeichnis

Makro abschalten

Forumthread: Makro abschalten
8 Beiträge zu diesem Forumthread
Anzeige
299 Threads zu ähnlichen Themen
Excel Dialoge
Top 100 Forumthreads

Makro abschalten

14.03.2009 19:04:56

Rolf

Hallo Leute!
Ich habe eine Makrokette,also
das erste Makro ruft das zweite auf.
Stabile konstruktion.Ich möchte aber
mit einem ToggleButton das zwiete Makro
abschalten bzw wieder anhängen.
Wie könnte man sowas bewerkstelligen?
Grüße
Rolf

8
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Makro abschalten

14.03.2009 19:10:47

Josef
AW: Makro abschalten

14.03.2009 19:40:29

Rolf
Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 20:03:02

Josef
AW: Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 20:14:58

Rolf
AW: Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 20:22:26

Josef
AW: Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 21:44:07

Rolf
AW: Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 21:58:29

Josef
AW: Glaskugel kaputt, bitte Code zeigen! o.T.

15.03.2009 08:58:26

Rolf

AW: Makro abschalten

14.03.2009 19:10:47

Josef

Hallo Rolf,

Sub StabilesMakro()

  'dein Code

  If ToggleButton1 Then
    DeinAnderesStabilesMakro
  End If

  'anderer Code
End Sub

Gruß Sepp

AW: Makro abschalten

14.03.2009 19:40:29

Rolf

Hallo Sepp!
Habe die Sache ausprobiert -leider
lassen sich die Makros(Makro1 und Makro2)
nicht austauschen.
Es passiert überhaupt nichts!
Grüße
Rolf

Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 20:03:02

Josef

Gruß Sepp

AW: Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 20:14:58

Rolf

Hallo Sepp!
Hier der Code bedenke jedoch das ich ein Diletant bin.
Option Explicit


Public Sub reset()
' Dim Makro1 As Object
Sheets("Tabelle1").ToggleButton1.Value = False
Makro1
End Sub

Sub Makro1()
'dein Code
Makro1
If ToggleButton1.Caption = False Then
' Makro2
End If
Makro2
'anderer Code
End Sub

Sub Makro1()
MsgBox "1"
End Sub

Sub Makro2()
MsgBox "2"
End Sub

AW: Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 20:22:26

Josef

Hallo Rolf,
wenn Der ToggleButton gedrückt ist,werden beide Makros ausgeführt, sonst nur Makro1.
Wenn es andersrum sein soll, dann den auskommentierten Codeteil verwenden.

Public Sub reset()
  Makro1
  If Sheets("Tabelle1").ToggleButton1 Then Makro2
  'oder?
  'If Not Sheets("Tabelle1").ToggleButton1 Then Makro2
End Sub

Sub Makro1()
  MsgBox "1"
End Sub

Sub Makro2()
  MsgBox "2"
End Sub

Gruß Sepp

AW: Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 21:44:07

Rolf

Hallo Sepp!
Es funktioniert so- ToggleButton.Caption=False-nur Makro1
,TogleButton.Caption=True dann Makro1 und Makro2
sollte jedoch nur Makro2 kommen.
Grüße
Rolf

AW: Glaskugel kaputt, bitte Code zeigen! o.T.

14.03.2009 21:58:29

Josef

Hallo Rolf,
was willst du immer mit .Caption?
Probier doch einfach mal meinen Code aus.

Gruß Sepp

AW: Glaskugel kaputt, bitte Code zeigen! o.T.

15.03.2009 08:58:26

Rolf

Hallo Sepp!
Mit Caption wollte ich bewirken das einem
bestimmten Wert ein bestimmtes Makro
zugeordnet wird!
Aber Dein code lasst sich auch ohne anpassen!
Danke Dir sehr!
Grüße
Rolf