Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

[Staple1600]

Bonsoir


Dans le classeur ci-joint que ce soit avec les formules
(issues du forum: auteurs: AV et Monique)

ou avec des fonctions VBA issues du net, et en changeant les périodes de
références, les formules produisent des erreurs.

Elles sont en gras et en rouge dans le classeur.

N'étant pas un spécialiste de cette disicipline, je sollicite votre aide.

Merci à l'avance de l'attention que vous voudrez porter à ce message.

Staple

 

[gbinforme]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

bonsoir,

effectivement bien curieux ?

en fait les erreurs que j'ai viennent de la date précédente et si l'on copie une autre date puis on la remet comme avant, c'est bon !

une histoire de fou ?
ou une folie d'Excel ?

 

[Staple1600]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Bonsoir


merci de ton intéret.

L'erreur se produit si l'on saisit la "borne" inférieure des périodes.

Si l'on saisit "borne"+1 cela semble fonctionner

Mais comme je ne connais pas les périodes "officielles"...

Et ca n'explique pas pourquoi les erreurs ne sont pas les mêmes

selon les formules utilisées.

Je continue de creuser la question.

 

[JCGL]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Bonjour à tous,
Salut Staple 🙂,

Je viens de retouver ça dans mon grenier :

Option Explicit

Function Zodiaque(DateN)
'fonction extraite du livre : VBA pour Excel
'de J-P Mesters
'Editions MICRO APPLICATION
Select Case DateN
Case DateSerial(Year(DateN), 3, 21) To DateSerial(Year(DateN), 4, 20)
Zodiaque = "Bélier"
Case DateSerial(Year(DateN), 4, 21) To DateSerial(Year(DateN), 5, 20)
Zodiaque = "Taureau"
Case DateSerial(Year(DateN), 5, 21) To DateSerial(Year(DateN), 6, 20)
Zodiaque = "Gémeaux"
Case DateSerial(Year(DateN), 6, 21) To DateSerial(Year(DateN), 7, 20)
Zodiaque = "Cancer"
Case DateSerial(Year(DateN), 7, 21) To DateSerial(Year(DateN), 8, 20)
Zodiaque = "Taureau"
Case DateSerial(Year(DateN), 8, 21) To DateSerial(Year(DateN), 9, 20)
Zodiaque = "Vierge"
Case DateSerial(Year(DateN), 9, 21) To DateSerial(Year(DateN), 10, 20)
Zodiaque = "Balance"
Case DateSerial(Year(DateN), 10, 21) To DateSerial(Year(DateN), 11, 20)
Zodiaque = "Scorpion"
Case DateSerial(Year(DateN), 11, 21) To DateSerial(Year(DateN), 12, 20)
Zodiaque = "Sagittaire"
Case DateSerial(Year(DateN), 1, 21) To DateSerial(Year(DateN), 2, 20)
Zodiaque = "Verseau"
Case DateSerial(Year(DateN), 2, 21) To DateSerial(Year(DateN), 3, 20)
Zodiaque = "Poisson"
Case Else
Zodiaque = "Capricorne"
End Select
End Function

Juste pour rajouter une couche à tes interrogations arf

Bonne soirée à toi et à tous 😛

Edition : Tu es très Zodiaque ce soir... un Cochon qui te salue bien arf

 

[Gruick]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Bonsoir Staple,
Ben, y'a déjà le mois de mai qui manque, ça saute d'avril à juin, après, faut voir la coïncidence des jours qui se chevauchent, et puis regarder la différence entre le 1/1/A et la date de début de signe, il peut y avoir 1 à 2 jours de différence.
Maintenant, qu'une planète gazeuse à des millions de kilomètres agisse sur mon métabolisme, mes amours, et ma veine....
A plus,
Gruick

 

[Staple1600]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Bonsoir à tous

Une idée en en entrainant une autre...

Déjà je m'interroge?

J'ai deux sources différentes et les dates divergent?

(edit: je viens d'aller voir sur Ya.oo, encore des divergences de dates???)

Je suppose à priori que les formules de AV et Monique ne peuvent pas
receler d'erreurs. (C'est impossible)

La fonction VBA semble être d'essence "mathématique"


