Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Trier par mois (facile) mais inserer ...

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion salym75020
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
S

salym75020

Guest
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
 
Trier par date Trier par votes
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.


jeanpierre à dit:
Edit : Hello suistrop,
Cliquez pour agrandir...

hello JeanPierre !!
 
Dernière édition:
Vote positif 0 Vote négatif
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:
Vote positif 0 Vote négatif
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

Vote positif 0 Vote négatif
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

Vote positif 0 Vote négatif
Re : Trier par mois (facile) mais inserer ...

skoobi à dit:
Bonjour salym75020, suistrop,
salut jeanpierre 🙂,



Regarde du coté de la fonction "MonthName" (si j'ai bien compris).
Cliquez pour agrandir...
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

Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

S
  • Question Question
Microsoft 365 Calcul du nb de jours d'une période rapportée en nb de jours par mois
Réponses
3
Affichages
584
Sampras63
S
K
  • Question Question
Microsoft 365 VBA - excel vers Acces
Réponses
0
Affichages
2 K
Keiko
K
M
  • Question Question
Somme par jour, par mois, etc. à partit d'un comptage horaire ?
2
Réponses
21
Affichages
4 K
ChTi160
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…