Posez votre question Signaler

Ouvrir un fichier pdf sur une page precise [Résolu]

Messages postés
3
Date d'inscription
mercredi 5 mars 2008
Dernière intervention
9 mars 2008
 - - Dernière réponse : amrw
Messages postés
3
Date d'inscription
mercredi 5 mars 2008
Dernière intervention
9 mars 2008
 - 9 mars 2008 à 12:39
VB.NET Posez votre question Signaler
Bonjour,
Je voudrais ouvrir un document pdf sur une page bien precise (26/78) avec VB Excel,J'ai utilisé ce code mais il l'ouvre sur la 1ere page.
Merci de votre aide . Cordialement A+

Private Sub CommandButton9_Click()

Dim Page As Integer
Dim OuvFich As Long
Dim Fichier As String
OuvFich = Shell("C:\Program Files\Adobe\Acrobat 6.0\Reader\AcroRd32.EXE ,Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, page:=26 ""C:\LUN.pdf", vbNormalFocus)

End Sub
Afficher la suite 

Votre réponse

Répondre au sujet

2 réponses

Meilleure réponse
Signaler Commenter la réponse de PCPT
Messages postés
13368
Date d'inscription
lundi 13 décembre 2004
Dernière intervention
3 février 2018
 30
3
Merci
salut

çà serait plutôt...
Shell "C:\Program Files\Adobe\Acrobat 6.0\Reader\AcroRd32.EXE /A page= 26 C:\LUN.pdf"

cependant acrobat n'est pas forcément installé, pas forcément en version 6, pas plus que dans le dossier que tu indiques

http://www.codyx.org/snippet_ouvrir-fichier-pdf-page-precise_561.aspx
++
<hr size ="2" width="100%" />Prenez un instant pour répondre à [infomsg_SONDAGE-POP3-POUR-CS_769706.aspx ce sondage] svp

Dire « Merci » 3

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 108 internautes nous ont dit merci ce mois-ci

Commenter la réponse de PCPT
Signaler Commenter la réponse de amrw
Messages postés
3
Date d'inscription
mercredi 5 mars 2008
Dernière intervention
9 mars 2008
0
Merci
salut PCPT,
Merci beaucoup de ton aide en fait c'etait bien ça le code pour le doc reste actif allez A+ :

Private Sub CommandButton10_Click()

Dim OuvFich As Long
OuvFich = (Shell("C:\Program Files\Adobe\Acrobat 6.0Reader\AcroRd32.EXE /A page=26 C:\LUN.pdf", vbNormalFocus))

End Sub
Commenter la réponse de amrw

Votre réponse

Répondre au sujet
Posez votre question
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.