Supportnet / Forum / Tabellenkalkulation
Checkbox, Haken setzen, dann bestimmte Berechnung
Frage
Hallo zusammen.
Ich habe leider überhaupt keine Ahnung von Makros/VBA.
Kleines Beispiel:
In Zelle A1 steht irgendeine Zahl.
Wird die Checkbox aktiviert, soll Zelle B1 berechnet werden, sagen wir mal A1 + 10.
Ist die Checkboxs deaktiviert, soll in B1 einfach A1 übernommen werden.
Wahrscheinlich ist das ganz einfach, aber ich steige da überhaupt nicht durch.
Wie müsste ich das den eingeben, und wo?
Schon einmal Danke im voraus.
LG
Antwort 1 von coros
Moin,
hier ein Lösungsvorschlag zu Deinem Beispiel:
Bei aktivieren der CheckBox wird dem Wert aus A1 die Zahl 10 dazuaddiert und in Zelle B1 ausgegeben. Beim deaktivieren der CheckBox wird die Zahl aus A1 in B1 wiedergegeben.
Einfügen musst Du den Code in das VBA Projekt der CheckBox. Hierzu markiere den obigen Code und blende Dir die Symbolleiste Steuerelement-Toolbox ein. Klicke in der Symbolleiste auf die erste linke Schaltfläche (Entwurfsmodus) und markiere danach die CheckBox. Klicke nun auf die 3. Schaltfläche von links, es wird das VBA geöffnet. In dem rechten großen Fenster müsste
Private Sub CheckBox2_Click()
End Sub
stehen. Markiere diesen Code und füge den vorher kopierten Code ein. Danach wechsele wieder in das Tabellenblatt und klicke nochmals auf die erste linke Schaltfläche um den Entwurfsmodus zu beenden. Wenn alles richtig gemacht wurde, müsste dann alles funktionieren.
Wenn nicht, oder bei Fragen melde Dich noch mal.
MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
hier ein Lösungsvorschlag zu Deinem Beispiel:
Private Sub CheckBox1_Click()
If CheckBox1 = True Then
Range("B1") = Range("A1") + 10
Else
Range("B1") = Range("A1")
End If
End Sub
Bei aktivieren der CheckBox wird dem Wert aus A1 die Zahl 10 dazuaddiert und in Zelle B1 ausgegeben. Beim deaktivieren der CheckBox wird die Zahl aus A1 in B1 wiedergegeben.
Einfügen musst Du den Code in das VBA Projekt der CheckBox. Hierzu markiere den obigen Code und blende Dir die Symbolleiste Steuerelement-Toolbox ein. Klicke in der Symbolleiste auf die erste linke Schaltfläche (Entwurfsmodus) und markiere danach die CheckBox. Klicke nun auf die 3. Schaltfläche von links, es wird das VBA geöffnet. In dem rechten großen Fenster müsste
Private Sub CheckBox2_Click()
End Sub
stehen. Markiere diesen Code und füge den vorher kopierten Code ein. Danach wechsele wieder in das Tabellenblatt und klicke nochmals auf die erste linke Schaltfläche um den Entwurfsmodus zu beenden. Wenn alles richtig gemacht wurde, müsste dann alles funktionieren.
Wenn nicht, oder bei Fragen melde Dich noch mal.
MfG,
coros
Da hier der einzige Lohn für die Helfer eine Rückmeldung ist, wäre es nett, wenn Du ein
Feedback abgeben könntest, ob der Lösungsvorschlag Dein Problem gelöst hat.
Antwort 2 von depperter Depp
Hallo Coros,
ich war erst jetzt wieder online.
Deinen Vorschlag werde ich nachher mal ausprobieren.
Vielen Dank schon einmal bis hierhin.
Gruß
Schönes WE
ich war erst jetzt wieder online.
Deinen Vorschlag werde ich nachher mal ausprobieren.
Vielen Dank schon einmal bis hierhin.
Gruß
Schönes WE
Antwort 3 von depperter Depp
Moin moin.
Bin leider erst gerade dazu gekommen, die Lösung zu testen.
Klappt wie gewünscht.
Danke für die Hilfe.
Werde mich jetzt mal intensiver mit VBA beschäftigen, damit ich nicht immer fragen muss.
Einen schönen Tag noch.
Ach ja, kann mir vielleicht einer ein gutes Buch zu dem Thema empfehlen.
Sollte leicht verständlich sein (so das es auch ein [ZENS] versteht), mit vielen Beispielen, und nach Möglichkeit nicht zu teuer.
Bin leider erst gerade dazu gekommen, die Lösung zu testen.
Klappt wie gewünscht.
Danke für die Hilfe.
Werde mich jetzt mal intensiver mit VBA beschäftigen, damit ich nicht immer fragen muss.
Einen schönen Tag noch.
Ach ja, kann mir vielleicht einer ein gutes Buch zu dem Thema empfehlen.
Sollte leicht verständlich sein (so das es auch ein [ZENS] versteht), mit vielen Beispielen, und nach Möglichkeit nicht zu teuer.
Antwort 4 von classic04
guten morgen
Hab mir kürzlich zwei Excel Bücher gekauft bzw. von meinem Chef bezahlen lassen.
1. Das Große Buch Excel 2003/2000/XP von Data Becker. ISBN:3-8158-2514-8 Preis:34,95
2. Microsoft Excel für Fortgeschrittene, einfach klip & klar von Microsoft Press (daher wohl auch der tolle Titel) ISBN:3-86063-528-x Preis:14,90
beide Bücher sind recht gut aber man braucht recht viel Zeit um das zu finden was man wirklich braucht und sie sind hauptsächlich auf Buchhaltung ausgelegt.
Wenn du die Bücher selbst bezahlen musst rate ich dir davon ab, das SN ist schneller und besser und bisher hat sich bei mir noch keiner über meine blöden Fragen beschwert.(hoffe es kommt auch nicht vor ;-))
gruß Jens
Hab mir kürzlich zwei Excel Bücher gekauft bzw. von meinem Chef bezahlen lassen.
1. Das Große Buch Excel 2003/2000/XP von Data Becker. ISBN:3-8158-2514-8 Preis:34,95
2. Microsoft Excel für Fortgeschrittene, einfach klip & klar von Microsoft Press (daher wohl auch der tolle Titel) ISBN:3-86063-528-x Preis:14,90
beide Bücher sind recht gut aber man braucht recht viel Zeit um das zu finden was man wirklich braucht und sie sind hauptsächlich auf Buchhaltung ausgelegt.
Wenn du die Bücher selbst bezahlen musst rate ich dir davon ab, das SN ist schneller und besser und bisher hat sich bei mir noch keiner über meine blöden Fragen beschwert.(hoffe es kommt auch nicht vor ;-))
gruß Jens