formule mathématique

Bonjour et bonne année

Étant limité en math, je voudrai savoir si on peut avoir une formule , dans un tableau;
lequel comporte 12 colonnes et 31 lignes (calendrier).
A partir d'un jour choisi au hasard, comment retrouver le n° de la colonne, dans laquelle il se trouve?
scratch

Je ne sais pas si j'ai bien saisi ta question. Voici un petit programme qui charge un tableau de 31x12 avec des valeurs mois*100+jour? Il prend ensuite la date du jour et affiche le numéro du jour, du mois et le contenu de la cellule correspondante. Tu peux ensuite saisir des jours et des mois différents, et l'affichage du contenu de la cellule sera toujours à jour.

Voici le code:

Code:

label change_jour, change_mois
dim jours%(31,12), max%(12), j%, m%, d$
data 31,28,31,30,31,30,31,31,30,31,30,31
for m%=1 to 12
read max%(m%)
next m%
for j%=1 to 31
for m%=1 to 12
jours%(j%,m%) = m%*100 + j%
next m%
next j%

alpha 1 : top 1,10 : left 1,10 : caption 1,"Jour:"
edit 2 : top 2,10 : left 2,40 : width 2,30
alpha 3 : top 3,10 : left 3,110 : caption 3,"Mois:"
edit 4 : top 4,10 : left 4,140 : width 4,40
alpha 5 : top 5,50 : left 5,10 : caption 5,"Contenu de la case:"
edit 6 : top 6, 50 : left 6,120 : width 6,40

d$ = date$
j% = left$(d$,2)
m% = mid$(d$,4,2)
text 2,str$(j%) : text 4,str$(m%) : text 6, str$(jours%(j%,m%))

on_change 2,change_jour : on_change 4,change_mois
end

change_jour:
m% = val(text$(4))
d$ = text$(2)
if numeric(d$)=1
j% = val(d$)
if j%<1 then return
if j%>max%(m%) then return
text 6, str$(jours%(j%,m%))
end_if
return

change_mois:
j% = val(text$(2))
d$ = text$(4)
if numeric(d$)=1
m% = val(d$)
if m%<1 then return
if m%>12 then return
if j%>max%(m%)
j% = max%(m%)
text 2,str$(j%)
end_if
text 6, str$(jours%(j%,m%))
end_if
return

Bonjour Klaus

En fait, c'est pas tout à fait ce que je voudrai; par exemple en choisissant un jour dans l'année (énième);
comment retrouver le mois. scratch

Nombre de messages: 3044 Localisation: 77 Date d'inscription: 29/11/2007

Tu veux dire convertir le quantième (1 à 365 ou 366) en jour/mois ?
ça a déjà été fait, il faut que je cherche un peu, ça doit se trouver dans les sources à partager...

Code:

Qjm:
' Mois et Jour en fonction de Quantième et Annee
bi = 0: IF (FRAC(Annee/4) = 0 and (FRAC(Annee/100) > 0) or FRAC(Annee/400) = 0) THEN bi = 1
Mois = 1: IF Q < 32 THEN Jour = Q: GOTO ffq
Qt = 0
qjm1:
IF Mois = 4 OR Mois = 6 OR Mois = 9 OR Mois = 11
lm = 30
ELSE
IF Mois = 2 THEN lm = 28 + bi ELSE lm = 31
END_IF
Qt = Qt + lm: IF Qt < Q THEN Mois = Mois + 1: GOTO qjm1
Jour = Q - Qt + lm
ffq:
RETURN

mais finalement je ne suis pas sûr que ce soit ce que tu cherches...

Ou alors c'est un problème de physique ? ayant un tableau affiché à l'écran, tu veux savoir dans quelle colonne on a cliqué ? c'est facile aussi, mais ta question n'est pas très claire, comment est-ce qu'on choisit la colonne ? Un clic ? une entrée au clavier ? par programme ?

Pour le clic, si ta première colonne commence en xd, avec des largeurs de colonnes de lc, si le clic souris est en xs le numéro de la colonne cliquée (= numéro du mois) est
1+INT((xs-xd)/lc)
(en partant de 1).