Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.10.2025 19:34:56
Eine Zelle in 3 Spalten teilen
20.10.2025 19:24:08
Excel Form befüllen
20.10.2025 19:03:51
wenn istleer funktioniert nicht wegen formel
20.10.2025 13:56:55
Wenn Funktion mit Xverweis oder ähnlich
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
708to712
708to712
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Kontrollkästchen in VBA

Forumthread: Kontrollkästchen in VBA

Kontrollkästchen in VBA
14.12.2005 10:10:11
Jörg
Hallo,
ich habe in einem geschützten Excel-Sheet Kontrollkästchen untergebracht. Bei jedem Klick erfolgt jedoch eine Fehlermeldung, da die Bezugszelle geschützt ist. Wie kann ich per VBA bei jedem Klick auf das Kontrollkästchen das Blatt entsperren, die Meldung FALSCH / WAHR von Excel in die Bezugszelle übertragen lassen und zum Schluss die Bezugszelle wieder schützen ?
Viele Grüße
Jörg
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Kontrollkästchen in VBA
14.12.2005 10:50:38
UweD
Hallo
Die Bezugszelle mußt du löschen und per VBA setzen.
so z.b.

Private Sub CheckBox1_Click()
ActiveSheet.Unprotect Password:="123"
Range("A1").Value = CheckBox1.Value
ActiveSheet.Protect Password:="123", DrawingObjects:=True, Contents:=True, Scenarios:=True
End Sub

Gruß UweD
(Rückmeldung wäre schön)
Anzeige
AW: Kontrollkästchen in VBA
14.12.2005 11:59:41
P@ulchen
Hallo Uwe,
da wird Jörg aber trotzdem eine Fehlermeldung erhalten, da das Click-Ereignis ja erst mal auf ein geschütztes Objekt trifft. Der Code läuft dann zwar weiter, aber die Fehlermeldung ist ja sicher nicht erwünscht.
Besser wäre vielleicht, den Blattschutz aufzuheben, wenn der User mit der Maus über das Kontrollkästchen fährt und beim Verlassen (Lost_Focus) den Schutz wieder zu setzen:


Private Sub CheckBox1_LostFocus()
ActiveSheet.Protect "passwort"
End Sub
Private Sub CheckBox1_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
ActiveSheet.Unprotect "passwort"
End Sub


