Live-Forum - Die aktuellen Beiträge
Datum
Titel
13.10.2025 19:31:31
VBA Formel mit Bezug auf Überschrift anstatt Spalte
13.10.2025 15:10:17
Überlappende Zeiträume über mehrere Tabellen mit leeren Zell
13.10.2025 13:34:56
PQ Abfrage mit verschiedenen Werten ausführen + Protokoll
13.10.2025 12:24:02
Zählen in Abhängigkeit einer Jahreszahl
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
1692to1696
1692to1696
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Userform Checkboxen Daten in intelligente Tabelle

Forumthread: Userform Checkboxen Daten in intelligente Tabelle

Userform Checkboxen Daten in intelligente Tabelle
02.06.2019 13:49:25
Asce
Hallo zusammen,
Ich habe eine intelligente Tabelle (in Excel 2016 [gibt es hier nicht zur Auswahl]) erstellt und möchte über Checkboxen in einem Userformular jeweils ein "x" eintragen. Soweit kein Problem, aber meine restlichen Anforderungen übersteigen mein Google - Copy - Paste - anpassen Fähigkeiten etwas.
  • Die Tabelle wird immer mal wieder mit neuen Spalten erweitert (an beliebiger Position), d.h. ich kann keine fixen Spaltenangaben wie A,B,C oder 1,2,3 verwenden, sondern will eigentlich die Checkbox mit dem Spaltennamen der Tabelle verknüpfen so dass ich nur eine neu Checkbox in die Userform einbinden muss und nicht noch alle vorhandenen Checkboxen überarbeiten muss.

  • Die Zeile sollte der aktiven Zelle beim Aufrufen der Userform entnommen werden.

  • Wenn in der aktiven Zeile schon Einträge vorhanden sind sollten die Checkboxen in der Userform diese Einträge auch wiederspiegeln.

    • Ich hoffe hier hat jemand eine Idee und es wird nicht zu aufwändig.
    lg Asce
    Anzeige

    5
    Beiträge zum Forumthread
    Beiträge zu diesem Forumthread

    Betreff
    Datum
    Anwender
    Anzeige
    AW: Userform Checkboxen Daten in intelligente Tabelle
    02.06.2019 14:12:47
    Sepp
    Hallo Asce,
    lade deine Beispieldatei mit UF hoch.
    AW: Userform Checkboxen Daten in intelligente Tabelle
    02.06.2019 23:05:02
    Daniel
    Hi
    mit ein paar veränderungen reicht folgender Code im Initialize-Event der Tabelle:
    Private Sub UserForm_Initialize()
