Comment vérifier si un nombre est premier dans Excel ?
Comme chacun le sait, un nombre premier est un nombre naturel qui possède exactement deux diviseurs distincts : 1 et lui-même. Si vous avez une liste de nombres dans une feuille de calcul, comment pouvez-vous déterminer s’ils sont premiers ?
Vérifier si un nombre est premier à l’aide d’une formule matricielle
Vérifier si un nombre est premier à l’aide d’une fonction personnalisée
Vérifier si un nombre est premier à l’aide d’une formule matricielle
La formule suivante vous permet de déterminer si un nombre est premier ou non. Procédez comme suit :
1. Saisissez la formule suivante dans une cellule vide – par exemple en C2, à côté de vos données :
=IF(A2=2,«Prime»,IF(AND(MOD(A2,ROW(INDIRECT("2:"&ROUNDUP(SQRT(A2),0))))<>0),«Prime»,«Not Prime»)) (A2 est la cellule contenant le nombre que vous souhaitez vérifier), puis appuyez simultanément sur Ctrl + Maj + Entrée. Le résultat s’affichera aussitôt : « Premier » si le nombre est premier, « Non premier » dans le cas contraire. Voir capture d’écran :
2. Sélectionnez ensuite la cellule C2, puis faites glisser la poignée de recopie vers les cellules auxquelles vous souhaitez appliquer cette formule : tous les nombres seront ainsi identifiés comme premiers ou non. Voir la capture d’écran :
Libérez la magie d’Excel avec Kutools IA
- Exécution intelligente : effectuez des opérations sur les cellules, analysez des données et créez des graphiques, le tout à partir de commandes simples.
- formules personnalisées : créez des formules sur mesure pour rationaliser vos flux de travail.
- Programmation VBA : Écrivez et implémentez du code VBA en toute simplicité.
- Interprétation de formules : Décryptez facilement les formules complexes.
- Traduction de texte : Franchissez les barrières linguistiques directement depuis vos feuilles de calcul.
Vérifier si un nombre est premier à l’aide d’une fonction personnalisée
La fonction personnalisée suivante peut également vous aider à déterminer si des nombres sont premiers ou non. Procédez comme suit :
1. Maintenez enfoncées les touches Alt + F11 pour ouvrir la fenêtre Microsoft Visual Basic pour Applications.
2. Cliquez sur Insertion > Module, puis collez le code suivant dans la fenêtre du module.
Code VBA : Vérifier si un nombre est premier ou non :
Function CheckPrime(Numb As Single) As Boolean
'Updateby Extendoffice
Dim X As Long
If Numb < 2 Or (Numb <> 2 And Numb Mod 2 = 0) _
Or Numb <> Int(Numb) Then Exit Function
For X = 3 To Sqr(Numb) Step 2
If Numb Mod X = 0 Then Exit Function
Next
CheckPrime = True
End Function
3. Ensuite, sauvegardez et fermez ce code, revenez à la feuille de calcul, puis saisissez la formule suivante : =checkprime(A2) dans une cellule vide située à côté de votre liste de nombres. Faites ensuite glisser la poignée de recopie vers les cellules où vous souhaitez appliquer cette formule. Si le nombre est premier, la valeur VRAI s’affichera ; sinon, c’est FAUX qui apparaîtra. Voir la capture d’écran :
Meilleurs outils de productivité Office
Boostez vos compétences Excel avec Kutools pour Excel et découvrez une efficacité inégalée.Kutools pour Excel propose plus de 300 fonctionnalités avancées pour améliorer votre productivité et Gagner du temps.Cliquez ici pour obtenir la fonctionnalité dont vous avez le plus besoin...
Office Tab apporte une interface à onglets à Office et rend votre travail bien plus facile
- Activez l’édition et la lecture par onglets dans Word, Excel, PowerPoint, Publisher, Access, Visio et Project.
- Ouvrez et créez plusieurs documents dans de nouveaux onglets de la même fenêtre, plutôt que dans de nouvelles fenêtres.
- Augmente votre productivité de 50 % et vous fait économiser des centaines de clics de souris chaque jour !
Tous les compléments Kutools. Un seul installateur
Kutools for Office regroupe les compléments pour Excel, Word, Outlook et PowerPoint, ainsi que Office Tab Pro, ce qui en fait le choix idéal pour les équipes travaillant à travers les applications Office.
- Suite tout-en-un— Compléments Excel, Word, Outlook et PowerPoint + Office Tab Pro
- Un seul installateur, une seule licence— installation en quelques minutes (compatible MSI)
- Fonctionne mieux ensemble— productivité optimisée dans toutes les applications Office
- Essai gratuit de 30 jours avec toutes les fonctionnalités— aucune inscription, aucune carte bancaire
- Meilleur rapport qualité-prix— économisez par rapport à l’achat de compléments individuels