[VBA-E]probleme Insert image

bonjour,

j'ai un problème avec ce code j'ai toujours une erreur pouvez vous me dire d'où ça provient

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 03/04/2006 por SUPPORTER
'
 
'
 
    ' declaration des variables
 
    Dim test As String
    Dim name As String
 
    ' supprimer les photos en cours
    ActiveSheet.Pictures.Delete
 
 
    ' récupérer le nom dans la case
    test = ActiveCell.Text
 
 
    'ajouter l'extencion au nom
    name = test + ".jpg"
 
 
    ' choisir la cellule du coin supérieur gauche de votre image :
    Range("C3").Select
 
    ' insérer la photo avec le nom désiré :
    ActiveSheet.Pictures.Insert(name).Select
End Sub

l'erreur est la suivante impossible de lire la proprieté insert de la class picture

Pouvez vous m'aider

Merci beaucoup

le nom de fichier donné par name ne doit pas être bon

Ok merci

mais est ce que je dois mettre un truc du genre
c:/documents/photos....à la place du mot test ?
merci beaucoup

A+