Bonjour,
J'aimerais savoir s'il serait possible d'insérer un pdf dans une cellule prédéfinie à l'aide d'une macro?
J'arrive à insérer un pdf mais seulement dans la cellule active. Voici mon code :
Sub insertpdf()
fileToOpen = Application.GetOpenFilename("pdf Files (*.pdf), *.pdf")
If fileToOpen <> False Then
ActiveSheet.OLEObjects.Add(Filename:= fileToOpen, Link:=False, DisplayAsIcon:=False).Select
Selection.ShapeRange.ScaleWidth 0.54, msoFalse, msoScaleFromTopLeft
Selection.ShapeRange.ScaleHeight 0.4, msoFalse, msoScaleFromTopLeft
Else
MsgBox "pas de fichier selectionné"
End If
End Sub
Etant novice en VBA, je me permets de solliciter votre aide.