Insertion d'image prédéfinie

tartare2009 -  
lermite222 Messages postés 9042 Statut Contributeur -
Bonjour à tous,
malgré mes recherche je n'ai pas trouver de réponse à mon problème.
Voila, j'ai un fichier excel auquel je dois rajouter des images sur une plage prédefinie. Je lance une macro durant la création de ce fichier et un userform s'ouvre pour me demander quel type de fichier je veux créer (exemple: gestion bureau, gestion maison, gestion temps libre; Les 3 fichiers sont pratiquement identiques.)

Bref sur je choisi l'un des fichier sur le userform je veux que s'insère une image (présente dans un dossier) sur une plage prédefinie (type: A1:k2).

Mais je ne veux pas avoir à choisir l'image dans mon dossier.Je veux que tout soit automatique.

Je suis malheuresement pas super fort sur Visual Basic et mes macros, meme si elles font le bonheur de mon patron ne sont pas aussi évoluée que celles que j'ai vu sur le site.

Merci de m'aider.
A voir également:

1 réponse

lermite222 Messages postés 9042 Statut Contributeur 1 191
 
Bonjour,
Un ti exemple ?
Sub KK()
    With Sheets("Feuil1")
        .Range("A1").Select
        .Pictures.Insert("C:\Repertoir\Image.JPG").Select
        Selection.Height = .Rows(3).Top
        Selection.Width = .Columns(12).Left
        Selection.Placement = xlMoveAndSize 'Ajuste l'image au modif colonnes et lignes
    End With
End Sub

A+
0