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

CheckBox = WAHR dann Ja in Zelle schreiben

Forumthread: CheckBox = WAHR dann Ja in Zelle schreiben

CheckBox = WAHR dann Ja in Zelle schreiben
17.01.2005 21:15:35
Andi
hallo zusammen
... und wieder ein grosses problem für mich und hoffentlich ein kleines für euch...
die checkbox in der userform wird angeklickt und gibt in der zelle x (variabel) den wert WAHR aus. nun möchte ich aber, dass in der zelle x der wert "ja" ausgegeben wird.
geht das? ... und wie?
kann mir jemand helfen?
gruss andi
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: CheckBox = WAHR dann Ja in Zelle schreiben
17.01.2005 21:19:24
chris
Gasnz einfach kannst du das nehmen. Hoffe es hilft dir !?

Private Sub CheckBox1_Click()
x = CheckBox1.Value
If CheckBox1.Value = True Then
Cells(1, 1) = "Nein"
Else
Cells(1, 1) = "Ja"
End If
End Sub

AW: CheckBox = WAHR dann Ja in Zelle schreiben
Andi
hallo chris
danke für deine hilfe. leider klappts nicht so wie ichs gern hätte. ich habe mich wohl zu ungenau ausgedrückt. die variable zelle x ist so gemeint:
- neuer eintrag in letzte freie zeile
- eintrag ändern wird eine bestimmte zeile selektiert und die werte in den einzelnen zellen können über die userform (textbox oder eben checkbox) angepasst werden.
sorry für die umstände.
daher markiert das x keine bestimmte zeile
kannst du mir dabei nochmals helfen?
andi
Anzeige
AW: CheckBox = WAHR dann Ja in Zelle schreiben
18.01.2005 21:58:51
chris
Sorry das verstehe ich nicht.
AW: CheckBox = WAHR dann Ja in Zelle schreiben
19.01.2005 21:09:03
Andi
hallo chris
sorry dass ich mich unklar ausgedrückt habe. nun habe ich eine beispielmappe hochgeladen. wie kann ich nun die checkboxen in die einzelnen codes einbauen?
https://www.herber.de/bbs/user/16418.xls
wäre cool, wenn du mir helfen könntest.
andi
Anzeige
AW: CheckBox = WAHR dann Ja in Zelle schreiben
20.01.2005 17:30:21
chris
Hallo Andi,
sorry aber da kann ich ir nicht helfen.
verstehe schon erst mal gar nicht genau was du möchtest :(
Aber versuchs doch einfach noch mal mit einem Posting vieleicht Hilft dir jemand anders !!!
grüße Chris
....
20.01.2005 18:07:23
Andi
salü chris
besten dank für deine hilfe. werde es nochmals versuchen.
gruss andi
Anzeige
;

Forumthreads zu verwandten Themen

Name der Checkbox in eine Zelle
Reinhardt

Hallo,
ich habe gleich zwei Fragen:
1) Nach anklicken einer Checkbox soll diese Ihren Namen in Zelle A1 schreiben.
z.B. CheckBox12 Wie geht das?
2) Nach dem anklicken der Box hat diese ein Häckchen.
Dieser soll nach dem Anklicken gleich wieder verschwinden.
Wer kan...
06.10.2008 14:22:26
Thread-ID: 1014444
2 Beiträge
Anzeige
Checkbox in Zelle per VBA
UweD

Hallo Leute
ich brauche mal Hilfe vom VBA-Profi
Per VBA möchte ich
1) eine Checkbox (aus Formularsteuerungsliste) in einer bestimmten Spalte in Zeile 1 einfügen checkbox.add(....)
2) Dann Bezug auch auf diese Zelle setzen.
3) Namen ändern...
2) und 3) krieg ich sicherl...
17.10.2008 13:57:00
Thread-ID: 1017152
3 Beiträge
Anzeige
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
Checkbox in Zelle schreiben
Markus

