le mercredi de la semaine précédente

  • Initiateur de la discussion Canardo
  • Date de début
C

Canardo

Guest
Bonsoir à tous, Bonsoir à Monique ,si elle est encore là elle aura sûrement une idée.

Voilà ma question: Pour une date quelconque, comment retrouver la date du mercredi de la semaine précédente?

je me paume un peu...

Merci d'avance :eek:hmy:
 

Sylvie

XLDnaute Accro
Bonjour Celeda et tout le forum,

je suis dans ma phase application de la majeure partie des posts de la veille et je découvre que chez moi ta formule me renvoie le 29/4/2005 et non pas le mercredi 27. Où est le Hic ?

Merci
Sylvie
 

Brigitte

XLDnaute Barbatruc
Bonjour Sylvie, Celeda, Canardo,


Chez moi aussi je te rassure, même après avoir activé, dans les options le Calendrier depuis 1904.

Donc soit Celeda a écrit vite la réponse, soit on doit faire qqchse pour adapter.

Attendons notre poétesse, elle va sûrement revenir nous aider.


Alloooooooooo, Celeda ?
 

niki42

XLDnaute Occasionnel
Salut à tous

Bon je ne suis pas Celeda mais je peux vous répondre.
J'ai fait l'essai en décochant calendrier 1904 et miracle ça marche correctement alors qu'en laissant calendrier 1904 et bien ça ne donne pas la bonne date!!

Voilà voilà Essayez et vous me direz

@++
BOn dimanche

Niki

B) B)
 
C

Canardo

Guest
Celedaaa! Elle st pas bonne ta formule, Celeda :eek:hmy:

Si le jour est sup à mardi, on obtient le mercredi sem en cours.

Je l'ai donc rectifiée comme suit:
ActiveCell.NumberFormat = '0' pour ceux qui ont des pb de format

ActiveCell.FormulaR1C1 = _
'=IF(WEEKDAY(RC[-1],2)>2,RC[-1]-MOD(RC[-1]-4,7)-7,RC[-1]-MOD(RC[-1]-4,7))'


Pour les pb de format, je vous conseille d'essayer de mettre le format '0' avant de rentrer la formule.

et on peut rajouter:
ActiveCell.NumberFormat = 'dddd dd mmmm'

pour avoir un format de date (si on ne doit pas faire de tri après, sinon on tri, puis on met ce format pour éviter des erreurs éventuelles (ça arrive. si, si! je l'ai constaté. pourquoi?, mystère!))

A+
:)
 
C

Canardo

Guest
Celedaaa! Elle st pas bonne ta formule, Celeda :eek:hmy:

Si le jour est sup à mardi, on obtient le mercredi sem en cours.

Je l'ai donc rectifiée comme suit:
ActiveCell.NumberFormat = '0' pour ceux qui ont des pb de format

ActiveCell.FormulaR1C1 = _
'=IF(WEEKDAY(RC[-1],2)>2,RC[-1]-MOD(RC[-1]-4,7)-7,RC[-1]-MOD(RC[-1]-4,7))'


Pour les pb de format, je vous conseille d'essayer de mettre le format '0' avant de rentrer la formule.

et on peut rajouter:
ActiveCell.NumberFormat = 'dddd dd mmmm'

pour avoir un format de date (si on ne doit pas faire de tri après, sinon on tri, puis on met ce format pour éviter des erreurs éventuelles (ça arrive. si, si! je l'ai constaté. pourquoi?, mystère!))

A+
:)
 

Celeda

XLDnaute Barbatruc
Bonsoir,





Et bien belle mise à mort!!

Tango a laissé ses deux oreilles Cel et Da

Elle n'avait pas le droit à l'erreur

Heureusement que c'est son ami qui la libéra

Et lui donna un dernier réconfort

En étant son incontournable accompagnateur



Celeda








entre uniquement toi et moi :Merci Ti :kiss:
[file name=Mercredi2.zip size=2882]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/Mercredi2.zip[/file]
 

Pièces jointes

  • Mercredi2.zip
    2.8 KB · Affichages: 28

Monique

Nous a quitté
Repose en paix
Bonjour,

Le lundi, le mardi, etc… de la semaine précédente.
Calendrier 1900, calendrier 1904 et, en principe, compatible 1900 1904

[file name=MercrediCanardo.zip size=7766]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/MercrediCanardo.zip[/file]
 

Pièces jointes

  • MercrediCanardo.zip
    7.6 KB · Affichages: 47

Celeda

XLDnaute Barbatruc
Bonjour,


Et voilà le quadrille vient de se refermer !!

Olé !!

Monique et les macros!!!


Si mes oreilles sont tombées, gare aux votres,

maintenant que momo se met aux macros.

Belle démo !!


Bravo !!!

Celeda



ps : merci momo :kiss:
 

Discussions similaires

Statistiques des forums

Discussions
312 196
Messages
2 086 099
Membres
103 116
dernier inscrit
kutobi87