--> JCGL : merci de raviver ma mémoire.

(Il ya deux Taureaux et pas de Lion dans la fonction VBA que tu as posté)

--> Gruick: c'est bien connu, nous sommes en présence d'une science
(c'est Elisabeth T. qui l'a dit chez M-O fogiel --> donc c'est vrai non? 😉

J'ai joint un nouveau fichier qui inclus la fonction de JCGL - JP Mesters

et il y a toujours des erreurs

 

[Monique]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Bonjour,

Si on le fait par formules,
que ce soit Index Equiv ou Choisir(),
la formule cherche comme dans un tableau de Recherchev() trié dans l'ordre croissant
A gauche : 0, 21, 51, 81, etc
A droite : Capricorne, Verseau, Poisson et les autres

21 = DATE(;MOIS("21/01/07");JOUR("21/01/07"))
51 = DATE(;MOIS("20/2/07");JOUR("20/2/07"))

Si tu changes les dates de début des signes (colonne I), tu changes la formule :
{0;20;51;81;111;142;173;205;237;267;297;327;357})

En J : (il manquait le Capricorne en fin de liste)
=INDEX({"Capricorne";"Verseau";"Poissons";"Bélier";"Taureau";"Gémeaux";"Cancer";"Lion";"Vierge";"Balance";"Scorpion";"Sagittaire";"Capricorne"};EQUIV(DATE(;MOIS(I4);JOUR(I4));{0;20;51;81;111;142;173;205;237;267;297;327;357};1))

En K :
=CHOISIR(EQUIV(DATE(;MOIS(I4);JOUR(I4));{0;20;51;81;111;142;173;205;237;267;297;327;357});"Capricorne";"Verseau";"Poisson";"Bélier";"Taureau";"Gémeaux ";"Cancer";"Lion ";"Vierge";"Balance";"Scorpion";"Sagittaire";"Capricorne")

* * Je ne connais pas les dates

 

[Staple1600]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Bonsoir


Merci Monique de ton retour

Moi non plus je ne connais pas les dates "officielles"

Merci pour l'explication détaillée de tes formules.

Au moins l'avantage ici , à défaut d'entrer dans les arcanes
de l'ésoterisme, est d'apprendre à utiliser des formules
assez compliquées dans Excel.

Quelqu'un connait -il les dates référence utilisées
par les grandes nations de notre planète?

 

[jeanpierre]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Bonsoir,

En astronomie, ces dates ne sont pas fixes, elles sont liées au passage de la Terre au Point Vernal, le jour de l'équinoxe de printemps, qui peut varier d'une journée, mais qui varie tous les ans en ce qui concerne l'heure.

Idem pour l'été (qui varie lui aussi), soit trois signes plus tard, etc.... même chose pour les autres saisons.

Ainsi, il est préférable, en astrologie, de prendre de l'à peu près, soit et mesuré en Virons 😱 , 30° par mois soit, et encore en Virons 😀 , 30 et des fois 31 jours...

Ainsi, la formule de Monique et ses références aux jours dans l'année est un bon compromis.

0;20;51;81;111;142;173;205;237;267;297;327;357

Rapide, pour le moment, maintenant, si tu veux les formules pour calculer tout cela, c'est pas vraiment un problème, sauf de temps.

 

[JCGL]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Re,
Salut Gruik,
Salut Monique,

Quoiqu'en dise E.T. :

Une personne de notre époque née quand le soleil se trouve dans la constellation de la Balance ne sera donc pas du signe de la Balance. La précession des équinoxes a déplacé le point de référence du zodiaque tropique, la position du Soleil par rapport aux étoiles lors de l'équinoxe du printemps, qui en est le point de départ (début du signe du Bélier).

Les constellations sont, elles, de tailles inégales - une astrologie entièrement sidérale verrait donc une proportion immodérée de gens nés sous le signe de la Vierge. Une autre question pour l'astrologie sidérale est de situer précisément le début de son zodiaque. Les constellations n'ayant que des limites conventionnelles (dessinées en 1930), où situer la limite entre le Bélier et les Poissons autrement que par convention ?

