Bonjour,
Je souhaite insérer une image dans un formulaire. L'image est enregistré sur mon ordinateur à cette adresse là : C:\Users\Pierre\Documents\Paysage
L'image doit apparaître de manière aléatoire, j'ai 10 images enregistrées dans le dossier paysage.
Je ne sais pas si je dois mettre une variable à chemin_photo et si oui laquelle?
J'ai essayé d'écrire les instruction sur VBA mais cela ne fonctionne pas. Est ce que quelqu’un pourrait m'expliquer mon erreur.
Merci
Private Sub Image1_Click()
Dim nombre_aleatoire As Integer
Dim Nom_photo As Integer
Dim Chem_nom As String
Dim chemin_photo as ?
Randomize
nombre_aleatoire = Int(10 * Rnd) + 1
Nom_photo = nombre_aleatoire.Value
chemin_photo = "C:\Users\Pierre\Documents\Paysage\"
Chem_nom = chemin_photo & Nom_photo & ".jpg"
UserForm1.Frame1.Picture = LoadPicture(Chem_nom)
End Sub