fuchsi schrieb am 16.April.2010, 12:42:32 in der Kategorie pc.sw.office
Mausklick auf Befehlsschaltfläche unterbinden
> For i = 1 To Ende > Screen.MousePointer = 11 > Me.cmd_Meldebox.Enabled = False > Me.cmd_Meldebox.Visible = False > Next i >
Ich kapiere zwar die Sinnhaftigkeit dieser Schleife nicht. Warum wills Du 50000mal Enabled auf False setzen?
Aber bau mal ein DoEvents ein.
For i = 1 To Ende
Screen.MousePointer = 11
Me.cmd_Meldebox.Enabled = False
Me.cmd_Meldebox.Visible = False
DoEvents
Next i
Archiv