Maison >Tutoriel logiciel >Logiciel de bureau >Comment générer des nombres aléatoires pour les colocataires à l'aide d'Excel
Sub CreateRND()
Dim arr() As Integer 'Définir un tableau
ReDim arr(range("d3").Value) 'Modifier la taille du tableau
Dim min As Integer 'Définit la valeur minimale d'un nombre aléatoire
Dim max As Integer 'Définit la valeur maximale des nombres aléatoires
Dim flag As Boolean 'Définissez la variable flag pour déterminer s'il existe des valeurs en double
max = range("d2").Value 'Attribue la valeur de la cellule d2 à la valeur maximale
min = range("d1").Value 'Attribue la valeur de la cellule d1 à la valeur minimale
If (max - min + 1
Quitter le sous-marin
Fin si
Randomize (Now()) 'Génère une valeur de départ aléatoire en utilisant l'heure actuelle
Pour i = 0 To range("d3").Value 'Boucle pour générer des nombres aléatoires
Faire
arr(i) = Rnd() * (max - min) + min 'Générer des nombres aléatoires
drapeau = Faux
For j = 0 To (i - 1) 'Boucle pour déterminer si le nombre aléatoire actuel est le même que le nombre aléatoire généré précédemment, et s'il est identique, régénérez-le
Si (arr(i) = arr(j)) Alors
drapeau = Vrai
Fin si
Suivant
Boucle pendant le drapeau
Suivant
Colonnes ("A:A").ClearContents
range("a1").Resize(range("d3").Value) = Application.Transpose(arr) 'Résultat de sortie
Fin du sous-marin
1. Calculez d’abord la différence dans cette plage. On suppose ici que la valeur de la plage est un nombre aléatoire compris entre 50 et 100
2. Ouvrez la feuille de calcul et entrez la formule suivante dans la cellule où vous souhaitez générer des nombres aléatoires : =rand()*(100-50)+50. Appuyez sur le bouton de confirmation pour générer un nombre aléatoire dans la plage spécifiée !
3. Si vous devez générer plusieurs nombres aléatoires, faites simplement glisser le petit triangle dans le coin inférieur de la cellule !
Microsoft Excel est l'un des composants du logiciel Microsoft Office. Il s'agit d'un tableur écrit et exécuté par Microsoft pour les ordinateurs équipés des systèmes d'exploitation Windows et Apple Macintosh. La première version a été développée en 1985.
Microsoft Excel peut effectuer diverses opérations de traitement de données, d'analyses statistiques, d'aide à la décision, etc. Il dispose de fonctions telles que l'ouverture ou la fermeture des lignes d'en-tête de tableau, le calcul de colonnes pour ajuster chaque ligne à l'aide d'une formule unique, le tri et le filtrage des données, la personnalisation formules et saisie de texte. À l'heure actuelle, Microsoft Excel est largement utilisé dans de nombreux domaines tels que la gestion, les statistiques et la finance.
Ce qui précède est le contenu détaillé de. pour plus d'informations, suivez d'autres articles connexes sur le site Web de PHP en chinois!