Großes Zirkelproblem!

Computer: Software & Programmierung Office Software
1

Hallo,

es wird jetzt ziemlich schwer, mein problem zu beschreiben und den quellcode-auszug pasten bringt auch nichts, denn der ist 1. viel zu lang und 2. nicht relevant dafür, denn:

ich habe eine listbox und eine checkbox. wenn die listbox komplett markiert ist, also multiselect an, dann soll sich der haken bei der checkbox setzen.

wenn die listbox komplett leer ist, soll der haken weggehen.

setzt man den haken, so soll sich die listbox füllen.
setzt man den haken nicht, so soll sich die listbox leer werden.

hört sich nach zirkelbetrieb an. ich bin den umgangen und jetzt kommt der hammer, also mein prob:

wenn ich die tabelle öffne und es teste, dann bekomme ich den haken von der checkbox nicht mehr weg.
ABER:

wenn ich die tabelle öffne, mit alt+f11 die entwicklungsumgebung starte, nen breakpoint setze, und es dann teste, funktioniert es EINWANDFREI!!! obwohl ich ECHT nichts anderes mache!!!
ich ändere nichts an der tabelle oder der gleichen. ich verstehe es nicht.

anscheinend MUSS ein anderes ereignis auftreten, anders kann ich es mir nicht erklären.

WER KANN MIR WEITERHELFEN, ICH BIN AM VERZWEIFELN!

Danke schon vorab bei dieser hoffnungslosen sache

Gruß Micha

2

es wird jetzt ziemlich schwer, mein problem zu beschreiben und
den quellcode-auszug pasten bringt auch nichts, denn der ist

  1. viel zu lang und 2. nicht relevant dafür, denn:

Wieso ist der Quellcode zu lang? Der komplette Originalcode ist ja wohl nicht interessant.
Was wichtig zur Hilfe wäre, schreibe mal die Daten in A1:A5 rein die in der Listbox stehen sollen. Bastle ne Checkbox und ne Listbox.
Schreib da den Code rein, der die Problematik verursacht.
Dann hier mitteilen wo was in der Tabelle steht und die beiden Codes.
Und ganz wichtig, hier beim Posten den Pre-tag benutzen.

ich habe eine listbox und eine checkbox. wenn die listbox
komplett markiert ist, also multiselect an, dann soll sich der
haken bei der checkbox setzen.
wenn die listbox komplett leer ist, soll der haken weggehen.
setzt man den haken, so soll sich die listbox füllen.
setzt man den haken nicht, so soll sich die listbox leer
werden.
hört sich nach zirkelbetrieb an. ich bin den umgangen und
jetzt kommt der hammer, also mein prob:
wenn ich die tabelle öffne und es teste, dann bekomme ich den
haken von der checkbox nicht mehr weg.
ABER:
wenn ich die tabelle öffne, mit alt+f11 die
entwicklungsumgebung starte, nen breakpoint setze, und es dann
teste, funktioniert es EINWANDFREI!!! obwohl ich ECHT nichts
anderes mache!!!
anscheinend MUSS ein anderes ereignis auftreten, anders kann
ich es mir nicht erklären.

Hallo Micha,
wie oben gesagt, poste mal ein Beispiel dann kann ich bzw. können andere es austesten.
Ansonsten, ich meine gelesen zu haben dass solches Verhalten am Focus liegen. Probier mal ihn explizit mit setfocus auf die Boxen zu setzen oder auch davon weg.
Hoffe es bringt was.
Gruß
Reinhard

3

Hallo Reinhard,

Ja, du hast recht, ohne quelltext ist das ganze schwierig, aber ich glaube, wie aus dem beispiel zu hören müsste der quelltext richtig sein, davon gehe ich mal aus, denn eigentlich will ich mal behaupten, das ich doch recht viel ahnung habe.

und ich ändere ja echt gaaaar nichts. nur des eine mal klappts, des andere mal nicht.
die idee mit dem focus ist mir gestern auch schon gekommen und ich habe auch schon damit rumexperimentiert.
mittlerweile bin ich schon nen tick weiter:

wenn ich zuvor die entwicklungsumgebung aufrufe und diesen breakpoint setze, dann hab ich den gesetzt, indem ich immer auf die checkbox nen doppelklick gemacht habe, und da ratterte immer meine platte.
also MUSS er dadruch diese doofe box anscheinend vorinitialisieren,
denn wenn ich im anderen beispiel die checkbox 2 mal aufrufe, dann geht das auch wieder, nur nicht beim ersten mal, wo es gebraucht wird.

also hier trotz alledem der quelltext der checkbox, und dann der listbox:

checkbox, die heißt bei mir „selec“:

&gt:stuck_out_tongue_winking_eye:rivate Sub selec_Click()
>Dim g As Integer
>g = 0

>For g = 0 To UserForm1.ListBox13.ListCount - 1
> If UserForm1.selec.Value = True Then
> UserForm1.ListBox13.Selected(g) = True

> End If

> If UserForm1.selec.Value = False Then
> UserForm1.ListBox13.Selected(g) = False

> End If

>Next g

>End Sub

und die listbox:

&gt:stuck_out_tongue_winking_eye:rivate Sub ListBox13_Change()
>Dim g, h As Integer

>h = 0

>For g = 0 To UserForm1.ListBox13.ListCount - 1
> If UserForm1.ListBox13.Selected(g) = True Then
> h = h + 1

> End If

>Next g

>If h = 14 Then
> UserForm1.selec.Value = True

>End If

>If h = 0 Then
> UserForm1.selec.Value = False
>End If

>UserForm1.Freigeber.Enabled = True

>End Sub

Danke trotzdem, und vielleicht hilft dir des ja weiter.

Gruß Micha

4

Hallo Michael,
ich hatte da was verwechselt mit dem Focus-Problem, es tritt bei CommandButtons auf wenn man TakeFocusOnClick nicht auf False setzt kann es zu Focusproblemen kommen wenn man ein anderes Tabellenblatt anspricht.
Und diese Boxen haben ja nicht diese Focus-Eigenschaft.
Sorry dass ich dir bisher nicht helfen konnte.
Gruß
Reinhard