Vba excel au hasare

Résolu
bobtipitt Messages postés 63 Statut Membre -  
bobtipitt Messages postés 63 Statut Membre -
Bonjour, 
 Range("D4").Value = WorksheetFunction.Round(Rnd() * 6, 0)

Sa c'est un code pour mettre des nombres aux hasares de 0 à 6 en vba
Comment je fais pour que les nombres sois de 1 à 6
--
Etienne l-L
Configuration: Windows XP
Internet Explorer 7.0

2 réponses

  1. amnesic
     
    bonjour,
    Range("D4").Value = WorksheetFunction.Round(Rnd() * 5, 0) + 1
    c'est pour jouer aux dés ?
    A+
    0
  2. bobtipitt Messages postés 63 Statut Membre 2
     
    oui je fait un jeu de monopolie j'ai besoin de dée
    Merci ton code marche
    Ha oui j'oubliait, en parlent de monopolie as-tu un jeu de monopolie sur excel que je pourait prendre (telecharger) comme exemple
    0