J'ai le code suivant, il marche très bien mais je voudrais que le résultat s'affiche dans une case précise.

Pouvez-vous m'aider

merci

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub code_alea()
'generer-code-aleatoire
Randomize
 carac = "ABCD1234" 'définir les caractères à utiliser dans le code
 lettre_aleatoire = ""
 For i = 1 To 10 'déterminer le nombre de chiffre ou lettre
nombre_aleatoire = Int(Len(carac) * Rnd) + 1
lettre_aleatoire = lettre_aleatoire & Mid(carac, nombre_aleatoire, 1)
Next
MsgBox lettre_aleatoire
End Sub