Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1088to1092
1088to1092
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Checkboxen aktivieren / deaktivieren

Forumthread: Checkboxen aktivieren / deaktivieren

Checkboxen aktivieren / deaktivieren
Timo
Hallo,
kann man per Makro alle Checkboxen in einem Excelsheet gleichzeitig aktivieren bzw. deaktivieren? Hätte da jemand einen Code für mich? Vielen Dank, Timo
Anzeige
AW: Checkboxen aktivieren / deaktivieren
12.07.2009 21:53:30
Josef
Hallo Timo,
' **********************************************************************
' Modul: Modul3 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Sub on_CB()
  Dim objCntrl As OLEObject
  
  For Each objCntrl In Sheets("Tabelle3").OLEObjects
    If objCntrl.progID = "Forms.CheckBox.1" Then objCntrl.Object.Value = True
  Next
End Sub

Sub off_CB()
  Dim objCntrl As OLEObject
  
  For Each objCntrl In Sheets("Tabelle3").OLEObjects
    If objCntrl.progID = "Forms.CheckBox.1" Then objCntrl.Object.Value = False
  Next
End Sub

Gruß Sepp

Anzeige
AW: Checkboxen aktivieren / deaktivieren
12.07.2009 23:19:43
Timo
Hallo Sepp,
vielen Dank. Leider bin ich ein VBA Idiot. Was muss ich an Forms.checkbox.1 ändern, bzw. wofür steht das?
Danke
Timo
AW: Checkboxen aktivieren / deaktivieren
12.07.2009 23:21:54
Josef
Hallo Timo.
du musst gar nichts ändern!
Gruß Sepp

AW: Checkboxen aktivieren / deaktivieren
12.07.2009 23:41:40
Timo
Das ist echt merkwürdig. Irgendwie klappt das nicht, aber ich bekomme auch keine Fehlermeldung.
Habe "Tabelle 3" schon gegen den richtigen Tabellennamen ausgetauscht, daran liegt es also nicht.
Anzeige
AW: Checkboxen aktivieren / deaktivieren
12.07.2009 23:56:02
Josef
Hallo Timo,
hast du wirklich CheckBoxen aus der Steuerelemente-Toolbox, oder vielleicht Kontrollkästchen aus Formular?
Gruß Sepp

hier ein Code für Kontrollkästchen
13.07.2009 00:04:55
Josef
Hallo Timo,
' **********************************************************************
' Modul: Modul4 Typ: Allgemeines Modul
' **********************************************************************

Option Explicit

Sub on_KK()
  Dim objShp As Object
  
  For Each objShp In Sheets("Tabelle3").Shapes
    If objShp.Type = msoFormControl Then
      If objShp.FormControlType = xlCheckBox Then
        objShp.DrawingObject.Value = True
      End If
    End If
  Next
End Sub
Sub off_KK()
  Dim objShp As Object
  
  For Each objShp In Sheets("Tabelle3").Shapes
    If objShp.Type = msoFormControl Then
      If objShp.FormControlType = xlCheckBox Then
        objShp.DrawingObject.Value = False
      End If
    End If
  Next
End Sub

Gruß Sepp

Anzeige
AW: hier ein Code für Kontrollkästchen
13.07.2009 08:39:19
Timo
Sepp, ich bin ein Depp :) Genau das war es. Hatte wohl Kontrollkästchen. Sorry für die Verwirrung und vielen Dank nochmal.
AW: Checkboxen aktivieren / deaktivieren
12.07.2009 21:54:32
Hajo_Zi
Hallo Timo,
Private Sub CommandButton2_Click()
Dim I As Integer
For I = 1 To Shapes.Count
If Mid(Shapes(I).Name, 1, 5) = "Check" Then
ActiveSheet.OLEObjects(Shapes(I).Name).Object.Value = False  'Shapes(I).Value =  _
False
End If
Next I
End Sub

Anzeige

Forumthreads zu verwandten Themen

Checkboxen
Gordon

Moin,
ich habe auf einem Blatt 39 Checkboxen (CheckBox1 bis Checkbox40).
Der Code für Checkbox2 schaut so aus:
Private Sub CheckBox1_Click() With Worksheets("Neu") If CheckBox2.Value = True Then .Columns("I:K").ColumnWidth = 10.14 .Columns("L").ColumnWidth = 1.71 ElseIf CheckBox2....
17.09.2008 12:56:00
Thread-ID: 1010340
12 Beiträge
Variable Checkboxen
Gordon

Moin,
ich habe neulichst glaube ich schon mal eine ähnliche Frage gestellt, aber ich bin mir nun nicht sicher, ob es das selbe ist. Daher bitte ich um Verzweihung falls ich die selbe Frage stellen sollte. ;-)
Also ich habe 10 Checkboxen (1 bis 10). Kann man diese Boxen eigentlich Var...
22.09.2008 11:11:00
Thread-ID: 1011408
5 Beiträge
Werte von Checkboxen in Userform speichern
Checkboxen

