[gelöst] Event.Source.Model - Argumente

[TrueColor]

Hallo,

dies ist die Fortsetzung (habe mal wieder Zeit gefunden) von

[gelöst] Checkbox getByName()

Nachdem ich nun die Filterung umgesetzt hatte, musste ich feststellen, dass da aber nichts passiert. Nach einigem Herumprobieren bin ich zu dem Schluss gekommen, dass die Statusänderungen der Checkboxen, die im Modul StatusFilter, Sub StatusFilter_einzel, passiert, nicht ins Array übertragen werden.

In der Zeile

oChkBox = Event.Source.Model

erhalte ich einen Laufzeitfehler "Argument ist nicht optional".

XRay auf Event.Source.Model bringt mir "Objektvariable nicht belegt".

Ein ähnliches Problem habe ich im Sub "StatusFilter_Alle", in der Zeile "oButton = Event.Source.Model", jedoch wird hier der Status korrekt übertragen. Hier erhalte ich aber in wenigen, nicht reproduzierbaren Fällen keine Fehlermeldung, das Macro läuft klaglos durch.

Ich bin bisschen ratlos. Was mache ich hier falsch?

Vielen Dank!

Grüße,
TrueColor

[F3K Total]

Hi,
natürlich solltest du das Filtern auch ausführen, oder?

Code: Alles auswählen

Sub StatusFilter_einzel(Event)

    Dim oChkBox as Object
    Dim i as Integer

    oChkBox = Event.Source.Model

    Select Case oChkBox.State
      Case 0
        i = right(oChkBox.Name,1)
        aStatusFilter(i) = false
      Case 1
        i = right(oChkBox.Name,1)
        aStatusFilter(i) = true
    End Select
    Filtern'<----------AUFRUF von Filtern
End Sub

Gruß R

[TrueColor]

Hallo,

das mache ich ja mit dem Knopf "Status filtern"/Sub "Filtern_Ausfuehren", nachdem ich alle eingestellt habe. Ich könnte es auch dort mit rein nehmen, das stimmt. Muss ich mir mal überlegen.

Aber das ist nicht das Problem.

Edit: Sollte im OP noch ergänzen, dass ich die Fehlermeldung nur im Macroeditor erhalte, nicht jedoch, wenn ich den Editor nicht offen habe.

Grüße,
TrueColor

[F3K Total]

Hi,
vielleicht probierst du meinen Code mal, der funktioniert, ich habe noch true und false umgedreht.
R

[Karolus]

Hallo

Edit: Sollte im OP noch ergänzen, dass ich die Fehlermeldung nur im Macroeditor erhalte, nicht jedoch, wenn ich den Editor nicht offen habe.

Wo soll denn das Argument 'Event' herkommen wenn du sowas aus der Basic-Ide startest ??

Karolus

[TrueColor]

Hallo,

oh True/False falsch gesetzt, das war mir nicht aufgefallen. Umgedreht fkt. das jetzt. Ist mir total durch die Lappen gegangen. Danke!

Kennst du einen Grund für das im Edit meines letzten Postings beschriebene Verhalten?

Grüße
TrueColor

[TrueColor]

Hallo,

Edit: Sollte im OP noch ergänzen, dass ich die Fehlermeldung nur im Macroeditor erhalte, nicht jedoch, wenn ich den Editor nicht offen habe.

Wo soll denn das Argument 'Event' herkommen wenn du sowas aus der Basic-Ide startest ??

Hm... stimmt. Da gibt es kein Event, also kann auch keins gefunden werden.

Ich glaube, damit ist das Problem gelöst. Vielen Dank euch beiden!

Grüße
TrueColor