max.g
XLDnaute Nouveau
Bonjour,
J'ai crée une macro réalisant l'insertion de mon PDF, cela fonctionne bien cependant j'aimerais qu'une fois le PDF insérer dans ma feuille, il prenne la taille d'un groupe de cellule exemple : de L8:N11.
Deuxième chose, lorsque je quitte la fenêtre qui s'ouvre sans sélectionner de PDF, cela me met une erreur du type "Impossible de démarrer l'application source de cet objet ", comment résoudre ce problème ?
Voiçi mon bout de code :
With Range("L8:N11").Select
ActiveSheet.OLEObjects.Add(ClassType:="AcroExch.Document.DC", Link:=False, _
DisplayAsIcon:=False).Activate
ActiveSheet.Shapes("").ScaleHeight 0.3760282021, msoFalse, _
msoScaleFromTopLeft
Je vous remercie par avance.
Cordialement Max.
J'ai crée une macro réalisant l'insertion de mon PDF, cela fonctionne bien cependant j'aimerais qu'une fois le PDF insérer dans ma feuille, il prenne la taille d'un groupe de cellule exemple : de L8:N11.
Deuxième chose, lorsque je quitte la fenêtre qui s'ouvre sans sélectionner de PDF, cela me met une erreur du type "Impossible de démarrer l'application source de cet objet ", comment résoudre ce problème ?
Voiçi mon bout de code :
With Range("L8:N11").Select
ActiveSheet.OLEObjects.Add(ClassType:="AcroExch.Document.DC", Link:=False, _
DisplayAsIcon:=False).Activate
ActiveSheet.Shapes("").ScaleHeight 0.3760282021, msoFalse, _
msoScaleFromTopLeft
Je vous remercie par avance.
Cordialement Max.