Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
MichD
Bonjour,
Comme expliquer dans le fil que tu as trouvé,
Tu insères un objet (fichier PDF) sous la forme d'une icône (menu du ruban : Insertion / section : Texte / commande : Object Onglet : créer à partir du fichier Le bouton "parcourir pour retrouver le fichier que tu veux insérer dans la feuille de calcul et tu coches dans la même fenêtre la case à cocher "afficher sous la forme d'une icône" et tu fermes par OK.
Dans un deuxième temps, tu insères dans le module de cette feuille la macro suivante. Un clic droit sur l'onglet de la feuille et tu choisis la commande "visualiser le code" et tu insères cette macro dans la page blanche!
Tu dois adapter le nom "Object 2" pour le nom réel de l'objet que tu as inséré visible dans la section extrême gauche de la barre de formule lorsque l'objet est sélectionné.
Lorsque tout est fait, tu fais un clic droit sur l'objet, commande : "affecter une macro" et tu choisis dans la fenêtre ouvrante, la macro que tu viens d'insérer dans ledit module de la feuille.
Maintenant, à chaque fois que tu vas cliquer sur l'objet, il va s'ouvrir.
'-------------------------------- Sub test() Me.OLEObjects("Object 2").Verb xlPrimary End Sub '--------------------------------
Tu insères un objet (fichier PDF) sous la forme d'une icône
(menu du ruban : Insertion / section : Texte / commande : Object
Onglet : créer à partir du fichier
Le bouton "parcourir pour retrouver le fichier que tu veux insérer
dans la feuille de calcul et tu coches dans la même fenêtre la case
à cocher "afficher sous la forme d'une icône" et tu fermes par OK.
Dans un deuxième temps, tu insères dans le module de cette feuille
la macro suivante. Un clic droit sur l'onglet de la feuille et tu choisis
la commande "visualiser le code" et tu insères cette macro dans la page
blanche!
Tu dois adapter le nom "Object 2" pour le nom réel de l'objet que tu as
inséré visible dans la section extrême gauche de la barre de formule
lorsque l'objet est sélectionné.
Lorsque tout est fait, tu fais un clic droit sur l'objet,
commande : "affecter une macro" et tu choisis dans la fenêtre ouvrante,
la macro que tu viens d'insérer dans ledit module de la feuille.
Maintenant, à chaque fois que tu vas cliquer sur l'objet, il va s'ouvrir.
'--------------------------------
Sub test()
Me.OLEObjects("Object 2").Verb xlPrimary
End Sub
'--------------------------------
Tu insères un objet (fichier PDF) sous la forme d'une icône (menu du ruban : Insertion / section : Texte / commande : Object Onglet : créer à partir du fichier Le bouton "parcourir pour retrouver le fichier que tu veux insérer dans la feuille de calcul et tu coches dans la même fenêtre la case à cocher "afficher sous la forme d'une icône" et tu fermes par OK.
Dans un deuxième temps, tu insères dans le module de cette feuille la macro suivante. Un clic droit sur l'onglet de la feuille et tu choisis la commande "visualiser le code" et tu insères cette macro dans la page blanche!
Tu dois adapter le nom "Object 2" pour le nom réel de l'objet que tu as inséré visible dans la section extrême gauche de la barre de formule lorsque l'objet est sélectionné.
Lorsque tout est fait, tu fais un clic droit sur l'objet, commande : "affecter une macro" et tu choisis dans la fenêtre ouvrante, la macro que tu viens d'insérer dans ledit module de la feuille.
Maintenant, à chaque fois que tu vas cliquer sur l'objet, il va s'ouvrir.
'-------------------------------- Sub test() Me.OLEObjects("Object 2").Verb xlPrimary End Sub '--------------------------------
Malheureusement après avoir suivis exactement ce qui est dit, j'ai le message d'erreur suivant :
Erreur d'exécution '1004':
Impossible de lire la propriété OLEObjects de la classe Worksheet.
Merci d'avance pour votre aide.
Sylvain
Parfait !
En faite je faisais l'erreur sur le nom du fichier. Au lieu de mettre Objet 1, 2, .... je mettais en faite le nom réel du fichier (GNT.pdf par exemple).
Merci.
Le samedi 07 Décembre 2013 à 00:13 par Silvinio :
Bonjour,
Suite a mes recherches je suis tombé sur cette discussion :
Malheureusement après avoir suivis exactement ce qui est dit, j'ai le
message d'erreur suivant :
Erreur d'exécution '1004':
Impossible de lire la propriété OLEObjects de la classe
Worksheet.
Merci d'avance pour votre aide.
Sylvain
Parfait !
En faite je faisais l'erreur sur le nom du fichier. Au lieu de mettre Objet 1, 2, .... je mettais en faite le nom réel du fichier (GNT.pdf par exemple).
Malheureusement après avoir suivis exactement ce qui est dit, j'ai le message d'erreur suivant :
Erreur d'exécution '1004':
Impossible de lire la propriété OLEObjects de la classe Worksheet.
Merci d'avance pour votre aide.
Sylvain
Parfait !
En faite je faisais l'erreur sur le nom du fichier. Au lieu de mettre Objet 1, 2, .... je mettais en faite le nom réel du fichier (GNT.pdf par exemple).
