ciao
poichè non hai allegato un esempio della tua UserForm, ti trascrivo un codice che apre un pdf alla pagina che inserisci nella cella A1 di un foglio.
NB: le parti evidenziate dovrai cambiarle secondo i tuoi percorsi:
- Const cAdobeReaderExe contiene il percorso del tuo exe di acrobat
- PDFfile contiene il percorso del tuo file "Manuale.pdf"
In A1 metti il numero di pagina ed esegui la macro.
Ovviamente se il numero pagina è in una TextBox, al posto di:
.....& ActiveSheet.Range("A1").Value.......
ci andrà :
& TextBox.Value
saluti
Const cAdobeReaderExe As String = "C:\Program Files (x86)\Adobe\Acrobat 7.0\Acrobat\Acrobat.exe" ' MODIFICA SECONDO TUO PERCORSO
Public Sub OpenPagePdf()
Dim PDFfile As String
Dim AdobeCommand As String
PDFfile = "C:\Users\Utente\Desktop\Manuale.pdf" ' MODIFICA SECONDO TUO FILE MANUALE.PDF
AdobeCommand = " /a ""page=" & ActiveSheet.Range("A1").Value & "=Open Actions"" " ' Modificare
Shell cAdobeReaderExe & AdobeCommand & Chr(34) & PDFfile & Chr(34), vbNormal
End Sub
Domenico
Win 10 - Excel 2016