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

Checkbox aktiviert, dann VBA Code ausführen

Forumthread: Checkbox aktiviert, dann VBA Code ausführen

Checkbox aktiviert, dann VBA Code ausführen
27.10.2016 09:15:04
Martin
Hallo und guten Morgen,
erstmal danke an alle hier, die ihr Wissen hier teilen, hat mir schon öfters geholfen.
Nun zu meinem Problem.
Ich habe ein Tabellenblatt mit 2 Befehlsschaltflächen(ActiveX) und eine Checkbox.
Der Code der Befehlsschaltfläche(1), soll 2 Bereiche in denen Formeln stehen (B3:B49 und AA5:AT49)in Werte umwandeln, aber nur wenn die Checkbox angekreuzt ist. Beinicht angekreuzt soll garnichts passieren.
Ich kriegs nicht hin.
Danke schon mal
Gruß Martin
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Checkbox aktiviert, dann VBA Code ausführen
27.10.2016 09:26:19
Beverly
Hi Martin,
so vielleicht
    If ActiveSheet.CheckBox1 Then
Range("B3:B49").Copy
Range("B3").PasteSpecial Paste:=xlValues
Range("AA5:AT49").Copy
Range("AA5").PasteSpecial Paste:=xlValues
End If


Anzeige
AW: Checkbox aktiviert, dann VBA Code ausführen
27.10.2016 09:52:17
Martin
Hallo Beverly,
ich habe mich wohl nicht richtig ausgedrückt. Ich möchte das wenn das Häckchen gesetzt ist und man auf den CommandButton klickt, der dazu gehörige Code ausgeführt wird. Wenn der Haken nicht gesetzt ist und man auf den Button klickt soll der Code nicht ausgeführt werden.
Danke trotzdem für die schnelle Antwort
Gruß Martin
Anzeige
AW: Checkbox aktiviert, dann VBA Code ausführen
27.10.2016 09:56:46
Daniel
Hi
und genau dafür ist das die richtige Antwort!
du musst diesen Codeschnipsel in das Click-Event des Buttons einfügen.
Die Checkbox musst auch vom Typ ActiveX sein und den Checkboxnamen musst du ggf. anpassen.
Gruß Daniel
AW: Checkbox aktiviert, dann VBA Code ausführen
27.10.2016 09:59:31
Martin
Hallo Daniel,
werde es gleich ausprobieren.
Danke
Gruß Martin
Anzeige
AW: Checkbox aktiviert, dann VBA Code ausführen
27.10.2016 09:57:49
Martin
Hallo,
ich hänge mal den Entwurf an, ist dann bestimmt verständlicher.
Danke
Gruß Martin
https://www.herber.de/bbs/user/109051.xlsx
Das könntest...
27.10.2016 10:05:53
Case
Hallo, :-)
... Du so lösen:
Option Explicit
Private Sub CheckBox1_Click()
Me.CommandButton1.Enabled = IIf(Me.CheckBox1.Object.Value, True, False)
End Sub
Ist der Haken bei CheckBox1 gesetzt kannst du den CommandButton1 anklicken - sonst nicht.
Servus
Case
Anzeige
AW: Checkbox aktiviert, dann VBA Code ausführen
27.10.2016 10:04:00
Martin
Hallo,
ich bedanke mich und bin erstaunt das mit so wenig Text das möglich ist.
Ich habe geschrieben (Copy+Paste)was ich nur finden konnte aber es hat nichts funktioniert.
Gruß Martin
;

Forumthreads zu verwandten Themen

Wenn keine CheckBox aktiviert dann MasgBox
Heinz

Guten abend, Leute im Forum
Ich würde gerne in UF, wenn die CheckBoxen 8,16,32, nicht aktiviert sind, das dann eine
MsgBox "Keine Linie ausgewählt" erscheint.
Könnte mir dazu bitte jemand weiterhelfen.
Danke & Gruß
Heinz
18.01.2009 20:59:21
Thread-ID: 1041266
3 Beiträge
Wenn die aktive Zelle in letzter Zeile dann Makro
Karsten

Hallo,
Kann mir jemand bei folgeden Befehl helfen:
Wenn die aktive Zelle in der letzten Zeile (also unten, über dem Tabellennamen) des sichtbaren Bereichs steht, soll Makro1 ausgeführt werden. Wenn nicht, dann weiter.
Danke für eure Hilfe.
Gruß
Karsten
11.11.2009 15:07:54
Thread-ID: 1116229
3 Beiträge
Wenn Sheet aktiviert dann Autofilter
Michael

