[Excel 2016] Zelle mit Kontrollkästchen einbinden oder ausschließen
- Ersteller LPJ
- Erstellt am
Fenatics
Lt. Junior Grade
- Registriert
- März 2011
- Beiträge
- 351
Hi,
ich würde das auch über ein "x" oder was auch immer für ein zusätzliches Zeichen lösen.
Und dann per SUMMEWENN Funktion das ganze berechnen lassen.
Beispiel:
[TABLE="class: grid"]
[TR]
[TD]1[/TD]
[TD]x[/TD]
[/TR]
[TR]
[TD]2[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]3[/TD]
[TD]x[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]=SUMMEWENN(B1:B3;"x";A1:A3)[/TD]
[/TR]
[/TABLE]
Ich bin mir nicht sicher, aber bei Kontrollkästchen müsstest du - glaube ich - VBA nutzen um den Status abzufragen.
ich würde das auch über ein "x" oder was auch immer für ein zusätzliches Zeichen lösen.
Und dann per SUMMEWENN Funktion das ganze berechnen lassen.
Beispiel:
[TABLE="class: grid"]
[TR]
[TD]1[/TD]
[TD]x[/TD]
[/TR]
[TR]
[TD]2[/TD]
[TD][/TD]
[/TR]
[TR]
[TD]3[/TD]
[TD]x[/TD]
[/TR]
[TR]
[TD][/TD]
[TD]=SUMMEWENN(B1:B3;"x";A1:A3)[/TD]
[/TR]
[/TABLE]
Ich bin mir nicht sicher, aber bei Kontrollkästchen müsstest du - glaube ich - VBA nutzen um den Status abzufragen.
Zuletzt bearbeitet:
ryan_blackdrago
Captain
- Registriert
- Nov. 2006
- Beiträge
- 4.014
Würde den Vorschlag von Fenatics aufgreifen & noch etwas optimieren:
Die Formel würde ich so abändern:
So wird automatisch die Summe von allen Werten gebildet. Sobald ein x in Spalte B gesetzt ist, wird dieser Wert NICHT SUMMIERT bzw. berücksichtigt
Zusätzlich:
ALT + F11 (für MS Visual Studio) > folgenden Code einfügen:
wenn nun die rechte Maustaste in Spalte B gedrückt wird, so setzt man automatisch ein kleines x
Die Formel würde ich so abändern:
Code:
=SUMMEWENN(B1:B6;"<>x";A1:A6)So wird automatisch die Summe von allen Werten gebildet. Sobald ein x in Spalte B gesetzt ist, wird dieser Wert NICHT SUMMIERT bzw. berücksichtigt
Zusätzlich:
ALT + F11 (für MS Visual Studio) > folgenden Code einfügen:
Code:
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, Cancel As Boolean)
Set Target = Intersect(Target, Range("b:b"))
If Not Target Is Nothing Then
If IsEmpty(Target) Then
Target.Value = "x"
Else
Target.ClearContents
End If
Cancel = True
End If
End Sub
cumulonimbus8
Fleet Admiral
- Registriert
- Apr. 2012
- Beiträge
- 18.922
Nur aus dem Gedächtnis:
Ich muss aus dem Vorrat glaube ich das ActiveX-Dings nehmen und erreiche in dessen Eigenschaften eine «Related Cell». Formeltechnisch passiert dasselbe wie mit dem händischen X, nur wird auf True/False geprüft. Die Kästchen parkt man über der Hilffsspalte, diese passend schmal machen und auf »Weißer Adler auf weißem Grund« formatieren (ich bin kein Fan vom Ausblenden) - dann sieht man nix vom Umschalten im Blatt selbst.
CN8
Ich muss aus dem Vorrat glaube ich das ActiveX-Dings nehmen und erreiche in dessen Eigenschaften eine «Related Cell». Formeltechnisch passiert dasselbe wie mit dem händischen X, nur wird auf True/False geprüft. Die Kästchen parkt man über der Hilffsspalte, diese passend schmal machen und auf »Weißer Adler auf weißem Grund« formatieren (ich bin kein Fan vom Ausblenden) - dann sieht man nix vom Umschalten im Blatt selbst.
CN8
Vielen Dank für Eure Antworten!
Ihr habt natürlich Recht, dass es auch weniger aufwendig geht. Ich habe mir diese Aufgabe aber gestellt, um etwas fitter in Excel zu werden. Von daher bin ich auch sehr froh, dass ich jetzt mehrere Wege kennengelernt habe! Ich habe alle Ideen mal ausprobiert und experiementiere jetzt noch ein wenig rum!
Ihr habt natürlich Recht, dass es auch weniger aufwendig geht. Ich habe mir diese Aufgabe aber gestellt, um etwas fitter in Excel zu werden. Von daher bin ich auch sehr froh, dass ich jetzt mehrere Wege kennengelernt habe! Ich habe alle Ideen mal ausprobiert und experiementiere jetzt noch ein wenig rum!
