Discussion :

[kirikou84]

Bonjour à tous,

Lors de l'exécution du programme mon ARBRE affiche les mois par ordre alphabétique (Août, Avril, Décembre, etc.... j'aimerai les voir affichés comme ci-dessous.


ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008", aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Janvier" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Février" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Mars" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Avril" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Mai" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Juin" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Juillet" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Août" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Septembre" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Octobre" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Novembre" , aDéfaut , aDéfaut)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Décembre" , aDéfaut , aDéfaut)

j'ai bien cherché dans l'aide, mais je sèche.
Si quelqu'un peut m'aider.

Existe t-il une méthode pour avoir (par exemple: tous les mois et années de2008 à 2050, comme ci-dessus, sans avoir à taper tout ce code ?).

Merci beaucoup.
Cordialement

[mail.spam]

Bonjour,

Afin de garder les mois dans l'ordre que tu veux je rajouterai le numéro du mois (ex : 01-Janvier,02-Février, etc...)

Ensuite pour Ne pas taper tous les mois j'utiliserai deux variable de type date.
datedébut et datefin

Ensuite je ferai une boucle avec un ajout sur le mois datedebut..mois++puis dans ton code j'utiliserai dateverschaine.

un peux comme ça

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année" + datedebut..année+TAB+DateVersChaîne(datedebut,"MM-MMMM") , aDéfaut , aDéfaut)

Ensuite c'est à toi de controler les changements d'années pour la création de branche.
Enfin ce n'est qu'une piste sans avoir fait d'essai.

[djejackk]

Personnellement, j'ajoute aussi le numéro du mois devant.

Sinon une autre solution est d'utiliser la constante aDernier avec ArbreAjoute
Avec le code que vous avez fourni, ça donne a peu près ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008", aDéfaut , aDéfaut,"",aDernier)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Janvier"	 , aDéfaut , aDéfaut,"",aDernier)
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Février"	, aDéfaut , aDéfaut,"",aDernier)
...
ArbreAjoute(ARBRE_Impots,"IMPÔTS"+TAB+"Année 2008"+TAB+"Décembre"	, aDéfaut , aDéfaut,"",aDernier)

Chaque feuille est ajoutée en fin. Donc si on effectue les ajouts dans l'ordre souhaité, c'est tout bon.

En appliquant ça avec la boucle décrite par mail.spam, ça trie les feuilles par nom de mois, sans numéro devant.

[wimbish]

Bonjour,
+1 pour mail.spam et djejackk.
Je combinerais leurs réponse :
Utilisation d'une boucle et option aDernier
Et j'ajouterais ceci :
Utilisation de <Identifiant de la feuille> pour stocker l'année et la mois sous la forme AAAAMM pour les recherche et afin de garder la présentation Année 2008"+TAB+"Janvier" dans l'affichage

[kirikou84]

Merci à vous trois,

pour "adernier" c'est bon !

pour la boucle "j'ai copié la ligne". le code me génère une erreur sur datedebut. Identificateur inconnu ou inaccessible

j'ai essayé de le déclarer en "chaîne ou entier": erreur sur le mot "Année".

Désolé d'être un peu lourd mais je suis néophite.

Cordialement

[mail.spam]

j'utiliserai deux variable de type date.
datedébut et datefin

As tu essayé de déclarer tes variables en type date?