Hallo zusammen,
ich hab ein Problem und zwar:
Wenn der User z.B. Tabelle1 aktviert/anklickt dann soll Autofilter aktiviert werden und in der Spalte F der Wert "1" gefiltert werden.
Eine Lösung mit eine Commandbutton hab ich schon es geht mir eher darum, wenn der User keine Button kl...
24.03.2010 17:43:49
Thread-ID: 1148196
3 Beiträge
wenn CheckBox Ja, dann in Zwischenablage
Wolfgang

Hallo,
mit dem nachstehenden Code realisiere ich, dass der Text in B29 befindlich (Tabellenblatt Start) bei Betätigen in die Zwischenablage kopiert wird. Ich habe nun noch eine CheckBox1 in das Tabellenblatt eingefügt und würde nun gerne erreichen, dass bei aktiver CheckBox zum Text aus B29...
24.03.2010 19:05:30
Thread-ID: 1148206
5 Beiträge
Wenn Checkbox aktiv, Radiobutton auch. Funzt nicht
Timo

Hi ihr alle!Ich habe auch mal ein kleines Problem:
Ich arbeite zur Zeit an einem grösseren VBA-Projekt und möchte, dass wenn eine bestimmte Checkbox markiert (checked) ist, dass ein RadioButton ebenfalls gechecked wird. Dies ist notwendig, da im nächsten Sub, das aufgerufen wird, eine Abfrag...
23.05.2002 15:36:03
Thread-ID: 123163
4 Beiträge
Wert halbieren, wenn 'CheckBox.Value = True'
Martin

Hallo,stehe auf'm Schlauch. Ich habe mir in ein Arbeitsblatt einen CommandButton integriert, der bei Click einen vorher eingegebenen Wert in Zelle A1 in eine andere Zelle schreiben soll (eine Art Eingabemaske).Zusätzlich habe ich eine CheckBox integriert, die bei Value = True den Wert, den ich...
12.08.2002 15:22:48
Thread-ID: 147620
6 Beiträge
Anzeige
Wenn Link angeklickt, dann...
Pflaume

Hallo zusammen,
ich habe eine kleine Excelmappe, die 3 Links (zu Infoquellen für meine Mitarbeiter) enthält. Ich möchte, dass für die Mitarbeiter ersichtlich ist, welche Infos sie bereits gecheckt haben, indem ich beispielsweise eine Form einfüge, nachdem einer der Links geklickt wurde. Die...
15.05.2016 12:57:44
Thread-ID: 1493445
3 Beiträge
Checkboxen Excel wenn aktiv dann ....
Andre

Hallo Excel Freunde,
ich möchte wenn mehreren Checkboxen aktiviert sind mit einem button die dazugehörigen namen ausdrucken. Die Namen sollen dann nacheinander in ein vorgefertigtes Formular kopiert und ausgedruck werden. Nach dem Ausdruck können dann die Boxen wieder deaktiviert werden.
24.11.2016 09:31:14
Thread-ID: 1526718
2 Beiträge
wenn Optionsbutton aktiviert dann Spalte berechne
angelika

Hallo
kann mir bitte jemand helfen ?
Meine Tabelle
In spalte A5:A10 wird die Anzahl eingetragen
In spalte b5:b10 wird ein Betrag eingetragen - manchmal netto manchmal brutto
In spalte c5:c10 wird die Summe aus Anzahl * Betrag angezeigt
jetzt möchte zwei Optionsfelder...
12.08.2017 14:34:37
Thread-ID: 1574147
3 Beiträge
Anzeige
Wert in anderes Tabellenblatt wenn Checkbox aktiv
Sandro

