Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
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
1944to1948
1944to1948
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Mit Checkbox Zellen freigeben + Schaltfläche für neue Zeile

Forumthread: Mit Checkbox Zellen freigeben + Schaltfläche für neue Zeile

Mit Checkbox Zellen freigeben + Schaltfläche für neue Zeile
30.08.2023 19:45:20
TobiasKaiGero
Hallo ich bin leider noch nicht ganz fündig geworden. Darum nochmal ein neuer Beitrag mit einem neuen Lösungsansatz:

Ich brauche Hilfe bei der folgenden Programmierung:

1. Schaltfläche "Nächster Trade"
1.1 Wenn ich auf die Schaltfläche "Nächster Trade" klicke, soll automatisch eine neue Zeile in der Tabelle1 eingefügt werden. Die neue Zeile soll immer über die Ergebniszeile eingefügt werden.
1.2 Zusätzlich soll die neue Zeile bis auf die akutelle Zelle in der Spalte L geschützt sein, sodass ich keine Eintragungen oder Änderungen machen kann, bis ich die Checkbox1 aktiviere.
1.3 Bei Klick auf die Schaltfläche sollen bei Erstellung der neuen Zeile die Checkboxen deaktiviert werden.

2. Mit Aktivierung der Checkbox1 soll nun zusätzlich die aktuelle Zelle in der Spalte M freigegeben werden.

3. Mit Aktivierung der Checkbox2 soll nun zusätzlich die aktuelle Zelle in der Spalte G freigegeben werden.

4. Mit Aktivierung der Checkbox3 soll nun die gesamte Zeile freigegeben werden.

Ich habe den Ablauf nochmal in Bildern dargestellt:

Userbild

Hier die Datei:
https://www.herber.de/bbs/user/162599.xlsx
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mit Checkbox Zellen freigeben + Schaltfläche für neue Zeile
30.08.2023 20:26:20
onur
KLick mal auf das obere Button:
Userbild
Mit Checkbox Zellen freigeben + Schaltfläche für neue Zeile
30.08.2023 21:21:09
JoWE
Hallo,
warum eigentlich Checkboxen?
Ginge es nicht auch einfach mit dem Doppelklick auf die Zellen in den Spalten L, M, G analog zur Aktivierung der Checkboxen?
Gruß
Jochen
Anzeige
Mit Checkbox Zellen freigeben + Schaltfläche für neue Zeile
30.08.2023 21:23:31
Timo.
Für Punkt 1 kannst du folgendes Makro verwenden: (Die Namen deiner Checkboxen musst du ggf. noch ändern) 
Sub NewTrade()

    Dim ws As Worksheet

    Dim lastrow As Long

    

    Set ws = ActiveSheet

    

    ws.Unprotect



    lastrow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row



    'Fügt neue Zeile ein

    ws.Rows(lastrow).Insert Shift:=xlDown

    

    'Setzt Bearbeitungsbereicht

    ws.Range("L1:L" & lastrow).Locked = False

    

    'Setzt die Werte der Checkboxen

    Tabelle1.Shapes("Kontrollkästchen 1").ControlFormat.Value = 0

    Tabelle1.Shapes("Kontrollkästchen 2").ControlFormat.Value = 0



    'Arbeitsmappe wird geschützt

    ws.Protect

    

End Sub


Für Punkte 2-4 kannst du die Checkboxen per rechtsklick einem Makro zuweisen das prüft welche Checkboxen angekreuzt sind 
Sub Checkboxes()

    Dim ws As Worksheet

    Dim lastrow As Long

    

    Set ws = ActiveSheet

    lastrow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row

    

    ws.Unprotect



    If Tabelle1.Shapes("Kontrollkästchen 1").ControlFormat.Value = 1 Then

            ws.Range("M1:M" & lastrow).Locked = False 'hier muss ggf. die Spalte geändert werden



    End If

    

    If Tabelle1.Shapes("Kontrollkästchen 2").ControlFormat.Value = 1 Then

            ws.Range("G1:G" & lastrow).Locked = False 'hier muss ggf. die Spalte geändert werden

    End If

    

    'Arbeitsmappe wird geschützt

    ws.Protect

        

