RollZoom Property Example
This example enables the IntelliMouse to zoom instead of scroll.
Application.RollZoom = True