Comment produire un nombre aléatoire sous VBA

  • Initiateur de la discussion Initiateur de la discussion Eddy92
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

E

Eddy92

Guest
Bonjour,
Je ne retrouve plus la façon de produire des nombres aléatoires à partir de la programmation sous VBA (excel 2003). J’ai essayé « RAND() », mais ça ne marche pas . Je pense qu’il doit bien exister une façon de procéder, indépendamment de celle consistant à utiliser la fonction ALEA() directement dans la feuille de calcul. Merci d’avance pour vos indications ou orientations .
 
Re : Comment produire un nombre aléatoire sous VBA

Hello,

Comme ceci, me rappelle plus qui est l'auteur... M. Toutlemonde
Code:
Private Sub CommandButton1_Click()

    Dim x
    Dim i As Integer

    Randomize

    For i = 1 To 10' Vitesse d'exécution
        x = Int((100 * Rnd) + 1)' De 1 à 100
        Range("A1").Value = x
    Next i

End Sub
 
Dernière édition:
Re : Comment produire un nombre aléatoire sous VBA

Bonsoir


Histoire de s'amuser 🙂


Code:
Sub AlleA()
Dim un_nombre_hazardeux As Double
Randomize
un_nombre_hazardeux = Int(Rnd * 10000) + 1
MsgBox un_nombre_hazardeux
End Sub

PS: faire une recherche sur les différents réponses de ROGER2327 sur ce forum à ce sujet pour des exemples plus aboutis.
 
suite généralisation : articulation code et feuille

Merci Hulk et Staple1600(JM) pour votre réponse
correspondant exactement à ce que je cherchais.
Pour bien utiliser VBA, je réalise que j'ai besoin de comprendre l'articulation et le fonctionnement des liens entre la feuille et le code ( derrière le bouton de commande).
Pouvez-vous m'indiquer un site donnant un cours de base ( gratuit) bien expliqué avec exemples pour débutant un peu âgé .
J'ai besoin d'explications de base sur les fonctionnalités disponibles dans la rédaction du code derrière un bouton, les correspondances à respecter entre les feuilles et les codes etc...
merci pour vos conseils et orientation.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

N
Réponses
4
Affichages
950
N
N
Réponses
4
Affichages
796
Nicoww
N
T
Réponses
10
Affichages
2 K
Totor43
T
M
Réponses
0
Affichages
679
M
D
Réponses
2
Affichages
2 K
D
Z
Réponses
3
Affichages
2 K
Z
J
  • Question Question
Réponses
0
Affichages
797
James Dean
J
D
  • Question Question
Réponses
3
Affichages
5 K
Retour