Live-Forum - Die aktuellen Beiträge
Datum
Titel
16.10.2025 00:15:51
Passwort im Herbersforum ändern
15.10.2025 16:22:17
Datum ist nicht Datum :(
15.10.2025 15:02:20
Blockpfeile mit Makro gehen nicht mehr nach freigabe
15.10.2025 13:51:13
VBA - Fortschrittsbalken unabhängig von Zellen
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
892to896
892to896
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Ein/Ausschalter

Forumthread: Ein/Ausschalter

Ein/Ausschalter
02.08.2007 18:10:00
Tim
N'Abend!
Ich habe ein Makro für eine Gruppierung:

Sub SetGroup()
Dim InI As Integer
Dim m_SheetAuswertungsblatt As Worksheet
Set m_SheetAuswertungsblatt = ActiveSheet
For InI = 24 To 235 Step 3
'Zeilen Gruppieren
m_SheetAuswertungsblatt.Rows(InI + 1 & ":" & InI + 2).Group
Next InI
Set m_SheetAuswertungsblatt = Nothing
End Sub


Soweit so gut... :-)... nun möchte es über einen Button ansteuern und dieser soll eine Ein/Aus Funktion haben. Also Gruppierung rein oder raus. Wie kann ich das verbinden?
Ich bedanke mich für eure Unterstützung!
Euer Tim

Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Ein/Ausschalter
02.08.2007 18:36:00
Beverly
Hi Tim,
verwende einen Toggle-Button aus der Steuerelement-Symbolleiste. Im Click Ereignis des Buttons diesen Code

Private Sub ToggleButton1_Click()
SetGroup
End Sub


und deinen Code so erweitert


Sub SetGroup()
Dim InI As Integer
Dim m_SheetAuswertungsblatt As Worksheet
Set m_SheetAuswertungsblatt = ActiveSheet
If ActiveSheet.ToggleButton1 = True Then
For InI = 24 To 235 Step 3
'Zeilen Gruppieren
m_SheetAuswertungsblatt.Rows(InI + 1 & ":" & InI + 2).Group
Next InI
Else
Selection.ClearOutline
End If
Set m_SheetAuswertungsblatt = Nothing
End Sub


________________________________________

Anzeige
AW: Ein/Ausschalter
03.08.2007 14:24:07
Tim
Hallo.
Erstma danke! Funktioniert bei mir aber leider irgendwie nicht so richtig - oder ich mache (woran es wohl liegt) was falsch.

;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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