Bonjour à tous,
J'ai bien regardé tous les sujets et même davantage et la conclusion est que pour environ 5000 factures (il y en a de très petites) le lien hypertexte semble lourd à gérer.
Je me tourne donc vers une macro comme celle ci-dessous, mais qui ne fonctionne pas. De plus, il faudrait qu'elle puisse fonctionner avec tous lecteurs de Pdf.
Sur mon PC j'ai Foxit Reader
En vous remerciant de votre aide.
http://www.cjoint.com/c/GJwmJkteJLO
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean) Dim Siret As String Dim CheminDOc As String If Target.Column = 1 Then CheminDOc = "E:\Utilisateurs\Castor\Bureau\Facture rénovation maison" 'mon dossier Siret = Target If Siret <> "" Then Shell "C:\Program Files(x86)\Foxit Software\Foxit Reader\FoxitReader.exe " & CheminDOc & "\" & Siret & ".pdf" 'chemin de Foxit Reader Shell "C:\Program Files\Adobe\Reader 10.0\Reader\AcroRd32.exe " & CheminDOc & "\" & Siret & ".pdf" 'chemin supposé pour Adobe Reader Else MsgBox "La cellule est vide, veuillez double cliquer sur une autre cellule" End If End If End Sub
Partager