Anhakfeld auf Veränderungen überwachen

[atilla]

Hallo,

das was Du da machst geht mit ActiveX aber nicht mit Formularsteuerelementen.
Warum fragst Du erst, und weißt es scheinbar besser?

[Basisa]

Nicht so angepullert ^^
Habe das verbessert! Nun geht es...

Und es sind KEINE ActiveX !
Probiere es aus wenn du es nicht glaubst! [img]
Dateiupload bitte im Forum! So geht es: Klick mich!
]

Warum ich frage, weil ich das noch nicht kannte!
Ich weiß es besser? Wer sagt das? Zeige nur wie ich es hinbekomme habe, ob das gut oder schlecht ist ka!
ABER es geht ^^

[atilla]

Hallo Basisa,

das nennt man "feindliche Übernahme".

Das es bei Dir ActiveX sein müssen habe ich ja schon geschrieben.
Aber der TE, Julia hat Formularsteuerelemente.

Ich hatte geschrieben, dass diese etwas aufwendiger zu bearbeiten sind.

Das was Du machst ist völlig überflüsssig bei den ActiveX, weil diese ja ihre Ereignisprozeduren haben.

Es würde einfach das reichen:

Code:

Private Sub CheckBox1_Click()
 MsgBox CheckBox1.Value
End Sub

Edit:

Jetzt sehe ich Dein "keine"
Gut dann nehme ich die Hälfte vom geschriebenen zurück.

[Basisa]

atilla, noch mal in Ruhe :22: 
Das geht bei Formularsteuerelement, nicht bei ActiveX !

ActiveX = ganz normal mit (Name).Value etc.
ohne = so wie du schreibst UND so wie es es probiert habe, das geht auch...

Wie gesagt ka, war halt mehr oder minder Glück, habe das ausprobiert!
Oder sollte es eigentlich nicht gehen?

[atilla]

Hallo,

Du hast nachträglich aus Value =True eine Value =1 gemacht.
Mit Value ginge es nicht.

Bei den ActiveX geht es aber mit Value = True. Deshalb jetzt einige unnötige Missverständnisse und Posts.
Es ist nur schade, dass wir damit Julia wahrscheinlich mehr verwirren als helfen.

[o0Julia0o]

Hm, das hilft aber nicht bei meinem Problem. Ob die Checkbox angehakt ist oder nicht, kann ich ja leicht aus dem Verbundenen Feld auslesen. Ich möchte, sobald die Checkbox geändert wird(angehakt oder nicht ist egal, in beiden Fällen) Code ausgeführt wird. Mir ist es also egal, ob gerade das Häkchen drin ist oder nicht.

[Basisa]

LJa dachte wenn ich es mit Value = True setzen kann, könnte ich es auch so abfragen was aber leider nicht so!

Naja auf der ersten Seite steht ja alles was Sie braucht :)
Sie ist ja schon ganz gut geworden denke ich ;)

[o0Julia0o]

Naja auf der ersten Seite steht ja alles was Sie braucht :)
Sie ist ja schon ganz gut geworden denke ich ;)

Danke :) Ich mache ja auch fast nichts anderes mehr zur Zeit. Entweder nicht gut genug um das Problem mit dem Code auf der 1. Seite zu lösen, oder ihr habt mich falsch verstanden. Ich möchte nicht wissen, ob die Checkbox angehakt ist oder nicht. Ich möchte wissen, ob sie gerade verändert wird.

Wenn ich diesen Code nutze:

Code:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("Z1")) Is Nothing Then
 MsgBox "klappt"
End If
End Sub

Und in das Feld "Z1" die Ent-Taste drücke, komme die MsgBox. Ich möchte, sobald ich das Häkchen veränderte, die MsgBox ebenfalls kommt.

[Basisa]

Ja und Nein...

Du kannst immer abfragen wenn sich was auf dem Workbook geändert hat!
Zum Beispiel mit einer Globalen Variable.

Wenn diese sich ändert hat da auch einer drauf geklickt, bin leider nicht am PC.
Aber atilla ist ja auch da :)

Ich versuche es mal!

Code:

Option Explicit
Public Klick as Integer

Private Sub Worksheet_Change(ByVal Target As Range)
   If Klick <> CheckBoxes(1).Value Then MsgBox "wurde geändert"

   Klick = CheckBoxes(1).Value
End Sub

Sowas ca.? Ungetestet!
So würde man auch merken ob per Formel der Haken gesetzt wurde etc.

[atilla]

Hallo Julia,

Du kannst der Chekbox jedes Makro zuweisen.

Einfach Rechtsklick und Makro zuweisen, dann wird dieses Makro bei jedem Klick auf die Box ausgeführt.
Das ist das Gleiche, wie bei einer Befehlsschaltfläche.