Bonjour Gérard et un grand merci.
J’ai suivi tes instructions à la lettre mais je croix commettre encore des erreurs :
• Le document Word que je tente d’insérer dans Excel DV 1P27L (copie jointe) est : Module DV (copie Jointe)
• Dans Excel Insertion/Texte/Objet
o Créer à partir du fichier
o Parcourir
o Nom du Fichier : c:\Users\f100\Documents\Professionnel\Module DV.doc
o Afficher sous forme d’icône
o L’icône est bien présent en bas à droite
o Valider avec OK
o L’Icône est bien présent sur la feuille Excel (voir copie jointe)
o Clic droit sur l’Icône
o Affecter une Macro
o Valider avec OK : Feuille2.Objet1_Cliquer
o La MACRO Objet1_Cliquer ainsi modifiée :
Sub Objet1_Cliquer()
Const cName = "Objet1_Cliquer" 'A adapter au nom du lien document dans la feuille
Const cCellule = "A24" 'A adapter à l'adresse de la cellule à laquelle le lien document est attaché
Dim o As Shape
Dim oRange As Range
Set oRange = ActiveSheet.Range(cCellule)
Set o = ActiveSheet.Shapes(cName)
o.Top = oRange.Top
o.Left = oRange.Left
o.OLEFormat.Activate
End Sub
• Message d’erreur :
o Erreur Système &H80070057 (-2147024809). Paramètre incorrect.
o Copié ce message et une fois collé sur Excel il demeure verrouillé
Je te saurais gré de ton aide en espérant de ne pas trop déranger avec mes limites.
Bien cordialement
Rubens GASTALDI