CheckBox1.ControlSource = Intersect(Range("Tabelle1[" & CheckBox1.Caption & "]"), ActiveCell. _
EntireRow).Address
CheckBox2.ControlSource = Intersect(Range("Tabelle1[" & CheckBox2.Caption & "]"), ActiveCell. _
EntireRow).Address
CheckBox3.ControlSource = Intersect(Range("Tabelle1[" & CheckBox3.Caption & "]"), ActiveCell. _
EntireRow).Address
End Sub
    1. die Tabellenüberschrift muss gleich der Caption der Checkbox sein
    2. statt "x" und Leer muss WAHR oder FALSCH in der Tabelle stehen
    3. in der Zusammenfassungsformel kannst du das ="x" weglassen, denn in den entsprechenden Zellen steht ja schon WAHR und muss nicht erst über die Bedingung erzeugt werden.
    Gruß Daniel
    Anzeige
    AW: Userform Checkboxen Daten in intelligente Tabelle
    02.06.2019 23:27:10
    Asce
    Hallo Daniel,
    funktioniert einwandfrei, mit dem WAHR und FALSCH kann ich leben da die Spalten später sowieso ausgeblendet werden.
    Dankeschön, hätte mit mehr Code gerechnet =)
    lg Asce
    AW: Userform Checkboxen Daten in intelligente Tabelle
    03.06.2019 02:56:10
    Daniel
    Über die ControlSource ist die Checkbox mit einer Zelle verknüpft, dh. der Checkboxwert wird damit automatisch in die Zelle übertragen (und umgekehrt).
    Daher muss man das nicht selber programmieren und es reicht der Code für das Festlegen der Controlsource.
    Gruß Daniel
    Anzeige
    ;

    Forumthreads zu verwandten Themen

    Bild von der userform in tabelle einfügen
    der

    Hallo Excelsfans,
    ich habe auf einer userform ein bild (image). dieses möchte ich gern als bild in eine zelle einfügen
    irgendwie so
    cells(1,1).insert.picture=image1.picture
    geht sowas?
    gruß rocky
    14.06.2010 19:14:52
    Thread-ID: 1161836
    3 Beiträge
    Eine Tabelle in Code einfügen
    David

    Hallo,
    ich hab dieses Problem hier vor kurzem schon gepostet, aber leider keine Antwort bekommen die funktioniert hat. In dem untenstehenden Code soll eine weitere tabelle "all_data_alt" hinzugefügt werden.
    Diese Tabelle soll genauso wie die jetzige Tabelle "all_data_neu" durch das Makr...
    11.03.2011 13:47:21
    Thread-ID: 1205313
    3 Beiträge
    Anzeige
    Hintergrundbild in alle Tabellen einfügen
    Hans

    Hallo liebe Experten.
    Ich stehe mal wieder vor einem Problem.
    Und zwar habe ich eine Excel Datei mit mehreren Tabellenblättern.
    Nun möchte ich in jedem Tabellenblatt ein Hintergrundbild haben.
    Dies habe ich über Format/Blatt/Hintergrund auch hinbekommen.
    Ich würde jedoch ger...
    14.06.2011 10:53:57
    Thread-ID: 1218349
    6 Beiträge
    in Tabelle ganz ab Zeile 1 10 neue Zeilen einfügen
    Peter

    Hallo
    Wie kann ich in einer Tabelle ganz oben ab Zeile 1 zehn neue Zeilen einfügen?
    Eine Zeile habe ich herausgefunden:
    sheets("Uebersicht").Range("A1").EntireRow.Insert
    Gruss, Peter
    29.08.2011 12:41:15
    Thread-ID: 1227893
    3 Beiträge
    zahlen aus excel in wordtabelle farbig einfügen
    preusbep

    hallo ich würde gerne zahlen die ich aus excel lese in eine wordtabelle farbig einfügen. Leider werden die Zahlen nicht farbig sondern bleiben schwarz !
    Danke für die Hilfe Sub farbe3() Dim Farbe(1 To 3, 1 To 1) As Single Set Word = CreateObject("word.Application") For i = 1 To 3 Farbe(i, 1...
    27.09.2011 15:29:42
    Thread-ID: 1231690
    4 Beiträge
    Anzeige
    Zellbereiche als Werte in 2. Tabelle einfügen
    Fritz_W

    Hallo Forumsbesucher,
    ich ersuche um Hilfe bei den VBA-Experten unter euch mit folgendem Anliegen:
    In meiner Mappe befinden sich zwei (ausgeblendete) Tabellen mit identischer Struktur und Formeln:
    Tabelle2 und Tabelle2a.
    Ich möchte nun – quasi zur Sicherung Daten der Tabelle2 -...
    19.02.2012 21:10:20
    Thread-ID: 1251555
    11 Beiträge
    ergänzende Daten in zweite Tabelle einfügen
    Fritz_W


    Hallo Forumsbesucher,
    mit dem nachfolgenden Code werden – zur Datensicherung – bestimmte Zellbereiche der Tabelle2 in der ( gleichstrukturierten ) Tabelle2b gesichert.
    Sub Daten_sichern() Dim i As Long With Sheets("Tabelle2") For i = 2 To 268 Step 19 Sheets("Tabelle2b").Range("C"...
    23.02.2012 11:20:18
    Thread-ID: 1252034
    25 Beiträge
    Anzeige
    Zellinhalt als Wert in andere Tabelle einfügen
    Fritz_W

    Hallo VBA-Experten,
    bitte um eure Hilfe bei der Umsetzung folgenden Vorhabens:
    Ich möchte per Makro aus der aktiven Tabelle den Zelllinhalt der Zellbereiche
    B3:AD11
    B15:AD23
    B27:AD35
    (unformatiert) als Wert in die gleichen Zellbereiche derjenigen Tabelle der gleichen Arb...
    14.11.2012 20:16:47
    Thread-ID: 1286712
    5 Beiträge
    String über verschiedene Tabellenblätter einfügen
    Rainard

    Hallo Experten,
    Ich habe eine Excel-Datei mit 200 Tabellenblättern. Auf allen Blättern befinden sich Inhalte. Die Tabellen müssen jetzt von Blatt 2 bis 200 erweitert werden.
    Das erste Arbeitsblatt soll also ausgenommen werden. In der Zeile acht soll jeweils in die erste leere Zelle ein...
    18.01.2013 13:21:02
    Thread-ID: 1294955
    3 Beiträge
    Anzeige
    Werte in Tabelle einfügen mittels einer Schleife
    Peter

    Hallo Zusammen,
    Bitte um Hilfe,
    könnte mir jemand ein kurzes Makro aufzeigen wie ich in einer Schleife auf eine Tabelle zugreife und einen Wert manuell in Zelle(1,1) eingebe.
    Die Schleife soll 3 mal wiederholt werden.
    Danke für eure Hilfe
    Peter
    05.04.2013 16:28:19
    Thread-ID: 1307487
    6 Beiträge
    Daten-Satz in anderes Tabellen-Blatt einfügen
    Jürgen

    Guten Morgen,
    wer kann mir bei der Automatisierung per Makro von Daten-Sätze in ein anderes Tabelle-Blatt behilflich sein.
    habe hier mal eine Datei vorbereitet zur besseren Veranschaulichung
    Gruß aus Duisburg
    Jürgen
    26.08.2013 07:32:23
    Thread-ID: 1328359
    3 Beiträge
    Text aus einer Internetseite in Tabelle einfügen
    Jenny

    Hallo alle zusammen,
    bitte helft mir. Würde gerne das was auf einer Internetseite steht kopieren und in eine Tabelle einfügen, das Ganze mehrfach mit verschiedenen Seiten. Das Problem ist jetzt, ich benötige zwar die Hyperlinks, aber nicht die bis zu 5000 Bilder.
    Dadurch habe ich eine s...
    25.10.2013 09:12:04
    Thread-ID: 1335826
    3 Beiträge
    Entdecke relevante Threads

    Schau dir verwandte Threads basierend auf dem aktuellen Thema an

    Alle relevanten Threads mit Inhaltsvorschau entdecken
    Anzeige
    Anzeige

    Infobox / Tutorial

    Userform Checkboxen in intelligente Tabelle integrieren

    Schritt-für-Schritt-Anleitung

    1. Erstelle eine intelligente Tabelle in Excel 2016. Stelle sicher, dass deine Tabelle Spaltenüberschriften enthält, die du später mit den Checkboxen verknüpfen möchtest.

    2. Öffne das Userform in VBA. Füge die gewünschten Checkboxen in das Userform ein. Jede Checkbox sollte eine Caption haben, die mit den Spaltenüberschriften deiner Tabelle übereinstimmt.

    3. Füge den folgenden VBA-Code in das UserForm_Initialize-Ereignis ein:

      Private Sub UserForm_Initialize()
   CheckBox1.ControlSource = Intersect(Range("Tabelle1[" & CheckBox1.Caption & "]"), ActiveCell.EntireRow).Address
   CheckBox2.ControlSource = Intersect(Range("Tabelle1[" & CheckBox2.Caption & "]"), ActiveCell.EntireRow).Address
   CheckBox3.ControlSource = Intersect(Range("Tabelle1[" & CheckBox3.Caption & "]"), ActiveCell.EntireRow).Address
End Sub

    4. Stelle sicher, dass die Caption der Checkboxen mit den Überschriften in der intelligenten Tabelle übereinstimmen.

    5. Testen: Schließe den VBA-Editor und teste das Userform, indem du eine Zelle in der Tabelle auswählst und das Userform öffnest. Die Checkboxen sollten die Werte aus der Tabelle anzeigen.

    Häufige Fehler und Lösungen

    • Fehler: Checkboxen zeigen keine Werte an
      Lösung: Überprüfe, ob die Captions der Checkboxen exakt mit den Spaltenüberschriften übereinstimmen.

    • Fehler: Falsche Zellen verknüpft
      Lösung: Stelle sicher, dass du die richtige Tabelle und den richtigen Bereich verwendest. Der Code muss die genaue Referenz zur intelligenten Tabelle haben.

    Alternative Methoden

    Wenn du die Excel Checkbox in Tabelle einfügen möchtest, kannst du auch die Formeln direkt in die Zellen eingeben und die Checkboxen manuell verknüpfen. Eine andere Methode wäre, die Checkboxen über die Entwicklertools zu erstellen und sie per Makro zu steuern.

    Praktische Beispiele

    Hier ist ein einfaches Beispiel für eine intelligente Tabelle mit Checkboxen:

    Aufgabe Erledigt
    Projekt A [x]
    Projekt B [ ]
    Projekt C [x]

    In diesem Beispiel sind die Checkboxen mit der Spalte "Erledigt" verknüpft. Wenn du das Userform öffnest, wird der Status der Checkboxen entsprechend der intelligenten Tabelle angezeigt.

    Tipps für Profis

    • Nutze Datenvalidierung für die Eingabefelder im Userform, um sicherzustellen, dass nur gültige Werte in die Tabelle geschrieben werden.
    • Experimentiere mit Dynamischen Bereichen, um sicherzustellen, dass neue Spalten automatisch erkannt werden, wenn du die Tabelle erweiterst.
    • Erstelle eine Schaltfläche im Userform, um Änderungen direkt in die intelligente Tabelle zu übertragen.

    FAQ: Häufige Fragen

    1. Wie kann ich weitere Checkboxen hinzufügen?
    Du kannst einfach weitere Checkboxen in dein Userform einfügen und den Code entsprechend anpassen, um sie mit den richtigen Zellen zu verknüpfen.

    2. Was passiert, wenn ich die Tabelle erweitere?
    Wenn du neue Spalten hinzufügst, musst du sicherstellen, dass die neuen Checkboxen ebenfalls im Userform hinzugefügt und korrekt verknüpft werden. Die bestehenden Checkboxen sollten jedoch weiterhin funktionieren, solange ihre Captions übereinstimmen.

    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