[ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

[Staple1600]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Re à tous


En creusant cette histoire de nombres narcissiques, je suis tombé sur ce mathématicien : Kaprékar et sa fameuse constante

Le webinet des curiosités: Les meilleures recettes de Kaprekar
http://mathenjeans.free.fr/amej/edition/actes/actespdf/91088090.pdf

Si le cœur vous en dit, je serai heureux de découvrir vos façons (par formule et/ou VBA) d'arriver à ce fameux 6174

De mon côté, c'est ce à quoi je m'amuserai ce matin.

Bon week-end à tous.

PS: je n'ai pas ouvert d'autre fil pour ce nouvel algo car on reste dans dans le même thème.

EDITION:
ROGER2327: chez vous, vos codes s'exécutent sans problème ?

 

[JCGL]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Bonjour à tous,

Très intéressant Webinet !!!

Un essai par formules qui peuvent être réduites.

A+ à tous

 

[Staple1600]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Bonjour JCGL


Merci de ton passage ici (et pour ta pj)

Voici mon interprétation avec formules nommées

J'ai un petit souci pour gérer l'affichage dans les cellules
quand on arrive à 6174

(voir la pj )

PS: merci à job75 pour son tricell (c'était dans the 24 game ... )

Je passerai après déjeuner à une version VBA

Bon appétit à tous


PS: JCGL: les codes de ROGER2327 s'exécutent-ils sans problème chez toi ?

 

[Staple1600]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Re

A propos de Kaprekar
En cherchant sur le net, j'ai trouvé une interprétation sous Excel qui utilise une seule formule sans colonnes supplémentaires ( )

Saurez-vous la trouver ?
Elle utilise les fonctions suivantes: SOMME, GRANDE.VALEUR ,TEXTE, STXT
et des matrices

Fonctionnement
en A1 on saisit le un nombre de 4 chiffres
en A2 la fameuse formule
puis on recopie vers le bas jusqu'en A10

et c'est tout !!


Un indice: exemple issu d'un bouquin cité dans un fil récent du forum.

 

[JCGL]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Bonjour à tous,

Oui les codes de Roger fonctionnent chez moi avec les mêmes réserves que vous : lenteur au bout du 24 mais cela est normal

Un essai avec, encore, quatre colonnes supplémentaires ... et :

=SI(A1="";"";(GRANDE.VALEUR($B1:$E1;1)&GRANDE.VALEUR($B1:$E1;2)&GRANDE.VALEUR($B1:$E1;3)&GRANDE.VALEUR($B1:$E1;4))*1-(PETITE.VALEUR($B1:$E1;1)&PETITE.VALEUR($B1:$E1;2)&PETITE.VALEUR($B1:$E1;3)&PETITE.VALEUR($B1:$E1;4))*1)

A+ à tous

 

[Staple1600]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Re


Pas mal JCGL

PS: la formule dont je parle utilise "l'algorithme de Kaprekar" justement.
Et on en trouve des exemples sur le net
On peut finir par trouver (et donc traduire en formule Excel)
en lisant ceci : tout y est

Qui sera le premier à trouver cette jolie formule ?

 

[ROGER2327]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Re...

(...)
EDITION:
ROGER2327: chez vous, vos codes s'exécutent sans problème ?
(...)

Bien sûr. Sauf cas particulier dûment signalé, je ne livre jamais un code sans le tester.
Je joins mon classeur de travail.​

ROGER2327
#2908

 

[Staple1600]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Bonjour ROGER2327


Merci pour ta pièce jointe (elle réussit elle aussi à faire planter mon Excel)

Je testerai plus tard avec comme seule application ouverte Excel

(j'ai vraiment l'impression qu'il peut y avoir des problèmes inopinés avec Excel 2000 + Vista)

Vous vous joignez aussi à nous pour Kaprekar ?

PS: Quel OS utilisez-vous avec votre Excel 2003 ?

 

[JCGL]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Bonjour à tous,

Je viens de m"apercevoir que je n'ai pas déposé le fichier.

Merci pour tes liens mais je tente, souvent, de trouver seul.

A+ à tous

 

[Staple1600]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Re

JCGL
Les liens ne s'adressaient pas uniquement à toi

C'est juste histoire d'augmenter le nombre de participants à la quete de la formule
(qui a ensoleillé mon dimanche )

 

[ROGER2327]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Re...

(...)
PS: Quel OS utilisez-vous avec votre Excel 2003 ?

J'exploite Office2003 sous Microsoft Windows XP Professionnel (version 5.1.2600 Service Pack 3 Nu 2600).
​

ROGER2327
#2910

 

[Staple1600]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Re


Donc ce serait VISTA le coupable dans cette affaire ...

Et Kaprekar ? Cela vous intéresse ou pas ?

 

[ROGER2327]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Re...

Re


Donc ce serait VISTA le coupable dans cette affaire ...

Et Kaprekar ? Cela vous intéresse ou pas ?

1. Je ne sais pas.
2. Intérêt limité pour la question. Juste une bricole en passant...

ROGER2327
#2912

 

[Staple1600]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Bonsoir ROGER2327



Merci de votre passage et pour votre pj.

Avis au formulistes
Personne n'est intéressé par le challenge de la formule "all in one"
dont je parle plus bas ?

Je laisse passer encore un peu de temps avant de vous la livrer.

 

[MJ13]

Re : [ALGO][VBA]Nombre narcissique - comment faites vous ? (pour les grands nombres)

Bonjour à tous

Merci Jean-marie pour ce divertissement .

Je me suis borné a trouver les nombres narcissiques de 100 à 999.