Hallo,
ich habe mit Access ein Formular erstellt und kann dort unter Formular–>Eigenschaften–>Ereignis–>Bei Mausrad was einegbenm,
wo ich das Scrollverhalten der Maus steuern kann.
Wie kann ich es aktivieren, damit die Scrolltaste nicht genutzt werden kann ?
Danke und Gruß, marsi
Hallo,
es gibt verschiedene Möglichkeiten. Ich persönlich benutze folgende:
Textfeld im Formlar einfügen, bei dem das Mausrad aus sein soll
Folgende Eigenschaften einstellen:
Standardwert: " "
Gültigkeitsregel: wheelspin()=False
Gültigkeitsmeldung: „Das Mausrad wurde deaktiviert!“
Im VBA-Fenster für das Formular definieren:
Private Enum wsTrigger
MyWheel = 1
NotTheWheel = 2
End Enum
Private mWheel As Boolean
Private ValidationTrigger As wsTrigger
Folgende Funktione einfügen:
Private Function WheelSpin() As Integer
WheelSpin = mWheel
Select Case ValidationTrigger
Case NotTheWheel
mWheel = False
End Select
End Function
Dem Formularereignis MouseWheel folgende Prozedur mitgeben:
Private Sub Form_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)
On Error GoTo Sub_Err
mWheel = True
ValidationTrigger = MyWheel
Me.txt_MausradTextbox.SetFocus
Me.txt_MausradTextbox.Text = " "
Sub_Exit:
ValidationTrigger = NotTheWheel
Exit Sub
Sub_Err:
Resume Sub_Exit
End Sub
Dabei beachten, diese Methode eignet sich eher für einzelne Formulare - Vorteil: in Endlosunterformularen funktioniert das Mausrad wie gewohnt. Nachteil, das ganze müsste jeweils für jedes Formular separat eingebaut werden.
Wie gesagt, es gibt verschiedene Ansätze zu dem Thema - google spuckt da doch einiges aus.
Gruß
D. Scholdei
Danke, hat aber leider nicht so richtig geklappt:frowning:
Wenn ich ein neues Formular starte, wird eine neue ID [Autowert] vergeben.
Sobald ich dort die Scrolltaste betätige, scrollt es einfach weiter
zur nächsten ID.
Gruß, Marsi
Hallo, Marsi!
Wenn ich ein neues Formular starte, wird eine neue ID
[Autowert] vergeben.
Sobald ich dort die Scrolltaste betätige, scrollt es einfach
weiter
zur nächsten ID.
Das könntest Du mit den Formular-Eigenschaften „Zyklus“ und/oder „Anfügen zulassen“ abfangen. Dies würde auch [Bild hoch/runter] abfangen.
Gruß, Manfred
Das könntest Du mit den Formular-Eigenschaften „Zyklus“
und/oder „Anfügen zulassen“ abfangen. Dies würde auch [Bild
hoch/runter] abfangen.
Danke, Manfred.
Hat leider nicht ganz geklappt:
Muss meine Aussage auch kurz korrigieren:
Wenn ich ein neues Formular starte, wird eine neue ID
[Autowert] vergeben.Fülle ich dort ein feld aus, wird die Nummer
angezeigt, Bsp. 2
Sobald ich dort die Scrolltaste betätige, scrollt es einfach
weiter zur nächsten ID, bzw. [Autowert].
Gruß, Marsi
Hallo,
hast du mal geschaut, daß er die Funktion auch ausführt?
Wenn alle Stränge reißen, schick mir das Form einfach zu, dann schau ich mal drüber.
Gruß
D. Scholdei
Hallo,
ich habe mein script in einer Beispieldatenbank eingebaut und per mail an die o.g. Adresse verschickt.
Gruß
D. Scholdei