Gruß aus Leipzig
P@ulchen
Anzeige
AW: Kontrollkästchen in VBA
14.12.2005 12:10:35
UweD
Hallo
welchen sinn macht es ein Objekt zu sprerren, wenn es geändert werden SOLL?
Eine Checkbox aus der Steuerelementtoolbox funktioniert perfekt auch Ohne deine Ergänzung.
Siehe Musterdatei:
https://www.herber.de/bbs/user/29242.xls
Blatt ist geschützt.
Gruß UweD
(Rückmeldung wäre schön)
Anzeige
AW: Kontrollkästchen in VBA
14.12.2005 12:28:49
P@ulchen
Ups...natürlich, hatte vergessen, die LinkedCell rauszunehmen :-(
Dein Vorschlag funktioniert also, bei meinem kann die LinkedCell-Eigenschaft verwendet werden.
Gruß aus Leipzig
P@ulchen
Anzeige
;

Forumthreads zu verwandten Themen

Mittels VBA Zellbereich einfärben
Fred

Hallo zusammen
Ich habe da ein Problem, und zwar stehen bei mir in der Tabelle im Bereich D2 bis AD100 unterschiedliche Datums. Wenn das Datum kleiner ist als das heutige, hätte ich gerne, das sich die entsprechende Zelle Rot färbt. Ich habe das mal mit bedingter Formatierung versucht, aber...
13.08.2008 18:52:00
Thread-ID: 1001623
13 Beiträge
VBA zur Dateneingabe über mehrere Blätter
Eddie

Hallo @ all,
ich suche ein kleines Makro, womit man in allen Tabellenblättern, außer ein Paar vorher defnierten einen bestimmten Wert in eine bestimmt Zelle reinkopiert...
Vielleicht geht sowas mit Comboboxen ? .. aber auch ein Makro, wo man die TB die nicht dafür verwendet werden solle...
18.08.2008 14:44:00
Thread-ID: 1002607
3 Beiträge
Dynamische Wertänderung in VBA
Timo

Hallo,
ich habe ein kleines Problem und möchte vorab sagen, dass ich ein wirklicher VBA Laie bin. Ich habe folgendes Makro aufgenommen (nicht selbst geschrieben, da ich das nicht kann):
Sub updatechartloanvolumetrend()
If Range("C10") = "19981998" Then
ActiveSheet.ChartObjects("...
05.09.2008 09:38:00
Thread-ID: 1007590
3 Beiträge
Formel in Zelle per VBA einfügen
Werner

Wie kann ich Statistikformeln (Mittelwert, Maximum, Minimum, Standardabweichung) per VBA in eine Zelle einfügen?
Der zu berechnende Bereich geht von "$J$1" bis "$J$n" wobei n mit ActiveCell.Row-2 zuvor berechnet wird.
Gruß Werner.
10.09.2008 14:17:46
Thread-ID: 1008801
5 Beiträge
Anzeige
Ersetzen mit VBA in allen Arbeitsblättern
Walter

Hallo,
ich habe eine Frage:
Wenn ich einen Text in der ganzen Arbeitsmappe ersetzen will, so treffe ich im Dialogfeld SUCHEN/ERSETZEN einfach die Einstellung: Suchen --- "Arbeitsblatt".
Wenn ich disen Vorgang aufzeichen, kommt folgender Code heraus:
Selection.Replace What:= _
11.09.2008 15:35:53
Thread-ID: 1009157
6 Beiträge
Kopieren VBA anstatt einer Formellösung
Bernhard

Hallo liebe Excel-Freunde,
wer kann mir helfen, eine Aufgabenstellung, die ich zwar mit Formeln gelöst habe mit einem VBA Makro zu lösen. Wie kopiere und paste ich Werte aus einer Tabelle1 in eine Tabelle2, abhängig davon ob ein Wert in einer bestimmten Spalte ist. Das Beispiel habe ich zum...
24.09.2008 17:28:00
Thread-ID: 1012129
9 Beiträge
Code für Groß- und Kleinschreibung VBA
Urmila

Hallo,
ich habe folgenden Code (Teil vom Code)
If Cells(iRow, 1).Value = "x" Then
Hierbei erkennt Excel nur das kleine x und nicht das große X. Wie kann man das umgehen, dass Groß- und Kleinschreibung nciht geachtet werden sollen bzw beachten werden sollen?
LG
Urmila
09.10.2008 14:16:51
Thread-ID: 1015349
3 Beiträge
VBA Zellen prüfen, txt kopieren, einfügen in txt
Stevie

Hallo Zusammen,
da ich kaum Erfahrung im Bereich VBA habe hätte ich gerne mal folgendes Problem :)
Ich habe folgenden Code der Variablen in einer Textdatei ersetzt, eine neue Datei speichert und die File anschleißend mittels Batchrutine an einen Drucker schickt.
Hier der bisherige C...
06.11.2008 09:56:19
Thread-ID: 1022167
3 Beiträge
VBA heutiges Datum finden und Inhalt der Zelle prü
NeptunesChild

Hallo Leutz,
ich möchte in einer Zeiterfassung auf einem Monatsblatt das heutige Datum finden, dann in einer anderen Spalte (5 weiter links) eine Uhrzeit eintragen. Zuvor soll aber die Kontrolle erfolgen, ob in der Zelle bereits etwas steht und ob dies kleiner ist, als die aktuelle Zeit. We...
06.11.2008 15:38:08
Thread-ID: 1022323
3 Beiträge
Per VBA eintragen und löschen
HansP

Hallo!
Ich habe ein bzw. mehrere Probleme. Ich muss in Excel eine kleine Verwaltung realisieren. Ich habe mehrere Tabellenblätter, die für die einzelnen Produkte stehen. Benennung ist identisch mit der Gruppe.
Die Tabelle selbst ist so aufgebaut:
lfd. Nr. | Menge | Eingang | Kürz...
06.11.2008 23:36:00
Thread-ID: 1022472
3 Beiträge
Per VBA Namen in Zellbezüge
Nico

Hallo,
nach ewiger - jedoch erfolgloser - Recherche im Web möchte ich mich mit meinem Problem an das Forum wenden.
Aus einer Arbeitsmappe mit ca. 20 Blättern soll ein Blatt kopiert werden, welches separat gespeichert und dann an verschiedene Empfänger verschickt werden soll. Das Blatt v...
07.11.2008 15:05:15
Thread-ID: 1022699
3 Beiträge
Anzeige
VBA abbrechen einfügen
maruseru

Hallo werte Profis
Habe den untenstehend Code übernommen und die Name der Arbeitsblätter angepasst.
Folgendes:
Besteht das Arbeitsblatt 'Selected' bereits, erscheint die Inputbox für die Eingabe des gewünschten Namen.
Wie kann ich diese Inputbox abbrechen?
Danek und Gruss
07.11.2008 15:13:40
Thread-ID: 1022705
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

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