Hallo
Wie kann ich erreichen, daß zwei Checkboxen in einer Userform in die Zellen ein (G) schreiben und wenn ich die Checkboxen das Häcken entferne auch das (G) nicht mehr drin ist.
Wäre es auch möglich, daß wenn Checkbox1 ein Häcken hat Checkbox2 keines mehr hat.
Checkbox1 in Zelle...
30.01.2009 22:42:52
Thread-ID: 1045549
4 Beiträge
Checkbox Userform zusammenfassen in eine Zelle
Kay

Hallo,
ich habe eine Userform mit vielen Textboxen, Optionsfelder, Comboboxen etc. Nun habe ich auch einen Bereich mit Checkboxen, die zu einer Gruppe zusammengefasst sind. Nun möchte ich gern bei der Übernahme in die Tabelle mit dem Speichern sicherstellen, dass alle Checkbox-Namen die aus...
11.07.2009 17:10:25
Thread-ID: 1087890
6 Beiträge
Zeitdifferenz in Zelle einfügen
Alina

Hallo zusammen,
ich habe mir in Excel eine Überstundentabelle gebastelt. Soweit funktioniert auch alles. Ich kann mir auch die Überstunden pro Tag in der Spalte G berechnen lassen. Berechnet wird das durch die Solleinzeit in Spalte F und der tatsächlichen Endzeit in Spalte D.
Nun möcht...
16.08.2009 00:06:36
Thread-ID: 1096190
12 Beiträge
Anzeige
Formel in Zelle einfügen
Alexander

Hallo zusammen,
Sub test() Dim str As String str = "=WENN(Daten!$F$1='Tabelle1'!" & Cells(11, 5).Address & ";JAHR('Tabelle1'!" & Cells(18, 4) _ .Address & ")" End Sub wie kann ich die Formel in der Varialben str in eine Zelle einfügen? Oder kann ich die Formel auch direkt o...
13.10.2009 09:45:55
Thread-ID: 1109248
6 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
Bilder in Zelle einfügen wenn
Andre´

Hallo alle zusammen,
ich möchte für den Bereich C5:F10 Bilder einfügen (jeweils mittig in Zelle), in Abhängigkeit des Zellwertes.
Ist der Zellwert = 1 dann Bild1 von Tabelle "Bilder" einfügen
Ist der Zellwert = 2 dann Bild2 von Tabelle "Bilder" einfügen
Ist der Zellwert = 3 dann...
15.12.2009 09:51:03
Thread-ID: 1123961
5 Beiträge
Datum und Zeit in Zelle einfügen
chris

Schönen Christtag!
Ich suche eine Lösung welche ich trotz googlen nichts geeignetes finden konnte.
Also: Wenn im Bereich F4:F100 neue Werte eingetragen werden, dann soll sich im Bereich L4:L100 in der gleichen Zeile das Datum (evtl. sogar mit Uhrzeit) neu eingetragen werden.
Für Hil...
25.12.2009 13:37:43
Thread-ID: 1125900
8 Beiträge
Anzeige
Datum und Zeit in Zelle einfügen
chris

Schönen Christtag!
Ich suche eine Lösung welche ich trotz googlen nichts geeignetes finden konnte.
Also: Wenn im Bereich F4:F100 neue Werte eingetragen werden, dann soll sich im Bereich L4:L100 in der gleichen Zeile das Datum (evtl. sogar mit Uhrzeit) neu eingetragen werden.
Für Hil...
25.12.2009 13:38:19
Thread-ID: 1125901
2 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
Anzeige
Anzeige

Infobox / Tutorial

CheckBox in Excel: "Ja" in Zelle schreiben, wenn aktiviert

