Dates incrémentées

M

Monique

Nous a quitté

Repose en paix

• 15 Mars 2008

• #2

Re : Dates incrémentées

Bonjour,

En donnant à tous les onglets le même nom puis un n° à 2 chiffres
Du genre Jour01, Jour02, Jour03 etc

En C2 à partir du 2ème onglet :
=INDIRECT("Jour"&TEXTE(DROITE(STXT(CELLULE("filename";C2);TROUVE("]";CELLULE("filename";C2))+1;32);2)-1;"00")&"!C2")+1

Pour que ça fonctionne, il faut que le fichier soit enregistré.

 

Pièces jointes

• IncrementerPetitloup.zip

  2.3 KB · Affichages: 28

Vote positif 0 Vote négatif

Roland_M

XLDnaute Barbatruc

• 15 Mars 2008

• #3

Re : Dates incrémentées

bonsoir à tous
Décidément cette Monique est trop forte pour ce qui concerne les fonctions sur les feuilles ! Bravo !
J'hésiterai pas à lui faire appel si besoin car je suis pas mauvais en Vb mais sur les feuilles j'y travaille peu.

Roland

 

Vote positif 0 Vote négatif

P

PETIT LOUP

XLDnaute Nouveau

• 15 Mars 2008

• #4

Re : Dates incrémentées

Je te remercie mais j'ai du mal à l'adapter à mon fichier je me permets de le joindre si tu me m'aider
merci encore

 

Vote positif 0 Vote négatif

P

PETIT LOUP

XLDnaute Nouveau

• 15 Mars 2008

• #5

Re : Dates incrémentées

oup la pièce jointe

 

Vote positif 0 Vote négatif

P

PETIT LOUP

XLDnaute Nouveau

• 15 Mars 2008

• #6

Re : Dates incrémentées

enfin la pièce jointe

 

Pièces jointes

• roulement - Copie.zip

  7.6 KB · Affichages: 21

Vote positif 0 Vote négatif

M

Monique

Nous a quitté

Repose en paix

• 15 Mars 2008

• #7

Re : Dates incrémentées

Re,

IL faut nommer les feuilles R01, R02, R03 et non R1, R2, R3

La veille :
=INDIRECT("R"&TEXTE(DROITE(STXT(CELLULE("filename";C2);TROUVE("]";CELLULE("filename";C2))+1;32);2)-1;"00")&"!C2")-1

Le lendemain
=INDIRECT("R"&TEXTE(DROITE(STXT(CELLULE("filename";C2);TROUVE("]";CELLULE("filename";C2))+1;32);2)-1;"00")&"!C2")+1

J’ai défusionné les cellules (pas pratique du tout)
A la place, centrer sur plusieurs colonnes.


Si tu vas jusqu’à 366 jours, nommer les onglets R001, R002
et la formule serait
=INDIRECT("R"&TEXTE(DROITE(STXT(CELLULE("filename";C2);TROUVE("]";CELLULE("filename";C2))+1;32);3)-1;"000")&"!C2")-1

 

Pièces jointes

• IncrementerPetitloupV1.zip

  7.1 KB · Affichages: 29

Vote positif 0 Vote négatif

P

PETIT LOUP

XLDnaute Nouveau

• 16 Mars 2008

• #8

Re : Dates incrémentées

Merci encore et effectivement tu es formidable.

Je vais l'essayer maintenant

 

Vote positif 0 Vote négatif

P

PETIT LOUP

XLDnaute Nouveau

• 16 Mars 2008

• #9

Re : Dates incrémentées

Monique je suis désolé mais je rencontre un problème au niveau de l'onglet 15 je ne comprends pas car tout fonctionne bien avant peux-tu me dire ou je fais une erreur

merci encore

 

Pièces jointes

• essai 1.zip

  13.6 KB · Affichages: 15
• essai 1.zip

  13.6 KB · Affichages: 15
• essai 1.zip

  13.6 KB · Affichages: 18

Vote positif 0 Vote négatif