possibilité choisir fichier pdf dans userform et l'ouvrir

P

PMO2

XLDnaute Accro

• 20 Février 2015

• #2

Re : possibilité choisir fichier pdf dans userform et l'ouvrir

Bonjour,

Essayez le code suivant (qui pourra être inclus dans le code d'un CommanButton de l'USF)

Code:

Private Declare Function ShellExecute& Lib "shell32.dll" Alias "ShellExecuteA" ( _
  ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, _
  ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long)
  
Const SW_SHOWNORMAL = 1

Sub aa()
Dim myPDF
'---
myPDF = Application.GetOpenFilename("Fichiers PDF (*.pdf), *.pdf")
If myPDF = False Then Exit Sub
ShellExecute Application.hwnd, vbNullString, myPDF, vbNullString, vbNullString, SW_SHOWNORMAL
End Sub

 

Vote positif 0 Vote négatif

B

bidochon34800

XLDnaute Junior

• 20 Février 2015

• #3

Re : possibilité choisir fichier pdf dans userform et l'ouvrir

merci, mais mes lumières en VBA étant très - très faibles, pourrais-tu être plus explicite ? J'ai mis le code sur un btn de l'UF mais après rien ne se passe. Que faut-il faire après ?

 

Vote positif 0 Vote négatif

P

PMO2

XLDnaute Accro

• 20 Février 2015

• #4

Re : possibilité choisir fichier pdf dans userform et l'ouvrir

Voir l'exemple dans la pièce jointe.

 

Pièces jointes

• Exemple pour bidochon34800.xlsm

  18.7 KB · Affichages: 113

Vote positif 0 Vote négatif

kiki29

XLDnaute Barbatruc

• 20 Février 2015

• #5

Re : possibilité choisir fichier pdf dans userform et l'ouvrir

Salut, pour la liste regarde ici et éventuellement adapte, ainsi qu'ici pour visualiser les pdfs.

 

Vote positif 0 Vote négatif

B

bidochon34800

XLDnaute Junior

• 21 Février 2015

• #6

Re : possibilité choisir fichier pdf dans userform et l'ouvrir

Merci à tous les deux ed vosu être penchés sur ma question. Vos codes marchent très bien pour aller ouvrir un fichier pdf. Ca, je savais le faire différemment mais cela marchait aussi.
%oi, ce que je cherche à faire, c'est d'afficher les fichiers d'un répertoire précis dans un textbox de mon userform, afin de pouvoir cliquer dessus et y accéder.
Le must serai de créer une autre textbox, où je pourrais entrer un mot-clef afin de rechercher plus rapidement mon fichier car j'ai près de 2000 pdf dans ce répertoire.
Merci et bon week-end. Moi je bosse !!!!!!!!!

 

Vote positif 0 Vote négatif

kiki29

XLDnaute Barbatruc

• 21 Février 2015

• #7

Re : possibilité choisir fichier pdf dans userform et l'ouvrir

Salut, le 1er lien à permis, en l'adaptant, sur ce forum de traiter des fichiers pdf ( + de 200 000 à l'époque ), dans une autre appli externe c'était plus de 640 000 pages A4 dont il fallait récupérer le texte et le reformater.

 

Dernière édition: 21 Février 2015

Vote positif 0 Vote négatif