Schritt-für-Schritt-Anleitung

  1. Öffne deine Excel-Datei und gehe zu der UserForm, in der du die Checkbox verwenden möchtest.

  2. Füge eine Checkbox hinzu, indem du in der Entwicklertools-Registerkarte auf "Einfügen" klickst und die Checkbox auswählst.

  3. Doppelklicke auf die Checkbox, um den VBA-Editor zu öffnen.

  4. Füge folgenden Code in das entsprechende Sub ein:

    Private Sub CheckBox1_Click()
    Dim x As Long
    ' Setze hier die Zeile, in die du den Wert schreiben möchtest
    x = 1 ' Beispiel: Zeile 1

    If CheckBox1.Value = True Then
        Cells(x, 1) = "Ja" ' Wenn Checkbox aktiv, schreibe "Ja"
    Else
        Cells(x, 1) = "" ' Wenn nicht aktiv, lösche den Inhalt
    End If
End Sub

  5. Schließe den VBA-Editor und teste die Checkbox in deiner UserForm. Wenn du die Checkbox aktivierst, sollte in der definierten Zelle "Ja" erscheinen.

Häufige Fehler und Lösungen

  • Fehler: Die Checkbox gibt nicht den gewünschten Wert in die Zelle aus.

    • Lösung: Überprüfe, ob der Code im richtigen Sub eingetragen ist und dass die Checkbox korrekt benannt ist.

  • Fehler: Die Zelle bleibt leer, wenn die Checkbox aktiviert wird.

    • Lösung: Stelle sicher, dass die Zelle, in die du schreiben möchtest, korrekt definiert ist (z.B. Cells(x, 1)).

Alternative Methoden

  • Du kannst auch Formeln verwenden, um den Wert einer Checkbox in einer Zelle anzuzeigen. Zum Beispiel, wenn du ein kontrollkästchen in einer Zelle erstellen möchtest, nutze die Funktion =WENN(A1=WAHR, "Ja", ""), wobei A1 die Zelle ist, die die Checkbox enthält.

  • Eine andere Möglichkeit ist, Datenvalidierung zu verwenden, um eine Dropdown-Liste zu erstellen, wo "Ja" und "Nein" auswählbar sind.

Praktische Beispiele

  1. Checkbox in Zelle einfügen:

    • Du kannst eine Checkbox direkt in eine Zelle einfügen, um die Benutzerfreundlichkeit zu erhöhen. Gehe dazu zu Entwicklertools > Einfügen und wähle die Checkbox.

  2. Checkbox mit mehreren Zellen verknüpfen:

    • Verwende mehrere Checkboxen, um verschiedene Zellen zu steuern. Der Code könnte so aussehen:
    Private Sub CheckBox1_Click()
    If CheckBox1.Value = True Then
        Cells(1, 1) = "Ja"
    Else
        Cells(1, 1) = ""
    End If
End Sub

Private Sub CheckBox2_Click()
    If CheckBox2.Value = True Then
        Cells(2, 1) = "Ja"
    Else
        Cells(2, 1) = ""
    End If
End Sub

Tipps für Profis

  • Verwende Gruppen: Wenn du mehrere Kontrollkästchen hast, gruppiere sie, um die Übersichtlichkeit zu erhöhen. Dies hilft dir, die Logik effizient zu organisieren.

  • Benutzerdefinierte Werte: Du kannst die Werte, die in die Zellen geschrieben werden, anpassen. Anstatt "Ja", könntest du auch "Aktiv" oder "Erledigt" verwenden.

  • Dynamische Zeilen: Nutze eine Funktion, um die nächste freie Zeile zu finden, wenn du die Checkbox aktivierst:

    Dim lastRow As Long
lastRow = Cells(Rows.Count, 1).End(xlUp).Row + 1
Cells(lastRow, 1) = "Ja"

FAQ: Häufige Fragen

1. Wie kann ich eine Checkbox in eine bestimmte Zelle einfügen? Um eine Checkbox in eine bestimmte Zelle einzufügen, gehe zu Entwicklertools > Einfügen und ziehe die Checkbox in die gewünschte Zelle.

2. Was kann ich tun, wenn die Checkbox nicht reagiert? Stelle sicher, dass du den Entwicklermodus aktiviert hast und dass der VBA-Code korrekt ist. Überprüfe auch die Eigenschaften der Checkbox.

Beliebteste Forumthreads (12 Monate)

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