Hallo liebe Forumleser,
ich habe in VBA Excel eine Userform mit Checkboxen erstellt. Ein "OK Button" in der Userform schreibt die Captions der angekreuzten Checkboxen in eine Tabelle:
Worksheets("BDaten").Range("D65:D67").Clear
If chkAKurzI1 = True Then
Worksheets("BDaten").Cell...
17.10.2008 16:39:00
Thread-ID: 1017214
8 Beiträge
Checkboxen in Userform
Sebastian

Hallo zusammen,
Dank Tino (https://www.herber.de/bbs/user/56484.xls
) konnte ich einen Teil meines Problems schon lösen. Aber leider noch nicht ganz. Kurz zu meinem eigentlichen Problem. Ich möchte in einer (flexiblen) Userform Textboxen aus einer Tabelle füllen. Diesen Teil konnte ich...
04.11.2008 15:22:00
Thread-ID: 1021663
4 Beiträge
Anzeige
Frage zu checkboxen auf userform
chris

Hallo und guten morgen,
habe eine frage hoffe ihr könnt mir helfen.
ich habe eine Userform auf dieser habe ich mehere checkboxen von Name
chb_1
bis chb_40
Wie kann ich im VBA code abfragen ob eine bestimmte checkbox value true ist ?
im string fehler steht drinnen:
W...
13.11.2008 09:04:45
Thread-ID: 1024049
3 Beiträge
Anzeige
Problem mit Checkboxen per Vba zu erzeugen
Reinhard

Hallo Wissende,
im Zuge meines Versuches jmdm. in einem anderen Forum dabei zu helfen in einer Spalte ca. 90 Checkboxen per Vba zu erstellen stiess ich auf sehr unerwartete Schwierigkeiten.
Ich bekam es hin, daß die ca. 90 Checkboxen erstellt werden, aber sie sind schon mit einem Häkche...
13.11.2008 23:45:36
Thread-ID: 1024386
7 Beiträge
Mit checkboxen Einträge in Liste färben
adrian

Hallo,
habe fogendes kleines/ bzw. großes Problem und keine Idee wie ich es am geschicktesten Lösen könnte.
Mit folgendem Syntax werden Werte aus Bereichen von 3 Sheets gesammelt.
Für jeden (zu beachten sind die Supplier, die in mehreren Sheets vorkommen) Supplier habe ich 3 Checkbo...
18.11.2008 16:54:24
Thread-ID: 1025705
2 Beiträge
Anzeige
Checkboxen!!
adrian

Hallo,
falls sich hier jemand gut mit "checkboxen" gut auskennt und mir helfen könnte folgendes Problem zu lösen wäre das echt super!
Mit folgendem Syntax werden Werte aus Bereichen von 3 Sheets gesammelt.
Für jeden (zu beachten sind die Supplier, die in mehreren Sheets vorkommen)...
24.11.2008 10:50:00
Thread-ID: 1027215
3 Beiträge
Checkboxen
Tim

Hi
Wie kann ich zwei Checkboxen verbinden. Die eine Checkbox ist auf Tabelle1 und die andere auf Tabelle2.
Wenn Checkbox1 auf Tab1 angeklickt ist, sollte auch Checkbox2 auf Tab2 angeklickt sein oder umgekehrt.
Danke für Eure Hilfe
Gruß
Tim
15.01.2009 08:24:00
Thread-ID: 1039889
3 Beiträge
Anzeige
Checkbox im Zusammenspiel mit anderen Checkboxen
Stefen

Hi Leute
Ich bin am Ende meines bescheidenen Wissen. Daher wende ich mich lieber an Euch bevor der PC brennt.
Wollte nur, dass wenn eines der Checkboxen 38 bis 41 true ist sollte CheckboxNr. 37 nicht true sein.
also angeklickt.
Was mache ich da bloß wieder falsch?
If CheckBo...
25.01.2009 21:07:40
Thread-ID: 1043685
3 Beiträge
Änderung von Checkboxen n. Druckansicht verhindern
Checkboxen

Hallo zusammen,
ich habe auf meinen Arbeitsblatt ein Rechteck eingefügt. Auf diesem Rechteck habe ich eine Textbox und drei Checkboxen platziert. Jedes dieser Objekte habe ich per Objekteigenschaften wie folgt formatiert:
Von Zellposition und -größe unabhängig
Den Haken bei Objekt d...
29.01.2009 08:31:00
Thread-ID: 1044782
3 Beiträge
Checkboxen bleiben nicht mit Hacken konstant
Leon

Hi Zusammen
Habe eine so tolle Datei erstellt mit einigen UF's und auch Checkboxen etc. und erst jetzt merke ich, daß
wenn ich von einer UF zur anderen gehe und zurück meine angeklickten Checkboxen nicht mehr angeklickt sind.
Kann man dieses Problem beheben?
Gruß
Leon
01.02.2009 00:12:54
Thread-ID: 1045803
8 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige