Sujet Précédent Sujet Suivant

Excel probleme

er -  
ccm81 Messages postés 11033 Statut Membre -
Bonjour,
Comment fait on pour qu'il y ait ecrit, sous excel
Alea borne(1;9) tel que Valeur<>cellule d'a cote

A voir également:

2 réponses

Réponse 1 / 2
Cacadu68
 
Tu écris en A1
Alea borne(1;9) tel que Valeur<>cellule d'a cote
0
Réponse 2 / 2
ccm81 Messages postés 11033 Statut Membre 2 434
 
bonjour

peut être en passant avec une macro à mettre dans un module
Alt-F11 pour acceder à l'éditeur/Insertion/module/copier-coller le code
à uiliser dans la feuille comme une fonction excel
ex. pour un entier aleatoire de 2 à 9 différent de 3
=aleadiff(2;9;3) 

Public Function aleadiff(mini, maxi, diffde) As Long
Dim a As Long
Do
  a = mini + Int((maxi - mini + 1) * Rnd)
Loop Until a <> diffde
aleadiff = a
End Function


bonne suite
0