Double clic sur cellule: Erreur 53

Fermé
Viking58 Messages postés 186 Date d'inscription vendredi 5 décembre 2014 Statut Membre Dernière intervention 5 janvier 2018 - 17 sept. 2015 à 15:22
Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 - 17 sept. 2015 à 20:21
Bonjour.

Trouvé ce code qui permettrait, en double cliquant sur la cellule, de lancer l'ouverture d'un pdf.

J'ai une erreur 53 sur ce code:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim Siret As String
Dim CheminDOc As String
CheminDOc = "D:\Documents\Armes\Tables Rechargement Sous Excel\Petits Calibres\.17 Remington.pdf"
Siret = Target
If Siret <> "" Then
Shell "D:\Documents\Armes\Tables Rechargement Sous Excel\Sumatra.exe" & CheminDOc & "\" & Siret
Else
MsgBox " La cellule est vide, veuillez double cliquer sur une autre cellule"
End If
End Sub


Mon CheminDOc est bon.
La partie surlignée est en cause.
Mon reader de pdf est bien à sa place.

Merci






A voir également:

3 réponses

Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 149
17 sept. 2015 à 16:10
Bonjour,

Avant le Shell, affiche ce que tu essaies d'ouvrir :
MsgBox("D:\Documents\Armes\Tables Rechargement Sous Excel\Sumatra.exe" & CheminDOc & "\" & Siret)


Puis essaie directement en ligne de commande DOS.

Il ne semble pas y avoir d'espace après '.exe' et tu ajoutes un n° Siret après '.pdf'.

ça paraît curieux...

A+
0
Viking58 Messages postés 186 Date d'inscription vendredi 5 décembre 2014 Statut Membre Dernière intervention 5 janvier 2018 7
17 sept. 2015 à 16:19
Merci Zoulou.

Si cela te parait curieux, imagine quelqu'un qui ne connait pas bien VBA.
Après le Shell ? Je veux ouvrir mon reader de Pdfs, Sumatra.
Ajouter un N° de Siret ? Quel numéro ?
(C'est quoi un SIRET ?)
Le plus terrible, c'est que je cherche simplement a ouvrir un pdf quand je double clic sur une cellule.
0
Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 149
17 sept. 2015 à 16:44
C'est pas moi qui ai indiqué un code mentionnant "Shell" et "Siret"... qui se trouvent dans la ligne que tu as mise en gras... et je n'ai aucune idée de ton niveau en Excel et en VBA.

Shell va agir comme l'invite de commande DOS (menu Windows > Exécuter > "cmd").
Dans ta ligne en gras tu essaies d'ouvrir un fichier pdf avec ton lecteur Sumatra et le paramètre Siret à la fin semble être en trop.
Si tu tiens à ton code VBA, tu peux essayer (à la place de ta ligne en gras) :
ActiveWorkbook.FollowHyperlink Address:=CheminDOc

mais peut-être un lien hypertexte est-il suffisant ?
https://support.microsoft.com/fr-fr/office/lien-hypertexte-lien-hypertexte-fonction-333c7ce6-c5ae-4164-9c47-7de9b76f577f?ui=fr-fr&rs=fr-fr&ad=fr

En plus comme ça tu sais ce que tu ouvres et tu n'ouvres pas le fichier à tout bout de champ (un double-clic est si vite arrivé).
0
Viking58 Messages postés 186 Date d'inscription vendredi 5 décembre 2014 Statut Membre Dernière intervention 5 janvier 2018 7 > Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023
17 sept. 2015 à 17:06
Merci Zoulou.

Non, le lien hypertexte est ici une galère à réaliser.
Comme j'en ai parlé sur un autre post aujourd'hui, à chaque création de lien, Excel ouvre la fenêtre de construction "au départ"
C'est à dire qu'il faut, dans mon cas, ouvrir la fenêtre création de lien, se promener dans l'arborescence du disque, trouver le pdf visé et valider.
Au second lien, Excel repart encore du début, il faut tout recommencer entièrement du début.
Même pas fichu de garder en mémoire le dernier répertoire ouvert (contrairement aux autres logiciels).
Alors, j'avoue baisser les bras pour faire plus de 200 fois ces manips fastidieuses...
Je le regrette d'autant plus que le lien hypertexte est l'idéal pour mon projet.
0
Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 149
17 sept. 2015 à 17:24
Je pige toujours pas.
Dans ce fil, tu demandes comment ouvrir un fichier bien précis (donc unique).
Dans le précédent (que je suis allé chercher ici : https://forums.commentcamarche.net/forum/affich-32540316-liens-hypertexte-a-la-suite ), tu crées des liens hypertexte.

Peut-être qu'en exprimant ton besoin plutôt qu'en cherchant à corriger un moyen, on y arrivera...
Si par exemple, tu veux créer un lien hypertexte par fichier pdf contenu dans un dossier, c'est assez simple par macro (qu'il y ait 5 fichiers pdf ou 5000).
0
Viking58 Messages postés 186 Date d'inscription vendredi 5 décembre 2014 Statut Membre Dernière intervention 5 janvier 2018 7 > Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023
17 sept. 2015 à 17:46
J'ai fais des post différents, selon la technique recherchée.

Je vais donner un exemple simple.

En colonne A, j'ai la liste des fruits.
A
Banane
Pomme
Poire
Pêche
Cerise

J'ai, dans un répertoire, la liste de tous mes fruits. en PDF
Chaque fruit possède un type. (ex: Poire Passe-crassane, Poire Williams, Poire Guyot, etc...
J'ai donc fusionné tous les fichiers poire pour n'avoir qu'un seul pdf.
Sur Excel, e voulais qu'en cliquant sur "Poire", Sumatra ouvre le pdf "poire", et que je puisse ainsi regarder toutes mes variétés de poire.
Le lien était l'idéal, mais beaucoup trop à mettre en place. (plus de 200 fruits)
J'espère avoir été clair.
C'est un peu comme une table des matières sur un DVD.
On clique sur un libellé, on arrive au début du sujet.
0
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
17 sept. 2015 à 18:10
Bonjour,

C'est bien beau d'ouvrir de nouveau post, mais il faudrait quand même répondre au précédent.

On te donne une solution, tu ne cherches même pas à creuser pour arriver à tes fins.

https://forums.commentcamarche.net/forum/affich-32540316-liens-hypertexte-a-la-suite#p32540381
0
Viking58 Messages postés 186 Date d'inscription vendredi 5 décembre 2014 Statut Membre Dernière intervention 5 janvier 2018 7
17 sept. 2015 à 18:37
Si, justement J'ai ESSAYÉ... Ayant trouvé ce code hier.
Je n'ai pas réussi à adapter à mon classeur.
Les réponses arrivent parfois en live, parfois en retard. Je n'ai pas vu ce post.
J'ai l'habitude de répondre et de toujours remercier.
Quand à creuser, étant malheureusement sans travail, j'y passe des heures chaque jour.
Alors les réflexions de ce genre...
Tant mieux pour ceux qui maitrisent.
Je maitrise bien d'autre choses que vous ne maitrisez pas...
0
Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 149 > Viking58 Messages postés 186 Date d'inscription vendredi 5 décembre 2014 Statut Membre Dernière intervention 5 janvier 2018
17 sept. 2015 à 18:43
On va donc essayer de clore tous tes fils en répondant à ton besoin initial : avoir la possibilité d'ouvrir le fichier de ton choix depuis une liste dans Excel.
Peux-tu répondre à https://forums.commentcamarche.net/forum/affich-32540742-double-clic-sur-cellule-erreur-53#8 ?
0
Viking58 Messages postés 186 Date d'inscription vendredi 5 décembre 2014 Statut Membre Dernière intervention 5 janvier 2018 7 > Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023
17 sept. 2015 à 19:06
Merci Zoul67.
Il est difficile de se faire comprendre quand on ne peut déposer son fichier quand il est privé.(celui là, en plus, à un ©) .
Je suis depuis 48 heures sur ce problème et ai testé des tonnes de trucs, sans succès.
Ta solution me convient. Mettre au propre le sujet. N'hésite pas.
Je désire donc, pour simplifier:
Colonne A: Ma liste de noms.
Je désire que quand je clique sur le nom, Excel trouve et ouvre le pdf correspondant, situé dans un répertoire de mon disque.
(je précise que le classeur et les pdfs sont dans le même répertoire)

Je me répète: Si Excel n'était pas aussi lourd pour créer un lien, je l'aurai fais sans hésiter.
Merci encore de ta patience.
0
Zoul67 Messages postés 1959 Date d'inscription lundi 3 mai 2010 Statut Membre Dernière intervention 30 janvier 2023 149 > Viking58 Messages postés 186 Date d'inscription vendredi 5 décembre 2014 Statut Membre Dernière intervention 5 janvier 2018
Modifié par Zoul67 le 17/09/2015 à 20:23
Excel n'est pas lourd pour créer un lien.
Si ton fichier Excel et tes pdf sont dans le même dossier, tu peux t'inspirer de ça :

https://www.cjoint.com/c/EIrsrcESqWV

J'ai utilisé des fichiers txt plutôt que pdf, c'était plus simple.
0
cs_Le Pivert Messages postés 7903 Date d'inscription jeudi 13 septembre 2007 Statut Contributeur Dernière intervention 11 mars 2024 728
17 sept. 2015 à 18:45
Vu ta réponse, je m'abstiendrai à l'avenir de répondre à tes posts
0
Viking58 Messages postés 186 Date d'inscription vendredi 5 décembre 2014 Statut Membre Dernière intervention 5 janvier 2018 7
17 sept. 2015 à 19:06
Pas de soucis...
0
eriiic Messages postés 24570 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 23 avril 2024 7 213
17 sept. 2015 à 19:13
Bonjour,

Il ne sera pas le seul...
eric
0