End Sub
Anzeige
Nachricht an Ulf
31.08.2023 15:14:23
TobiasKaiGero
Hallo Ulf vielen Dank!! So habe ich es mir vorgestellt und es funktioniert nun auch. Falls du noch Lust hast, hätte ich eine weitere Frage. Ich habe diesen Code nun erweitert und nun werden durch Inputboxen Werte eingetragen und in die jeweilige Zelle übernommen. Das funktioniert auch bei Checkbox 1 und 3, jedoch nicht bei der zweiten. Hier erscheint die falsche Inputbox. Was habe ich hier genau falsch gemacht? Ich habe in der Zelle M5 ein Kommentar hinterlegt.

https://www.herber.de/bbs/user/162623.xlsm


Anzeige
Mit Checkbox Zellen freigeben + Schaltfläche für neue Zeile
30.08.2023 22:53:32
TobiasKaiGero
Hallo Timo, danke für deine Hilfe.

Teil 1 funktioniert fast einwandfrei. Vielleicht mache ich noch etwas falsch? Ich habe den Code eingefügt und meiner Schaltfläche zugewiesen. Ich kann jedoch direkt Spalte L, M und G bearbeiten, auch ohne ein Häkchen zu setzen.

Userbild

Bei Teil 2 habe ich noch etwas schwierigkeiten. Ich habe das hier eingefügt:

Userbild

Die Spalten sind richtig benannt. Hängt es vielleicht damit zusammen, dass die Zellen schon bearbeitet werden können?

Anzeige
;

Forumthreads zu verwandten Themen

Gesperrte Schaltfläche
Christian

Hallo,
bin absoluter VBA- Anfänger und habe folgende Frage:
Ich möchte gerne eine Schaltfläche zur Ausführung eines Makros erstellen, die beim Öffnen der Datei verfügbar ist. Dies soll jedoch nicht über eine Schaltfläche aus der Sysmbolleiste erfolgen, da diese Schaltfläche in einem ung...
21.06.2009 10:21:58
Thread-ID: 1083195
5 Beiträge
Schaltflächen: Format-Bug
Peter

Hallo Leute,
in mein Programm habe ich diverse Befehlsschaltflächen eingebaut. Leider kommt es hin und wieder vor, dass das Textformat der Schaltfläche (Caption) durch die Schaltflächenbetätigung stetig größer bzw. kleiner wird. Hin und wieder vergrößert bzw. verkleinert sich auch die gesam...
25.06.2009 14:10:20
Thread-ID: 1084338
3 Beiträge
Schaltfläche und Vergrößerungsfaktor
Wolfgang

Hallo liebe Experten,
ich habe zwei Fragen:
1. Früher konnte ich die excel-Schaltflächen selbst zeichnen, heute gelingt mir das nicht mehr. Geht das mit Office 2003 noch?
2. Kann ich den default-Wert der Vergrößerung (in der Symbolleiste: Standard) der auf 100% festliegt ändern? Ich...
26.06.2009 20:26:11
Thread-ID: 1084657
5 Beiträge
Anzeige
Ausrichtung Befehlsschaltfläche
berni

Liebe Excel-lenzen!
Ich hatte einmal den Short-Cut intus, aber leider in der zwischenzeit wieder vergessen.
Also: Wenn ich untereinander verschiedene Schaltflächen aus der Formularsammlung untereinander aufgelistet habe, gab es doch irgendwie eine Möglichkeit, per Shortcut die unteren a...
30.06.2009 19:09:55
Thread-ID: 1085343
3 Beiträge
Anzeige
Gif auf Schaltfläche
ReSt

