Is there a way to create/apply a clip volume in a view without using CadInputQueue.SendKeyin in VBA

Working on a VBA based command that needs to define a clip volume from two points from within a class that implements IPrimitiveCommandEvents. 

CadInputQueue.SendKeyin terminates the execution of the command.

The steps that I'm looking to perform in the specific procedure are:

1. Apply clip volume using two points to a specific view

2. fit the view

3. Create saved view

The save view is used later in the command to create a reference attachment.