UF Hintergrund kurz blinken

[M.Wichmann]

Hallo,

ich mache mal einen neuen Beitrag auf, um die richtigen Leute anzusprechen.

Ich habe eine UF mit der ich eine Tabelle bearbeite.
Jetzt habe ich schon eine Signalisierung eingebaut die mich auf Eingabefehler bzw Probleme hinweist.

Es gibt 2 szenarien: ID doppelt vergeben, Verpackung zu Lieferschein doppelt doppelt.

Jetzt habe ich das so gelöst, das in beiden Fällen die UF rot wird, und je nach Fall die ID-Listbox bzw die Verpackungs.Kombobox rot wird.

Für eine bessere Sichtbarkeit hätte ich gerne, das die Listbox bzw CB kurz blinkt. 
Ich habe zwar paar Sachen in Google gefunden, aber mehr zu Zellen usw.

Hier mal mein momentaner Code zur Signalisierung:

Code:

Private Sub Worksheet_Calculate()

   If Range("O1") > 0 Then
       UFLeergut.BackColor = &H80C0FF
   ElseIf Range("O1") = 0 Then
       UFLeergut.BackColor = &HE7B492
 End If
 If Range("M1") > 0 Then
       UFLeergut.ListBox1.BackColor = &HFF
   ElseIf Range("M1") = 0 Then
       UFLeergut.ListBox1.BackColor = &HF3E4C5
 End If
 If Range("N1") > 0 Then
       UFLeergut.cbArt.BackColor = &HFF
   ElseIf Range("N1") = 0 Then
       UFLeergut.cbArt.BackColor = &HF3E4C5
 End If
End Sub

[Rabe]

Hi,

Für eine bessere Sichtbarkeit hätte ich gerne, das die Listbox bzw CB kurz blinkt. 

und wenn der Nutzer dann zufällig genau in der kurzen Blinkzeit wegschaut, dann weiß er es nicht, daß da was geblinkt hat.

[RPP63]

Man könnte natürlich auch mit dem örtlichen Stromversorger reden, die Netzspannung kurz anzupassen …

Allgemein hilft nur ein Me.Repaint; das Ereignismakro hat dann natürlich nix im _Calculate zu suchen, sondern in einem relevantem Child des UF.

[offTopic]
@M.Wichmann:
Du verrennst Dich seit geraumer Zeit in klicki-bunti, ohne dass Du Dir Grundlagen angeeignet hast!
Bitte verwechsele ein Forum nicht mit der eierlegenden Wollmilchsau.
[/off topic]

Two Cents,
Ralf

[Helvetier]

Hallo Mario
Ich habe eine Datei mit blinkenden UF angehängt.  Vielleicht hilft sie Dir.
Leider muss ich Dir zumuten eine .xlsm - Datei zu öffnen. Eine Trennung wäre mit zu viel Umtrieb und möglicherweise auch Risiko verbunden.
Der commandbutton reagiert auf Click.
Die TextBox reagiert auf Change.
Die Combobox reagiert auf Change.
Die Userform reagiert auf click.
Keine Reaktion gibt es in der Listbox.
Viel Erfolg bei der Spielerei .... denn das ist es.
Gruss

[M.Wichmann]

Hallo,

ich denke ich habe in der letzten zeit mir einiges an Kenntnissen zugelegt.
Sicherlich bin ich noch nicht in der lage, sowas Komplett alleine zu erstellen. 
Aber ich bin schon in der Lage, vorhandene Codes anzupassen und zu erweitern um das an meine Bedürfnisse anzupassen, 
da ich mich schon sehr intensiv mit der ganzen Sache befasse.

Ziel von der ganzen Sache ist, das diese Dateien bzw Tabellen auch von Mitarbeitern sicher und fehlerfrei bedient werden können, die noch sehr viel weniger Ahnung haben. Und dabei(zum Thema klicki-bunti) auch ein wenig optisch ansprechend und möglichst einfach im Aufbau sein.

Bei meiner Arbeit mit dieser Tabelle bin ich auf diese Fehlerquellen gestossen, und wollte dieses Verbessern, dabei dachte ich dann zb., jetzt wäre es doch gut, wenn das blinken würde.
Das mag eine "Spielerei" sein, auch ob das umgesetzt wird, bzw in der Finalen Version drin bleibt, ka, Aber wie gesagt, die Tabellen sollen möglichst Fehlerfrei bedienbar sein.

Wer viel fragt, bekommt evtl viel Antworten und kann dann viel lernen.

[Helvetier]

Wer viel fragt, bekommt evtl viel Antworten und kann dann viel lernen.

Hallo Mario
Mit Dir absolut einverstanden .... und wer viel liefert, bekommt ab und zu ein Danke schön.
Gruss

[M.Wichmann]

Hallo,

ich sage fast immer Danke. Zumindest in den Posts. An diesen Button denke ich meistens nicht.

Im Üprigen habe die das jetzt auch hinbekommen. Ich finde es garnicht so unpraktisch.
Auch ein anderer Mitarbeiter dem ich das gezeigt habe, findet es gut das man sofort sieht, das ein Fehler vorliegt und wo der zu finden ist.