VBA - Erreur d'exécution 91
Bonsoir,
Je suis un étudiant qui essaye d'apprendre le VBA, je parcours sur internet des tutos qui m'aiderai dans mon apprentissage,
Je suis venu à essayer de crée un bouton(ActiveX) permettant d'afficher une image suivant un nom inscrit dans une liste déroulante sur Excel comme le nom l'indique,
Lorsque j'essaye de le tester il m'affiche un message d'erreur 91- variable d'objet ou variable de bloc with non définie,
J'ai essayer de retirer une à une les lignes et de le tester et bizarrement le message s'affiche toujours
Je vous mets les lignes, il y aura sans doutes des choses flagrantes que je ne perçois pas.
```VBA
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
| Private Sub CmdImage_Click()
Dim chemin As String
Dim NomImage As String
Dim Image As String
chemin = "D:\Users\apachecobasson\Pictures\Photos\"
NomImage = Range("A8")
Image = ".png"
Range("C14").Value = NomImage
ActiveSheet.Shapes.AddPicture Filename:=chemin + NomImage + Image, linktofile:=msoFalse, savewithdocument:=msoTrue, Left:=70, Top:=40, Width:=150, Height:=140
End Sub |
```
J'espère qu'une personne pourra me venir en aide,
Je vous en remercie,
Antonin
