J'insère des images avec l'instruction suivante:
'--------
Application.Dialogs(xlDialogInsertPicture).Show
'--------
Comment récupérer le nom d'origine de l'image ??
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Bouzou Le Clone
Bonjour,
Je ne sais pas, mais tu pourrais passer par :
Dim FileName FileName = Application.GetOpenFilename("Toutes les images " & _ "(*.bmp;*.jpg;*.jpeg;*.wmf;*.emf)," & _ "*.bmp;*.jpg;*.jpeg;*.emf;*.wmf", , "Insérer une image") If VarType(FileName) = vbBoolean Then Exit Sub ActiveSheet.Pictures.Insert(FileName).Select
Bouzou
"Jacky" a écrit dans le message de news:
Bonjour à tous
J'insère des images avec l'instruction suivante: '-------- Application.Dialogs(xlDialogInsertPicture).Show '-------- Comment récupérer le nom d'origine de l'image ??
Bonne soirée JJ
Bonjour,
Je ne sais pas, mais tu pourrais passer par :
Dim FileName
FileName = Application.GetOpenFilename("Toutes les images " & _
"(*.bmp;*.jpg;*.jpeg;*.wmf;*.emf)," & _
"*.bmp;*.jpg;*.jpeg;*.emf;*.wmf", , "Insérer une image")
If VarType(FileName) = vbBoolean Then Exit Sub
ActiveSheet.Pictures.Insert(FileName).Select
Bouzou
"Jacky" <delaenlevezjusqueiciJacky.jaeg@w......o.fr> a écrit dans le message
de news:OIuoq1hDFHA.3928@TK2MSFTNGP15.phx.gbl...
Bonjour à tous
J'insère des images avec l'instruction suivante:
'--------
Application.Dialogs(xlDialogInsertPicture).Show
'--------
Comment récupérer le nom d'origine de l'image ??
Dim FileName FileName = Application.GetOpenFilename("Toutes les images " & _ "(*.bmp;*.jpg;*.jpeg;*.wmf;*.emf)," & _ "*.bmp;*.jpg;*.jpeg;*.emf;*.wmf", , "Insérer une image") If VarType(FileName) = vbBoolean Then Exit Sub ActiveSheet.Pictures.Insert(FileName).Select
Bouzou
"Jacky" a écrit dans le message de news:
Bonjour à tous
J'insère des images avec l'instruction suivante: '-------- Application.Dialogs(xlDialogInsertPicture).Show '-------- Comment récupérer le nom d'origine de l'image ??