D'où les formules et codes d'AV (Avé AV ), de Monique (l'andrologue briochine), JP Mesters qui sont "réglos" en valeurs de formules ou codes, mais ils sont soumis à la précessions et à "l'interprétation des dates".

A+

Edition : Arf mon ami JP même combat...

 

[Monique]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Re,

Un fichier avec 4 formules possibles.
Quant aux dates…

 

[Staple1600]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

reBonsoir à tous


je crois que je vais essayer le marc de café et le VBA together...

Dans le fichier exemple, il y une fonction VBA

qui semble envisager le coté sérieux de la chose

Dim T As Double ' time in Julian centuries since 0.5 Jan 1900
Dim dblLong As Double ' Sun 's mean longitude, in degrees
Dim dblAnomaly As Double ' Sun 's mean anomaly, in degrees
Dim dblCorrEcc As Double ' Correction for eccentricity
Dim dblStheta As Double ' True Longitude

D'autant plus qu'il semble y avoir plusieurs "écoles"

Peut-être quand rajoutant une pincée de numérologie, et grâce à mon fer à cheval, sans oublier ma patte de lapin (merci Gruick)

Je vais finir par savoir ce que demain m'apportera 🙂

En plus j'avais oublié que Pluton n'est plus une planète.

PS: Je précise que je me place sur un aspect ludique.
(Voudrais pas déclencher une guerre entre PRO Astro et ANTI Astro)

En tout cas, merci de toutes vos informations.

 

[gbinforme]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

bonsoir Staple et tout le forum

Ton problème d'erreurs se tourne vraiment sur le sujet du classeur alors que ce n'était pas le but.

Le fait d'annuler l'erreur en ressaisissant la même date m'intrigue tout de même...


En ce qui concerne les calculs de signes et d'ascendants en fonction des heures et lieus, je pense que les formules Excel ou VBA risquent d'être problématiques.

J'ai bien connu quelqu'un, féru d'astrologie "scientifique" et d'informatique, qui a développé un serveur Minitel, il y a une vingtaine d'années, et il lui a fallut le faire sur un gros système afin de pouvoir dérouler tous ses calculs qui même en étant optimisés, nécessitaient énormément de ressources.

et le serveur tournait très fort : il a bien amorti sa passion !

 

[Staple1600]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Re


C'est le hasard (du jour) qui m'a fait tester différentes formules

et l'intérêt pour moi était juste de comprendre

pourquoi des erreurs se produisaient.

Je ne cherche pas à devenir féru en astrologie.

(ni à blesser les personnes qui en sont adeptes)

edit: dans le dernier fichier de Monique (que je remercie)
il n'y a pas d'erreur (même avec les dates de début de périodes)

 

[Gruick]

Re : Erreurs résultats Formules (du forum) et fonctions VBA: quelles causes?

Re,
des astres,
Je suis gémeaux ascendant gémeaux, tu imagines un peu le bazar, on est 4 dans la cervelle, jamais d'accord entre eux.

Vu que c'est l'année du Cochon d'or, que ça n'arrive que tous les 600 ans, couplée avec celle du cochon de Feu, tous les 60 ans, ca devrait aller bien pour tous ceux qui naissent cette année (en Chine évidemment). Pas de bol, je suis cheval, mais je vais demander une greffe.

Résultat dans 60 ans...

Tout ça me fait bien rigoler, bah ! Ca fait vivre des gens.

Je vais en parler à ma voyante tiens...

Sinon, sérieux, j'admire les calculs et les macros jointes. Du nectar.
Il faut savoir que le Soleil bouge, en direction de la Véga, et que dans 4.5 milliards d'années, il sera énorme (géante rouge) englobera Saturne quand même avant d'évoluer en naine blanche, pas assez gros pour devenir trou noir. Tous les calculs seront à refaire, avec excel 4500000000 !

Ca sent le cochon grillé...

Gruick

Edit, PS pour Staple, c'est une patte de lapin qui porte bonheur mais pas sur un bateau, touchons du bois...demain, je passe la journée dans le jardin recherchant un trèfle à quatre feuilles, en rengeant l'échelle, un chat noir passait dessous...

Edit2 : Il me semble que l'heure a de l'importance, car ma compagne est taureau, malgré sa date bélier. (euh ! je fiche le bazar là !...)