Guten Morgen
Da hätte ich mal eine Frage. Kann man auf eine Activ X-Schaltfläche eine gif-Animation legen?
Bis jetzt hat sich bei mir noch nichts bewegt.
Gruss Reto
05.07.2009 10:33:28
Thread-ID: 1086448
5 Beiträge
Schaltflächenmakro
Michael

Servus,
ich bin noch blutiger Excel/VBA Anfänger und will mir ein paar kleine Ecxel Makros bauen. Ich habe eine Tabelle mit zwei Schaltflächen. Schalftfläche "Ordner" soll prüfen ob im selben Verzeichnis wie der Excel Datei bereits ein Ordner mit dem Name aus den Spalten A "Artikel" und B "...
07.07.2009 13:09:26
Thread-ID: 1086922
2 Beiträge
Makro ausführen mit Schaltfläche
Alex

Hi @ all,
ich habe mal wieder ein Problem.
Und zwar hab ich folgendes Makro in einer Vorlage:
Sub FilternKopierenTGA() Dim rngAct As Range With Worksheets("TGA") .Cells.Clear Range("N1").AutoFilter _ Field:=14, Criteria1:="TGA" 'Filtern Spalte N nach TGA Set rngAct = Range("A2"...
08.07.2009 13:38:12
Thread-ID: 1087178
5 Beiträge
Anzeige
Makroschaltfläche
Hübner

Hallo liebe Helfer,
ich habe gleich 2 Probleme, sicherlich könnt Ihr mir wieder helfen.
Thema: Dateienumstellung von 2003 auf 2007
1.
gibt es eine Möglichkeit in 2007 das beim Aufzeichnen von einem Makro eine vorhandene Schaltfläche (die mit einem Makro hinterlegt ist, erstellt...
14.07.2009 21:02:25
Thread-ID: 1088359
2 Beiträge
Schaltfläche auszeichnen
Hübner

Hallo liebe Helfer,
ich habe ein Probleme, sicherlich könnt Ihr mir wieder helfen.
gibt es eine Möglichkeit in 2007 das beim Aufzeichnen von einem Makro eine vorhandene Schaltfläche (die mit einem Makro hinterlegt ist, erstellt mit 2003)mit aufgezeichnet wird?
In 2003 ging dies prob...
14.07.2009 14:31:23
Thread-ID: 1088468
7 Beiträge
2 Makros mit einer Schaltfläche ausführen?
Alex

Hi @ all!
Ich hab mal eine Frage:
Is es möglich zwei Makros, die sich auf unterschiedliche Blätter beziehen mit einer Schaltfläche auszuführen.
Das erste Makro filtert und kopiert Daten in das Tabellenblatt in welchem anschließend Zeilen eingefärbt werden sollen
Danke schon mal<...
16.07.2009 23:02:18
Thread-ID: 1089255
3 Beiträge
Anzeige
ListFilRange bei Befehlsschaltflächen
Pfannen-Meister

Guten Tag,
nachdem mir hier heute Vormittag schon geholfen wurde, müßte ich nochmals Hilfe in Anspruch nehmen:
Wenn ich mit Befehlsschaltflächen arbeite, so kann ich im Feld "ListFilRange" eine bestimmte Menge an Excel-Feldern auswählen, deren Inhalt mit Hilfe der Befehlsschaltfläche s...
06.08.2009 15:23:31
Thread-ID: 1094074
3 Beiträge
Schaltflächen verschwinden
Fritz

Hallo,
ich habe das Problem, dass nachdem eine Excel-Tabelle Monatelang in einer Firmenumgebung einwandfrei funktioniert hat (als Freigegebenes Dokument mit einigen Makros) nun plötzlich beim anwenden des Autofilters wahllos Schaltflächen "verschwinden" lässt.
Das Dokument wird von ver...
17.08.2009 13:06:59
Thread-ID: 1096418
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
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