Makro, bei ausgewählt ein Haken setzten

Hallo,

ich habe 2 Spalten. 1.Spalte Ja 2.Spalte Nein.
Wenn jetzt jemand auf die Spalte Ja klickt (select) dann soll die Spalte einen Haken bekommen, falls Nein vorher angeklickt war so soll Nein den Haken wegbekommen. Das maximl eine Spalte angeklickt werden kann.
Das ist so wie eine ComboBox.

Kann man das mit einem Makro lösen, der im Hintergrund läuft?

Danke im Voraus.

Wischnor

Hallöchen,

wie wäre es damit?

Private Sub Worksheet\_SelectionChange(ByVal Target As Range)
Spalte = 1 'Abspeichern welche Spalte die linke (Ja) -Spalte ist
Zei = Target.Row 'Aktuelle Zeile
Spa = Target.Column 'aktuelle Spalte
If Spa = Spalte Or Spa = Spalte + 1 Then 'wenn in der Ja oder Nein-Spalte geklickt wird dann ...
 Range(Cells(Zei, Spalte), Cells(Zei, Spalte + 1)).Value = Empty 'setze beide Werte auf nix
 Cells(Zei, Spa).Value = "X" 'füge den neuen Wert ein für "gesetzt"
End If
End Sub

Ist zwar kein Haken, aber das kann man auch ändern. Sieht natürlich schöner aus wenn die Schrift zentriert ist etc. aber das sind Formatdinge.

LG und ich hoffe, es war das richtige

[Bei dieser Antwort wurde das Vollzitat nachträglich automatisiert entfernt]

Danke für deine Antwort.

Super läuft!

Na dann viel Spaß damit.