Donner un nombre aléatoire en vbs

Résolu/Fermé
florentcoco02 Messages postés 93 Date d'inscription mardi 1 novembre 2016 Statut Membre Dernière intervention 17 avril 2024 - 10 nov. 2021 à 20:17
Whismeril Messages postés 19047 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 25 mai 2024 - 12 nov. 2021 à 11:34
Bonsoir,
Je voudrais coder un nombre aléatoire entre 1 et 100 en vbs. Pourtant j'ai cherché sur le forum mais rien ne correspond à ce que je cherche. Pouvez-vous m'aider ou joindre un site qui répondra à mes questions s'il vous plaît.
Merci bonne soirée.

9 réponses

Whismeril Messages postés 19047 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 25 mai 2024 913
10 nov. 2021 à 20:20
Bonjour

Vbs et vba sont assez proche pour ce que ne concerne pas l’application hote de vba.
As tu cherché en vba?
0
florentcoco02 Messages postés 93 Date d'inscription mardi 1 novembre 2016 Statut Membre Dernière intervention 17 avril 2024 5
11 nov. 2021 à 11:44
Je crois que VBA c'est avec Excel, moi c'est avec bloc notes en VBS.
0
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707
11 nov. 2021 à 06:51
Bonjour a vous deux,

Si vous voulez un nombre aleatoire entre 1 et 100
A voir:

https://forum.hardware.fr/hfr/Programmation/VB-VBA-VBS/generer-nombre-aleatoire-sujet_91274_1.htm
0
florentcoco02 Messages postés 93 Date d'inscription mardi 1 novembre 2016 Statut Membre Dernière intervention 17 avril 2024 5
Modifié le 11 nov. 2021 à 11:59
Bonjour,

J'ai trouvé un lien qui permet de générer un nombre aléatoire:
https://stackoverflow.com/questions/18296503/vbscript-how-to-generate-a-random-number-then-an-if-statement-to-use-this-num/18296580d
Par contre c'est en anglais.

Merci quand même et bonne journée.
0
Whismeril Messages postés 19047 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 25 mai 2024 913
11 nov. 2021 à 12:18
VBA c'est avec Excel, mais aussi avec Word, powerpoint, Autocad et pleins d'autres encore, ce sont les applications hôtes.
Mais la majorité des instructions qui ne concernent pas l'application hôte sont les mêmes en VBA, VBS et souvent VB6 (mais pas VB.Net)

D'ailleurs le lien que t'as donné f894009 (hello ça flotte ;) ) t'as donné marque bien VB-VBA-VBS...
De fait, dans ce lien, c'est que Galopin montre un code qui marche pour ces 3 VB qui donne un nombre entre 1 et 6 (un dé quoi) et prisonner propose un code qu'il donne pour VBA (mais qui est valable pour les 3) qui donne un nombre dans une plage donnée.
Tout ça expliqué en français

Donc en fait, si tu avais suivi mon conseil hier, ou regardé le lien de f894009 ce matin, tu aurais gagné du temps et tu ne te serais pas "embêté" avec
Par contre c'est en anglais.


De rien quand même
0
f894009 Messages postés 17191 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 20 mai 2024 1 707 > Whismeril Messages postés 19047 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 25 mai 2024
12 nov. 2021 à 06:45
Bonjour Whismeril,

Eh oui, toujours sous le vent..
0
florentcoco02 Messages postés 93 Date d'inscription mardi 1 novembre 2016 Statut Membre Dernière intervention 17 avril 2024 5
Modifié le 11 nov. 2021 à 20:16
D'ailleurs je voulais savoir aussi. Si je veux mettre le message du genre "Le nombre est:". Tu sais où je dois mettre dans le code ?
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
Whismeril Messages postés 19047 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 25 mai 2024 913
11 nov. 2021 à 20:51
J'enfonce une porte ouverte, après la génération.

Après ça dépend de comment tu l'as codé
0
florentcoco02 Messages postés 93 Date d'inscription mardi 1 novembre 2016 Statut Membre Dernière intervention 17 avril 2024 5
12 nov. 2021 à 09:35
Dim max,min,rand
max=100
min=1
Randomize
rand = Int((max-min+1)*Rnd+min)
WScript.Echo rand
0
Whismeril Messages postés 19047 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 25 mai 2024 913
12 nov. 2021 à 10:46
Alors, je dirais
Dim max,min,rand 
max=100 
min=1 
Randomize 
rand = Int((max-min+1)*Rnd+min) 
WScript.Echo « Le nombre est «  & rand 

0
Whismeril Messages postés 19047 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 25 mai 2024 913
12 nov. 2021 à 10:47
Ha zut, les guillemets merdouillent depuis ma tablette, mais c’est l’idée
0
florentcoco02 Messages postés 93 Date d'inscription mardi 1 novembre 2016 Statut Membre Dernière intervention 17 avril 2024 5
12 nov. 2021 à 11:20
C'est exactement ce que je voulais. Merci pour ton aide ???? Je suis pas trop fort en programmation mais tu m'as aidé quand même ????.
0
Whismeril Messages postés 19047 Date d'inscription mardi 11 mars 2003 Statut Contributeur Dernière intervention 25 mai 2024 913
12 nov. 2021 à 11:34
de rien
0