Hallo Zusammen
Folgendes Problem bei meinem Excel(https://www.herber.de/bbs/user/118838.xlsm):
Im 2. Register kann man per Klick auf "Zeiterfassung" die Zeit pro Tätigkeit buchen. Wenn durch das erledigen der ganze Auftrag abgeschlossen ist, kann man die Checkbox "Auftrag_Abschliessen"...
10.01.2018 07:47:57
Thread-ID: 1601238
3 Beiträge
VBA Wenn Status aktiv dann Name und Datum
Simon

Hallo,
Ich habe seit Office 2016 folgendes Problem:
Wir hatten in unseren Unternehmen eine Liste bezüglich Abteilungswechsel, die ausgefüllt werden muss wenn bestimmte Benutzer in eine andere Abteilung wechseln.
Wenn eine Tätigkeit erfüllt wurde muss bei Status eine Auswahl ausgewäh...
31.01.2018 10:47:49
Thread-ID: 1606066
10 Beiträge
Fehlermeldung wenn keine Checkbox aktiviert wurde
JeJe

Hallo Zusammen
Ich habe eine Userform mit 36 Checkboxen. Durch eine Schaltfläche "Speichern" schreibt es mir alle aktive Checkboxen in eine Tabelle.
Ich will nun eine Fehlermeldung falls keine Checkbox auf der Userform aktiviert wurde.
Wie kann ich das am einfachsten machen?
Dan...
29.01.2019 16:55:03
Thread-ID: 1671943
4 Beiträge
Anzeige
Anzeige

Infobox / Tutorial

Checkbox aktivieren und VBA-Code ausführen in Excel

Schritt-für-Schritt-Anleitung

  1. Checkbox aktivieren: Stelle sicher, dass du eine ActiveX-Checkbox in deinem Arbeitsblatt hast. Du kannst dies unter dem Tab "Entwicklertools" > "Einfügen" > "ActiveX-Steuerelemente" tun.

  2. VBA-Editor öffnen: Drücke ALT + F11, um den VBA-Editor zu öffnen.

  3. UserForm oder Arbeitsblatt auswählen: Klicke im Projekt-Explorer auf das Arbeitsblatt, in dem sich deine Checkbox befindet.

  4. Checkbox-Click-Event hinzufügen: Doppelklicke auf die Checkbox, um das Click-Event zu erstellen. Füge den folgenden Code hinzu:

    Private Sub CheckBox1_Click()
   Me.CommandButton1.Enabled = IIf(Me.CheckBox1.Value, True, False)
End Sub

  5. Befehlsschaltfläche konfigurieren: Füge einen CommandButton (Befehlsschaltfläche) hinzu und füge den folgenden Code in das Click-Event des CommandButtons ein:

    Private Sub CommandButton1_Click()
   If Me.CheckBox1.Value = True Then
       Range("B3:B49").Copy
       Range("B3").PasteSpecial Paste:=xlValues
       Range("AA5:AT49").Copy
       Range("AA5").PasteSpecial Paste:=xlValues
   End If
End Sub

  6. Testen: Schließe den VBA-Editor und teste die Funktion, indem du die Checkbox aktivierst und dann den CommandButton klickst. Der Code sollte nun nur ausgeführt werden, wenn die Checkbox aktiviert ist.

Häufige Fehler und Lösungen

  • Fehler: Befehlsschaltfläche ist nicht aktiv: Stelle sicher, dass die Checkbox vom Typ ActiveX ist und dass der Name der Checkbox im Code korrekt ist.

  • Fehler: Code wird immer ausgeführt: Überprüfe, ob die Bedingung im Click-Event des CommandButtons korrekt gesetzt ist (If Me.CheckBox1.Value = True).

  • Lösung: Syntaxfehler im VBA-Code: Achte darauf, dass alle Klammern und Anführungszeichen korrekt gesetzt sind.

Alternative Methoden

  • Formelbasierte Lösung: Du kannst auch eine Formel verwenden, um bedingte Berechnungen basierend auf der Checkbox zu steuern. Nutze die Funktion WENN, um zu überprüfen, ob die Checkbox aktiviert ist.

  • Excel-Makro: Ein Makro kann ebenfalls verwendet werden, um die Aktionen auszuführen, die an die Checkbox gebunden sind.

Praktische Beispiele

  • Beispiel 1: Wenn du eine Checkbox für das Feld "Zahlung erhalten" hast, kannst du eine Formel oder einen VBA-Code verwenden, um den Status in einer anderen Zelle zu ändern.

  • Beispiel 2: Verwende die Checkbox, um Optionen in einer Dropdown-Liste zu aktivieren oder zu deaktivieren.

Tipps für Profis

  • Checkboxen effizient nutzen: Verwende mehrere Checkboxen, um verschiedene Bereiche deines Arbeitsblattes zu steuern. Achte darauf, dass jede Checkbox einen eindeutigen Namen hat.

  • VBA-Code optimieren: Halte deinen Code sauber und gut kommentiert, um die Wartung zu erleichtern.

  • Event-Handling: Nutze das Click-Event für die Checkbox, um direkt auf Benutzerinteraktionen zu reagieren und so die Benutzererfahrung zu verbessern.

FAQ: Häufige Fragen

1. Wie aktiviere ich eine Checkbox in Excel?
Du kannst eine Checkbox aktivieren, indem du sie im Tab "Entwicklertools" hinzufügst und dann im VBA-Editor den entsprechenden Code schreibst.

2. Was passiert, wenn ich die Checkbox nicht aktiviere?
Wenn die Checkbox nicht aktiviert ist, wird der zugehörige VBA-Code nicht ausgeführt, was bedeutet, dass keine Aktion auf deinem Arbeitsblatt stattfindet.

3. Kann ich mehrere Checkboxes nutzen?
Ja, du kannst mehrere Checkboxes verwenden, um verschiedene Aktionen in deinem Excel-Arbeitsblatt zu steuern. Achte darauf, dass jede Checkbox einen eindeutigen Namen hat.

Beliebteste Forumthreads (12 Monate)

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