Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
14.10.2025 09:39:44
VBA - Excel speichern und schließen (Laufzeitfehler 91)
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
760to764
760to764
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kein Focus auf Toggle - Buttons!

Forumthread: Kein Focus auf Toggle - Buttons!

Kein Focus auf Toggle - Buttons!
04.05.2006 15:50:52
Klaus
Moin,
Wie kriege ich den Focus von einem ToggleButton? Bei einem CommandoButton kann ich rechtsclick - Eigenschaften - TakeFocusOnClick = false wählen, das Menü zum ToggleButton bietet diesen Punkt nicht.
Momentan behelfe ich mir mit einem Range("A1").select, um den Focus wieder zu kriegen, aber das ist als Lösung nicht wirklich befriedigend.
Gruß,
Klaus
P.S.: Die Frage resultiert aus meinem letzem Thread, der leider ins Archiv abgewandert ist ( https://www.herber.de/forum/archiv/760to764/t760458.htm ).
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Kein Focus auf Toggle - Buttons!
04.05.2006 18:02:55
Gerd
Hi,
geht nicht anders. Selektiere doch die Zelle unter dem Button, dann fällt es nicht auf.
mfg Gerd
Focus auf Toggle - Buttons: ActiveCell.Activate
04.05.2006 22:24:15
Beate
Hallo,
bzw. in der vorher aktiven Zelle bleiben mit:
ActiveCell.Activate
Guckst Du: Befehlsschaltfläche (CommandButton) - Probleme im Tabellenblatt
Der Code funktioniert auch für Toggle-Butttons.
Gruß,
Beate
Anzeige
AW: Focus auf Toggle - Buttons: ActiveCell.Activate
05.05.2006 08:15:48
Klaus
Hallo Beate,
ActiveCell.Activate klappt super, um den Focus wieder zu kriegen - allerdings werde ich jetzt von ToggleButtons erstmal abstand nehmen :) Danke für die Hilfe!
Gruß,
Klaus M.vdT.
Für Recherchen: der nun funktionierende Code sieht so aus:
Im Blatt
Private Sub ToggleButton_3_l_Click()

Call MergeOrNot("A", "B", Me.ToggleButton_3_l.Value, Sheets("Tabelle3"))

End Sub

Im Modul
Public Sub MergeOrNot(Startspalte As String, Endspalte As String, _
Verbinden As Boolean, Optional Tabellenblatt As Object)
ActiveCell.Activate
With Tabellenblatt.Range(Cells(10, Startspalte), Cells(10, Endspalte))
.MergeCells = Verbinden
.AutoFill Destination:=Range(Startspalte & "10:" & Endspalte & "15"), Type:=xlFillDefault
End With
End Sub

Anzeige
;

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