Peter,

Thanks for your help. I did as you suggested and progress made. The
compile error is gone and UserForm3 appears in the worksheet; however, there
is a blank white rectangular space in the middle of the UserForm, where page
one of the pdf file should appear. In the VB Forms editor, UserForm3 shows
the same white space with the Adobe PDF (AcroPDF1) icon. I have inserted the
complete file path (its accurate) in the code. Any idea what to do next?
Also, is Module1 the correct place for the code?

Thanks, Phil


"Peter T" wrote:

You say CommandButton1 is on a worksheet and the AcroPDF1 is in a userform
but that's completely at odds with your code. Assuming the setup is as you
describe, try something like this -

Private Sub CommandButton1_Click()
Dim sFile As String
sFile = "S:\.........\DTM-09-007.p"

With UserForm1.AcroPDF1
.LoadFile sFile
.setShowToolbar False
End With
UserForm1.Show

End Sub

Regards,
Peter T



"Phil H" wrote in message
...
SITUATION: want to place a .pdf file in a UserForm so when a user clicks a
CommandButton in a worksheet, the UserForm comes up displaying the .pdf
file
and the user can scroll through the pages.

WHAT'S BEEN DONE:
1. UserForm3 created.
2. Adobe AcroPDF1 control inserted/confirmed in UserForm - from Toolbox.
3. CommandButton1 inserted in worksheet.
4. The following code inserted in Module1 [thanks go to Jacob Skaria on
MSDN]:
Private Sub CommandButton1_Click()
With Me.AcroPDF1
.LoadFile "S:\.........\DTM-09-007.pdf" [the file on local
share drive]
.setShowToolbar (False)
.gotoFirstPage
End With
End Sub

RESULT: On clicking CommandButton1:
1. Error message: "Compile Error:"
a. "Method or data member not found"
b. Private Sub line yellow highlighted
c. .AcroPDF1 cited (highlighted blue)

REQUEST:
1. Resolve compile error.
2. Have the .pdf file imbedded in the Excel workbook so when the workbook
is used by others outside the local share drive (.pdf file not
accessible),
the .pdf file will come up and be operable in the UserForm.



.