Dates, mois...
Résolu/Fermé
beru002
Messages postés
497
Date d'inscription
mardi 5 février 2008
Statut
Membre
Dernière intervention
28 janvier 2016
-
22 janv. 2013 à 11:06
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 22 janv. 2013 à 17:17
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 22 janv. 2013 à 17:17
A voir également:
- Dates, mois...
- Somme si entre deux dates ✓ - Forum Excel
- 21 trimestres en mois - Forum Excel
- Somme si mois de janvier ✓ - Forum Excel
- Calcul homme mois - Forum Excel
- Samia, kevin et jason ont gardé la trace de leurs ventes quotidiennes du mois de juillet 2016. dans la feuille bilan, il manque les résultats de jason. insérez une colonne entre samia et kevin et reportez-y les résultats de jason. quel mot secret apparait en f2 ? - Forum LibreOffice / OpenOffice
7 réponses
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
22 janv. 2013 à 11:34
22 janv. 2013 à 11:34
Bonjour,
une proposition à adapter
https://www.cjoint.com/?3AwlIHSi0h7
une proposition à adapter
https://www.cjoint.com/?3AwlIHSi0h7
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 395
22 janv. 2013 à 11:53
22 janv. 2013 à 11:53
Bonjour
exact Michel.
Aller, un tout petit peu plus court sans le champ des N° de mois:
=SI(A1<>"";INDEX(D4:D15;MOIS(A1))&"-"&DROITE(ANNEE(A1);2))
Mais je pense que le demandeur voudrait peut être utiliser une seule cellule en utilisant VBA;
Tu dois avoir ça dans tes tiroirs?
je dis ça parce que je ne sais pas faire et ça m'intéresse :-))
crdlmnt (et bonne année si je ne l'ai pas encore fait)
exact Michel.
Aller, un tout petit peu plus court sans le champ des N° de mois:
=SI(A1<>"";INDEX(D4:D15;MOIS(A1))&"-"&DROITE(ANNEE(A1);2))
Mais je pense que le demandeur voudrait peut être utiliser une seule cellule en utilisant VBA;
Tu dois avoir ça dans tes tiroirs?
je dis ça parce que je ne sais pas faire et ça m'intéresse :-))
crdlmnt (et bonne année si je ne l'ai pas encore fait)
beru002
Messages postés
497
Date d'inscription
mardi 5 février 2008
Statut
Membre
Dernière intervention
28 janvier 2016
27
22 janv. 2013 à 11:59
22 janv. 2013 à 11:59
Oui, j'avoue que si je pouvais utiliser une seule cellule, cela m'arrangerait...
Mais au cas ce ne serait aps possible, la solution de michel est très satisfaisante!! :-)
Mais au cas ce ne serait aps possible, la solution de michel est très satisfaisante!! :-)
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
22 janv. 2013 à 14:02
22 janv. 2013 à 14:02
après le café et avant la sieste
à installer dans le module feuille concerné, zone d'action A2:A100 à adapter
à installer dans le module feuille concerné, zone d'action A2:A100 à adapter
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A2:A100")) Is Nothing Then
mois = Month(Target)
an_0 = Year(Target) Mod 1000
mois_region = Choose(mois, "jan", "fev", "ma", "avr", "mai", "jun", "jul", "aou", "sep", "oct", "nov", "dec")
'OU et seulement OU, liste des mois sur la feuille
'mois région = Application.Match(mois, Range("Z1:Z12"), 0)
Application.EnableEvents = False
Target = mois_region & "-" & an_0
Application.EnableEvents = True
End If
End Sub
Sub sos_macros()
'si sortie macro accidentelle macro avec enableevents désactivé
Application.EnableEvents = True
End Sub
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
beru002
Messages postés
497
Date d'inscription
mardi 5 février 2008
Statut
Membre
Dernière intervention
28 janvier 2016
27
22 janv. 2013 à 14:29
22 janv. 2013 à 14:29
Yes! Super! Merci!
Bon, finalement, je dois utiliser la première version, parce que j'avais oublié que j'avais utilisé cette cellule pour une autre formule utilisant les dates...
Mais je garde ça de côté, parce que ça me servira dans le futur!!
Encore merci!! et bravo!!
Bon, finalement, je dois utiliser la première version, parce que j'avais oublié que j'avais utilisé cette cellule pour une autre formule utilisant les dates...
Mais je garde ça de côté, parce que ça me servira dans le futur!!
Encore merci!! et bravo!!
Vaucluse
Messages postés
26496
Date d'inscription
lundi 23 juillet 2007
Statut
Contributeur
Dernière intervention
1 avril 2022
6 395
22 janv. 2013 à 16:33
22 janv. 2013 à 16:33
Ben tiens moi aussi je garde ça,merci Michel
Crdlmnt
Crdlmnt
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
22 janv. 2013 à 17:17
22 janv. 2013 à 17:17
C'est de bon coeur, ce sera pour vos étrennes !
Cordialement
Cordialement
