Para tu primera pregunta tienes una utilidad del maestro lebans. Descarga el archivo, la Dll ha de estar o en la carpeta windows o en la misma ubicacion que la bd, importa el modulo MouseHook (o algo asi) que biene en la bd de ejemplo y copia el codigo que viene en la pagina en el evento load del form:
http://www.lebans.com/mousewheelonoff.htm
Tambien puedes probar esta solucion de Mcpegasus:
Tambien podrias probar esto que para mi es la solución mas sencilla, es de Pegasus, esta:
Private Sub Form_Current()
On Error GoTo ControlErr
'Anular el movimiento de la rueda del ratón.
If Not Me.RecordsetClone.NoMatch Then
Me.Bookmark = Me.RecordsetClone.Bookmark
End If
Exit_ControlErr:
Exit Sub
ControlErr:
If err = 2164 Then Resume Exit_ControlErr
If err = 3021 Then Resume Exit_ControlErr
MsgBox "Error " & err.Number & " en proc.: Current de Documento VBA: FichaProducto (" & err.Description & ")"
Resume Exit_ControlErr
End Sub
Un saludo