High-Tech Santé Médecine Droit-Finances

Bien choisir

son appareil photo

Rechercher : dans
Par :

Ouvrir un pdf sous excel

Dernière réponse le 4 mai 2009 à 16:56:17 madounet, le 4 mai 2009 à 15:15:13 
 Signaler ce message aux modérateurs

Bonjour,
Je souhaiterais lorsque je double clique sur une cellule ouvrir un doc pdf.
Voila le code que j'ai fait mais qui ne marche pas:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Target.Address = "$H$11" Then
Shell "C:\Program Files\Adobe\Acrobat 9.0\Reader\AcroRd32.exe C:\Documents and Settings\aurmad\Bureau\Plan d'urgence\Plan\LAAS plan de masse.pdf", vbNormalFocus
End If
End Sub

Il doit manquer quelque chose quelque part mais quoi??
Merci d'avance

Configuration: Windows XP
Firefox 3.0.10

Posez votre question Répondre

1

hich24, le 4 mai 2009 à 16:32:42

Pourquoi ne pas utiliser les liens hypertext c'est plus simple non !

   
Répondre à hich24

2

madounet, le 4 mai 2009 à 16:47:03

Oui c'est plus simple mais étant donnée que c'est une base de données pour mon boulot, il faut que tout soit clean question de crédibilité...
j'ai beau chercher sur les forums, mais je ne trouve pas solution!!

   
Répondre à madounet

3

madounet, le 4 mai 2009 à 16:51:48

C'est bon problème résolu.
Pour ceux que ca intéresse voila comment j'ai fait (un code trouvé sur un autre forum":

If Target.Address = "$H$11" Then
ThisWorkbook.FollowHyperlink "C:\Documents\....pdf"
End If
End Sub

   
Répondre à madounet

4

 hich24, le 4 mai 2009 à 16:56:17

Tu peut inserer une forme automatique a partire de la barre de dessin ( rectangel par exemple ) tu met sur la cellule " en mentenant la touche ALT enfoncer " pour avoire la forme exactement a la taille de la cellule

2- clicke droit lein hypertext tu choisie le fichier est c'est ok
3- tu peut supprimer la bordure et mettre en transparent ca devrait etre estitique

   
Répondre à hich24
Posez votre question Répondre
Ils ont besoin de votre aide