تعديل كود عرض الـPDF

[الطـاير]

السلام عليكم اخواني الاحباب 

عندي كود عرض الكتب بي دي اف PDF 

الكود شغال تمام في نفس النموذج لكن اريد تعديله لظهر في نموذج اخر فرعي 

اريد التعديل هنا 

Me.AcroPDF0.LoadFile ("\\recserver\Rec\R\Wared\" & Me.[yeae] & "\" & Me.[file] & ".PDF")
 

Quote

Public Sub PDF()
On Error Resume Next
Me.AcroPDF0.LoadFile ""
Me.AcroPDF0.LoadFile ("\\recserver\Rec\R\Wared\" & Me.[yeae] & "\" & Me.[file] & ".PDF")
End Sub