Trier par mois (facile) mais inserer ...

salym75020

XLDnaute Nouveau
Chers tous,

Un problème simple à regler mais que mes modestes connaissances ne sont pas capables de réaliser

J'ai etabli un planning pour lequel j y ai établi une macro qui classe automatiquement les sessions de formations par mois or, je souhaiterai outre le fait qu'il trie les formations par mois que soit inséré et comptabilisé le nombre de sessions par mois et le mois , veuillez trouver ci dessous le planning simplifié tel qu'il est actuellement...

Training Programme Month
Essential Sales Skills mai-08
Finance Malika H mai-08
"Project Risk & juin-08
"Commercial Awareness Juillet-08


Je souhaiterai avoir la configuration suivante :

Training Programme Month
Essential Sales Skills mai-08
Finance Malika H mai-08
MAI 2008 : 2 sessions organisées
"Project Risk & juin-08
JUIN 2008 2 sessions organisées
"Commercial Awareness Juillet-08
etc...

Je vous remercie par avance et m'excuse pour la gène ocassionnée

A+ les amis excelliens
 

suistrop

XLDnaute Impliqué
Re : Trier par mois (facile) mais inserer ...

hello,

Le plus simple est que tu donne un fichier sans info confidentielle, car creer une macro a partir des info ....

Soit le plus précis possible dans ce que tu cherches a faire ( ou dois aller chaque info comment a partir d ou ...)

Cordialement.


Edit : Hello suistrop,

hello JeanPierre !!
 
Dernière édition:

jeanpierre

Nous a quitté
Repose en paix
Re : Trier par mois (facile) mais inserer ...

Bonjour salym75020,

Vague, imprécis, et surtout sans exemple de ton souci et de ce que tu attends, tu peux comprendre que c'est loin d'être facile.
Déposes un fichier avec ta problèmatique et le résultat que tu attends.

A te lire.

Jean-Pierre

Edit : Hello suistrop, testroprapide
 
Dernière édition:

salym75020

XLDnaute Nouveau
Re : Trier par mois (facile) mais inserer ...

Je vous remercie particulièrement de votre réactivité et m'excuse si je n'ai pas intégré de fichier ci joint

En fait nous gérons des plannings de formation , et je souhaiterai dans la mesure du possible trier les sessions de formations par mois (j'ai deja crée une macro pour cela) et compter automatiquement le nombre de sessions par mois en y ajoutant une ligne

Exemple
MAi 2008
mai 2008
Nbre de sessions mois de mai = 2
Juillet 2008
Juillet 2008
Nbre de sessions mois de Juillet = etc...

je souhaiterai donc trier et inserer des données automatiquement à partir d'un bouton
 

Pièces jointes

  • Sourcing v2.zip
    36.3 KB · Affichages: 29

suistrop

XLDnaute Impliqué
Re : Trier par mois (facile) mais inserer ...

re,

Code:
Sub cartman()
For i = 2 To Range("A65536").End(xlUp).Row
mois = Month(Cells(i, 4))
    For j = i To Range("A65536").End(xlUp).Row
        If Month(Cells(j, 4)) = mois Then
            cpt = cpt + 1
            der_ligne = j
        End If
    Next j
Rows(der_ligne + 1).Select
Selection.Insert Shift:=xlDown
Cells(der_ligne + 1, 1) = "nombre de session au mois de " & mois & " = " & cpt
cpt = 0
i = der_ligne + 1
Next i
End Sub

1 probleme , je ne sais pas ecrit le mois en lettre !
 

Pièces jointes

  • Sourcing v2_cartman.xls
    42 KB · Affichages: 36
  • Sourcing v2_cartman.xls
    42 KB · Affichages: 36
  • Sourcing v2_cartman.xls
    42 KB · Affichages: 38

suistrop

XLDnaute Impliqué
Re : Trier par mois (facile) mais inserer ...

Bonjour salym75020, suistrop,
salut jeanpierre :),



Regarde du coté de la fonction "MonthName" (si j'ai bien compris).
Hello & merci skoobi, tu avais trés bien compris !

Code:
Sub cartman()
For i = 2 To Range("A65536").End(xlUp).Row
mois = Month(Cells(i, 4))
    For j = i To Range("A65536").End(xlUp).Row
        If Month(Cells(j, 4)) = mois Then
            cpt = cpt + 1
            der_ligne = j
        End If
    Next j
Rows(der_ligne + 1).Select
Selection.Insert Shift:=xlDown
Cells(der_ligne + 1, 1) = "nombre de session au mois de " & MonthName(mois) & " = " & cpt
cpt = 0
i = der_ligne + 1
Next i
End Sub
 

Pièces jointes

  • Sourcing v2_cartman.xls
    42 KB · Affichages: 44
  • Sourcing v2_cartman.xls
    42 KB · Affichages: 40
  • Sourcing v2_cartman.xls
    42 KB · Affichages: 39

Statistiques des forums

Discussions
312 185
Messages
2 086 009
Membres
103 089
dernier inscrit
johnjohn1969