Mise en forme condit. & Nb Premier [PLZ]

bonjour

Je cherche, dans une liste de nombre, à faire apparaitre en couleur les nombre qui, seraient premiers

J'ai eu beau chercher, je ne trouve pas

Par ailleurs, je cherche a faire la meme chose avec les cellules qui auraient pour valeur des nombres entiers (sans décimale = ces cellules affichent une valeur non saisie mais issue d'un calcul)

Help help

Merci d'avance

PS : la recherche de Nb premier est dans l'onglet "fibonacci"

ps 2 = la mise en forme conditionnelle selon que le résultat dans une cellule est entier ou pas ne concerne pas ce classeur mais reste l'objet (partiel) de ma question

Bonjour,

Il y a surement un moyen de faire.

La première chose est de joindre un fichier

Leakim

leakim a écrit :

Bonjour,

Il y a surement un moyen de faire.

La première chose est de joindre un fichier

Leakim

[lien périmé]

bonjour,

excel n'a pas de fonction permettant de déterminer si un nombre est premier ou non

voici une fonction personnalisée. à insérer dans un module VBA; Tu epux ensuite utiliser cette formule pour ta mise en forme conditionnelle

=isprime(A1)

tu remarqueras que tes calculs perdent de la précision à partir de A75 et cela n'a donc plus de sens d'utiliser cette formule à partir de cette cellule.

Function isprime(n As Double) As Boolean
If n < 3 Then isprime = True: Exit Function
For i = 3 To Int(Sqr(n)) step 2
 If n / i = Int(n / i) Then isprime = False: Exit Function
Next i
isprime = True
End Function

h2so4 a écrit :

bonjour,

excel n'a pas de fonction permettant de déterminer si un nombre est premier ou non

voici une fonction personnalisée. à insérer dans un module VBA; Tu epux ensuite utiliser cette formule pour ta mise en forme conditionnelle

=isprime(A1)

tu remarqueras que tes calculs perdent de la précision à partir de A75 et cela n'a donc plus de sens d'utiliser cette formule à partir de cette cellule.

Function isprime(n As Double) As Boolean
If n < 3 Then isprime = True: Exit Function
For i = 2 To Int(Sqr(n))
 If n / i = Int(n / i) Then isprime = False: Exit Function
Next i
isprime = True
End Function

oui merci je n'avais pas remarqué. Pur ce qui est de la mise en forme, je n'ai rien compris (arf.. je n'y connais rien en VBA)

dj-ry a écrit :

h2so4 a écrit :

bonjour,

excel n'a pas de fonction permettant de déterminer si un nombre est premier ou non

voici une fonction personnalisée. à insérer dans un module VBA; Tu peux ensuite utiliser cette formule pour ta mise en forme conditionnelle

=isprime(A1)

tu remarqueras que tes calculs perdent de la précision à partir de A75 et cela n'a donc plus de sens d'utiliser cette formule à partir de cette cellule.

Function isprime(n As Double) As Boolean
If n < 3 Then isprime = True: Exit Function
For i = 3 To Int(Sqr(n)) step 2
 If n / i = Int(n / i) Then isprime = False: Exit Function
Next i
isprime = True
End Function

oui merci je n'avais pas remarqué. Pur ce qui est de la mise en forme, je n'ai rien compris (arf.. je n'y connais rien en VBA)

Bonsoir,

je t'ai mis la fonction dans ton fichier ainsi que la MFC pour les 75 premiers éléments de ta suite.

Bonsoir @ tous,

@ h2so4,

Les nombres 0 et 1 ne sont ni premiers ni composés.

donc le "< 3" va les prendre en compte

@ + +

bonsoir,

de même tous les nombres négatifs seront considéres comme premiers.

voici une correction

Function isprime(n As Double) As Boolean
If n < 2 Then Exit Function
If n = 2 Then isprime = True : exit function
If n Mod 2 = 0 Then Exit Function
For i = 3 To Int(Sqr(n)) Step 2
 If n / i = Int(n / i) Then Exit Function
Next i
isprime = True
End Function

Bonjour à tous,

Une petite recherche sur la toile

Il existe une fonction ESTPREMIER() dans un module complémentaire d'excel.

Le lien suivant, très didactique, vous explique la marche à suivre.

http://mathematiques.ac-bordeaux.fr/profplus/logiplus/tableur/fonc_sup_xl/arithmetique.htm

il te reste dans ta MFC à mettre =ESTPREMIER(A1) et appliquer à toute ta plage.

Cordialement,

Leakim

Ps: Cela étant dit, la macro de h2so4 fonctionne parfaitement !!!

R@chid a écrit :

Bonsoir @ tous,

@ h2so4,

Les nombres 0 et 1 ne sont ni premiers ni composés.

donc le "< 3" va les prendre en compte

@ + +

hihih super extra merci merci merci !!!