LaMouche39
Messages postés7Date d'inscriptionsamedi 15 mars 2003StatutMembreDernière intervention31 janvier 2013 31 janv. 2013 à 15:18
Bonjour,
Je déterre un peu le Post ! qui m'a bien servi
En plus des différents ordre cités dans l'exemple , est-ce qu'il existe un ordre pour faire la rotation de la vue (Comme avec clic droit /option Rotation)
genre .SetRotateLeft ou SetRotateRight un truc comme ça ?
Merci d'avance aux spécialistes !
peshko60
Messages postés3Date d'inscriptionmercredi 22 août 2007StatutMembreDernière intervention 5 décembre 2011 5 déc. 2011 à 12:49
Bonjour,
Le code initial (récupéré à partir du fichier exemple) fonctionne parfaitement bien sur mon poste. Mais sur celui des collègues cela ne fonctionne pas, au lieu d'afficher le fchier une page planche s'affiche (comme s'il y avait une difficulté d'accéder au fichier). j'ai vérifié je suis en mode protégé Acrobat Reader X mais je n'arrive pas à activer ce mode protégé sur les autres ordi (message relatif à la configuation système!).
Est-ce que cela peut provenir de droits différents (encore que je suis le même user lambda que les autres) ou de versions d'acrobat?
Si quelqu'un a une idée cela sera génial.
Merci d'avance
pascalbidouille
Messages postés1Date d'inscriptionjeudi 27 août 2009StatutMembreDernière intervention10 août 2011 10 août 2011 à 14:28
Bonjour,
J'essaie d'utiliser ce code mais j'ai une erreur "Can't find project or library" sur PdfForm
Faut il faire une déclaration supplémentaire pour utiliser ces contrôles ?
Merci
dedederidiny
Messages postés42Date d'inscriptiondimanche 1 février 2004StatutMembreDernière intervention15 mai 2011 15 mai 2011 à 18:00
re bonjour,
je n'y arrive toujours pas
de l'aide ou un fichier exemple me sauverais
merci d'avance
dedederidiny
Messages postés42Date d'inscriptiondimanche 1 février 2004StatutMembreDernière intervention15 mai 2011 5 mai 2011 à 19:45
bonsoir,
la taille du composant de visualisation du pdf ne s'adapte pas a la taille de l'USF.
Comment faire, merci d'avance
jpduf
Messages postés2Date d'inscriptiondimanche 13 juillet 2003StatutMembreDernière intervention 8 décembre 2010 8 déc. 2010 à 21:17
Bonjour,
Les fonctions de la DLL "AcroPDF" ne permettent de faire des recherches sur les chaines de caractères contenues dans le PDF. Tout du moins dans les versions 7.x et 8.x. Voir la documention de la version 9.1 si les fonctions de recherche ont été implémentées. La doc est dispo a l'adresse => http://download.macromedia.com/pub/developer/acrobat/sdk/9/sdk91_v2_win.zip
Slts
degraff63
Messages postés2Date d'inscriptiondimanche 10 septembre 2006StatutMembreDernière intervention20 novembre 2017 8 déc. 2010 à 15:19
Bonjour,
Merci pour ton source. Impec !
Comment rechercher maintenant dans le PDF. En fait, je dois extraire une chaine comprise entre 2 mots connus, sur la 1ère page .
cs_Le Pivert
Messages postés7903Date d'inscriptionjeudi 13 septembre 2007StatutContributeurDernière intervention11 mars 2024137 19 nov. 2009 à 14:23
Pour que ce programme fonctionne quelques modifications sont necessaires:
Mettre dans l'userform, un label: Lblfichier et un bouton: cmdopen ensuite le code suivant dans l'userform:
Private Sub cmdopen_Click()
Lblfichier = Application.GetOpenFilename("PDF Files (*.pdf), *.pdf")
essai
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
End
End Sub
et modifier le module comme suit:
Sub LoadPDF(FicPdf As String, NoPage As Integer)
'Création de l'objet AcroPdf dans fenetre 'PdfForm'
Set mObjPDF = PdfForm.Controls.Add("AcroPDF.PDF.1", "VisuPDF")
ch = mObjPDF.src
'récupère la version d'acrobat
ver = mObjPDF.GetVersions
'Paramétrage de l'objet sur la fenetre
With PdfForm.Controls("VisuPDF")
'rend le composant Visible
.Visible = True
'fixe la hauteur du composant par rapport a la fenetre
.Height = PdfForm.Height - 20
'fixe la largeur du composant par rapport a la fenetre
.Width = PdfForm.Width - 5
mObjPDF.setViewRect 0, 0, 700, 600
End With
'Paramétrage de l'objet AcroPdf
With mObjPDF
.src = FicPdf 'Nom du fichier ou lien URL
'.LoadFile ("c:\nomfichier.pdf")
.setShowScrollbars (True) 'Affiche l'assenceur True/False
.setShowToolbar (True) 'Affiche la barre d'outil True/false
.setPageMode ("none") 'Determine le mode d'affichage none/bookmarks/thumbs
.setLayoutMode ("SinglePage") 'Determine le type d'affichage DontCare/SinglePage/OneColumn/TwoColumnLeft/TwoColumnRight
.setCurrentPage (NoPage) 'Numéro de la page a afficher
.setView ("Fit") 'Fixe la méthode d'affichage Fit/FitH/FitV/FitB/FitBH/FitB
.setZoom (100) 'Determine de niveau de zoom
End With
'Affiche la feuille
'PdfForm.Show
End Sub
Sub essai()
LoadPDF (PdfForm.Lblfichier), 1
End Sub
de cette manière vous pouvez ouvrir les fichiers PDF qui sont dans votre PC
@+ Le Pivert
octiz
Messages postés1Date d'inscriptionmercredi 2 août 2006StatutMembreDernière intervention28 juin 2009 28 juin 2009 à 09:41
ça ne marche pas il y a un bug
simodel
Messages postés38Date d'inscriptionvendredi 29 février 2008StatutMembreDernière intervention19 juin 2009 19 juin 2009 à 14:53
Très bien.
jpduf
Messages postés2Date d'inscriptiondimanche 13 juillet 2003StatutMembreDernière intervention 8 décembre 2010 24 févr. 2009 à 11:01
Bonjour,
A ma connaissance cet OCX est installé par acrobat reader depuis la version 7.
Slts
JP
cs_dhardy
Messages postés45Date d'inscriptionlundi 23 juin 2003StatutMembreDernière intervention24 février 2009 24 févr. 2009 à 09:48
Bonjour,
Impeccable, je cherchais justement l'information il y a peu.
Où peut-on trouver l'OCX AcroPDF ?
Est-ce qu'il est par défaut installer avec Acrobat Reader ?
31 janv. 2013 à 15:18
Je déterre un peu le Post ! qui m'a bien servi
En plus des différents ordre cités dans l'exemple , est-ce qu'il existe un ordre pour faire la rotation de la vue (Comme avec clic droit /option Rotation)
genre .SetRotateLeft ou SetRotateRight un truc comme ça ?
Merci d'avance aux spécialistes !
5 déc. 2011 à 12:49
Le code initial (récupéré à partir du fichier exemple) fonctionne parfaitement bien sur mon poste. Mais sur celui des collègues cela ne fonctionne pas, au lieu d'afficher le fchier une page planche s'affiche (comme s'il y avait une difficulté d'accéder au fichier). j'ai vérifié je suis en mode protégé Acrobat Reader X mais je n'arrive pas à activer ce mode protégé sur les autres ordi (message relatif à la configuation système!).
Est-ce que cela peut provenir de droits différents (encore que je suis le même user lambda que les autres) ou de versions d'acrobat?
Si quelqu'un a une idée cela sera génial.
Merci d'avance
10 août 2011 à 14:28
J'essaie d'utiliser ce code mais j'ai une erreur "Can't find project or library" sur PdfForm
Faut il faire une déclaration supplémentaire pour utiliser ces contrôles ?
Merci
15 mai 2011 à 18:00
je n'y arrive toujours pas
de l'aide ou un fichier exemple me sauverais
merci d'avance
5 mai 2011 à 19:45
la taille du composant de visualisation du pdf ne s'adapte pas a la taille de l'USF.
Comment faire, merci d'avance
8 déc. 2010 à 21:17
Les fonctions de la DLL "AcroPDF" ne permettent de faire des recherches sur les chaines de caractères contenues dans le PDF. Tout du moins dans les versions 7.x et 8.x. Voir la documention de la version 9.1 si les fonctions de recherche ont été implémentées. La doc est dispo a l'adresse => http://download.macromedia.com/pub/developer/acrobat/sdk/9/sdk91_v2_win.zip
Slts
8 déc. 2010 à 15:19
Merci pour ton source. Impec !
Comment rechercher maintenant dans le PDF. En fait, je dois extraire une chaine comprise entre 2 mots connus, sur la 1ère page .
19 nov. 2009 à 14:23
Mettre dans l'userform, un label: Lblfichier et un bouton: cmdopen ensuite le code suivant dans l'userform:
Private Sub cmdopen_Click()
Lblfichier = Application.GetOpenFilename("PDF Files (*.pdf), *.pdf")
essai
End Sub
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
End
End Sub
et modifier le module comme suit:
Sub LoadPDF(FicPdf As String, NoPage As Integer)
'Création de l'objet AcroPdf dans fenetre 'PdfForm'
Set mObjPDF = PdfForm.Controls.Add("AcroPDF.PDF.1", "VisuPDF")
ch = mObjPDF.src
'récupère la version d'acrobat
ver = mObjPDF.GetVersions
'Paramétrage de l'objet sur la fenetre
With PdfForm.Controls("VisuPDF")
'rend le composant Visible
.Visible = True
'fixe la hauteur du composant par rapport a la fenetre
.Height = PdfForm.Height - 20
'fixe la largeur du composant par rapport a la fenetre
.Width = PdfForm.Width - 5
mObjPDF.setViewRect 0, 0, 700, 600
End With
'Paramétrage de l'objet AcroPdf
With mObjPDF
.src = FicPdf 'Nom du fichier ou lien URL
'.LoadFile ("c:\nomfichier.pdf")
.setShowScrollbars (True) 'Affiche l'assenceur True/False
.setShowToolbar (True) 'Affiche la barre d'outil True/false
.setPageMode ("none") 'Determine le mode d'affichage none/bookmarks/thumbs
.setLayoutMode ("SinglePage") 'Determine le type d'affichage DontCare/SinglePage/OneColumn/TwoColumnLeft/TwoColumnRight
.setCurrentPage (NoPage) 'Numéro de la page a afficher
.setView ("Fit") 'Fixe la méthode d'affichage Fit/FitH/FitV/FitB/FitBH/FitB
.setZoom (100) 'Determine de niveau de zoom
End With
'Affiche la feuille
'PdfForm.Show
End Sub
Sub essai()
LoadPDF (PdfForm.Lblfichier), 1
End Sub
de cette manière vous pouvez ouvrir les fichiers PDF qui sont dans votre PC
@+ Le Pivert
28 juin 2009 à 09:41
19 juin 2009 à 14:53
24 févr. 2009 à 11:01
A ma connaissance cet OCX est installé par acrobat reader depuis la version 7.
Slts
JP
24 févr. 2009 à 09:48
Impeccable, je cherchais justement l'information il y a peu.
Où peut-on trouver l'OCX AcroPDF ?
Est-ce qu'il est par défaut installer avec Acrobat Reader ?
Merci
Didier