Sauver une nouvelle image dans une userform

Bonjour,

j'ai un probleme avec une macro

je realise le changement d'image d'une userform a l'aide de la fonction

loadpicture

Toutefois, si je ferme le classeur, et que je l'ouvre a nouveau, dans ce cas, l'image de la userform n'est plus celle que j'avais changé

il y aeu une reinitialisation a la fermeture du classeur

Je desirerais garder la nouvelle image dans la userform apres reouverture du fichier

Pouvez vous m'aider s'il vous plait

merci d'avance

voici le bout de code que j'ai commencé

Sub wallpapernouvellesortie()

Dim wbk1 As Workbook

Dim images As String

Set wbk1 = ThisWorkbook

images = UserForm4.ComboBox2.Value

UserForm1.Picture = LoadPicture("D:\Roger\Dossier personnel\Vélo\Fonds d'ecran\Normaux\" & images & ".jpg")

MsgBox ("Le wallpaper de la fenêtre NOUVELLE DISTANCE a été changé par le wallpaper" & images & ".jpg")

wbk1.save

end sub

Salut le forum

Un petit effort Mister_T

Tu n'as qu'à cliquer sur ce lien : Joindre un fichier pour que l'on puisse t'aider, et recopier l'adresse sur ta ficelle.

Ou encore par là

http://www.cjoint.com/

Tu n'as qu'à cliquer sur ce lien : Joindre un fichier pour que l'on puisse t'aider,

et recopier l'adresse sur ta ficelle.

Rechercher des sujets similaires à "sauver nouvelle image userform"