Vista previa de informe
Publicado por Pepecor (1 intervención) el 02/02/2005 17:17:44
Quiero ver las páginas de un informe utilizando la rueda del ratón para pasar de página. ¿Es posible ?.
Valora esta pregunta
0
Private Sub Report_MouseWheel(ByVal Page As Boolean, ByVal Count As Long)
If Page = True Then
' Desplazamiento de página completo
If Count > 0 Then
' Desplazamiento hacia arriba
DoCmd.GoToRecord , , acPrevious
Else
' Desplazamiento hacia abajo
DoCmd.GoToRecord , , acNext
End If
End If
End Sub