I am trying to zoom in a PDF document that opens in a webbrowsercontrol on an access form.
I currently am trying to use SendKeys for the zoom in. Here is the code I am trying to use for zoom in. The problem I am having is that when I click cmdzoomin, the PDF rotates clockwise, doesn't zoom.
The odd thing is that my zoom out button works fine. SendKeys ("^{-}")
Any thoughts to make this work?
I currently am trying to use SendKeys for the zoom in. Here is the code I am trying to use for zoom in. The problem I am having is that when I click cmdzoomin, the PDF rotates clockwise, doesn't zoom.
Private Sub cmdzoomin_Click()
On Error GoTo ErrorHandler
Me.WebBrowser5.SetFocus
SendKeys ("^{+}")
ProcedureExit:
Exit Sub
ErrorHandler:
MsgBox "Error" & ": " & Err.Number & vbCrLf & "Description: " _
& Err.Description, vbExclamation, Me.Name & ".cmdzoomin_Click"
Resume ProcedureExit
End Sub
The odd thing is that my zoom out button works fine. SendKeys ("^{-}")
Any thoughts to make this work?