Bonjour à tous ;
Recherche un peut d’aide, j’ai beau me creuser la tête, mais je n’arrive pas
à trouver la formule
J’ai un planning avec un mois par feuille (janvier, février, etc. .) et une
colonne (AI) après le dernier jour du mois pour totaliser les congés de mes
chaque noms, à savoir que mes feuilles je les mets au compte goutte, « pour
une commodité si modifications ».
En fin de classeur j’ai refait un tableau en reprenant ma liste de nom et
une colonne pour chaque mois voir ci-dessous.
Existerait-il une formule pour que je récupère mes totaux congés de chaque
feuille sachant que j’ai des feuilles comme (avril, mai, etc) qui ne sont pas
encore dans mon classeur, mais une fois incorporer que les totaux viennent
s’inscrire dans les colonnes
Salutations
janvier février mars Mai juin
Dupont
Durand
Victor
Bonjour & merci car cette formule je n'aurais pas put la construire, mais elle fonctionne bien, le planning arrive en phase final. Salutations
En D6: =SI(JOURSEM(D2)=4;"s"&ENT(MOD(ENT((D2-2)/7)+0,6;52+5/28))+1;"")
On 11 fév, 17:40, Tibert wrote:
Bonjour « JB » Je suis toujours dans la construction de mon planning, pourrais tu me dire, si tu peux comment faire, pour mettre une troisième ligne pour avoir les numéro de semaine tu peux voir dans ton fichier « chivq4iQcy_Planning_jb » qu'on a eu déjà l'occasion de s'échanger
-Agrandir le nom de champ 'Conges' (insertion/nom/définir) -Sauvegarder -Fermer puis ouvrir à nouveau
La dernière cellule du champ Conges corresponpond au caractère d'efffacement.
JB
On 9 fév, 17:10, Tibert wrote:
Bonjour « JB » J'ai bien avancer dans mon planning, pourrais tu me dire d'où cela pourrais provenir dans mon planning la (Barre coloriage) repris dans ton fichier « chivq4iQcy_Planning_jb » quand je veux augmenter le nombre de lettre je suis limiter à (6) même en augmentant la plage dans la feuille « couleurs » la barre ne s'agrandit pas, peut tu m'apporter la solution pour que je puisse augmenter le nombre de lettre dans la barre coloriage Merci pour ton aide ! Salutations
On 7 fév, 10:26, Tibert wrote:
Bonjour "JB" Encore une questions, que dois je faire, si je veux ma barre "BarreColoriage" en ayant mon fichier en mode (plein écran) merci pour tout ! Salutations
On 7 fév, 06:29, Tibert wrote:
Bonjour à tous ; Recherche un peut d'aide, j'ai beau me creuser la tête, mais je n'arrive pas à trouver la formule J'ai un planning avec un mois par feuille (janvier, février, etc. .) et une colonne (AI) après le dernier jour du mois pour totaliser les congés de mes chaque noms, à savoir que mes feuilles je les mets au compte goutte, « pour une commodité si modifications ». En fin de classeur j'ai refait un tableau en reprenant ma liste de nom et une colonne pour chaque mois voir ci-dessous. Existerait-il une formule pour que je récupère mes totaux congés de chaque feuille sachant que j'ai des feuilles comme (avril, mai, etc) qui ne sont pas encore dans mon classeur, mais une fois incorporer que les totaux viennent s'inscrire dans les colonnes Salutations
janvier février mars Mai juin Dupont Durand Victor
Bonjour,
Les mois en D7,E7,..
En D8: =INDIRECT(D$7&"!AI"&LIGNE())
http://cjoint.com/?chivq4iQcy
JB- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents - Ajouter d'ans le module:
Sub auto_open() On Error Resume Next CommandBars.Add ("BarreColoriage") CommandBars("BarreColoriage").Visible = True For i = 1 To [Conges].Count Set bouton > > > > > CommandBars("BarreColoriage").Controls.Add(Type:=msoControlButton) bouton.Style = msoButtonCaption bouton.Tag = i bouton.OnAction = "'Coloriage """ & bouton.Tag & """'" bouton.Caption = Range("Conges")(i) Next i Application.DisplayFullScreen = True Application.CommandBars("BarreColoriage").Visible = True End Sub
Sub Coloriage(p) For Each c In Selection c.Value = Range("Conges")(p) Range("Conges")(p).Copy c Next c End Sub
Sub auto_close() On Error Resume Next Application.CommandBars("BarreColoriage").Delete Application.DisplayFullScreen = False End Sub
JB- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Bonjour & merci car cette formule je n'aurais pas put la construire, mais
elle fonctionne bien, le planning arrive en phase final.
Salutations
En D6:
=SI(JOURSEM(D2)=4;"s"&ENT(MOD(ENT((D2-2)/7)+0,6;52+5/28))+1;"")
On 11 fév, 17:40, Tibert <syle...@hotmail.fr> wrote:
Bonjour « JB »
Je suis toujours dans la construction de mon planning, pourrais tu me dire,
si tu peux comment faire, pour mettre une troisième ligne pour avoir les
numéro de semaine tu peux voir dans ton fichier « chivq4iQcy_Planning_jb »
qu'on a eu déjà l'occasion de s'échanger
-Agrandir le nom de champ 'Conges' (insertion/nom/définir)
-Sauvegarder
-Fermer puis ouvrir à nouveau
La dernière cellule du champ Conges corresponpond au caractère
d'efffacement.
JB
On 9 fév, 17:10, Tibert <syle...@hotmail.fr> wrote:
Bonjour « JB »
J'ai bien avancer dans mon planning, pourrais tu me dire d'où cela pourrais
provenir dans mon planning la (Barre coloriage) repris dans ton fichier «
chivq4iQcy_Planning_jb » quand je veux augmenter le nombre de lettre je suis
limiter à (6) même en augmentant la plage dans la feuille « couleurs » la
barre ne s'agrandit pas, peut tu m'apporter la solution pour que je puisse
augmenter le nombre de lettre dans la barre coloriage
Merci pour ton aide !
Salutations
On 7 fév, 10:26, Tibert <syle...@hotmail.fr> wrote:
Bonjour "JB"
Encore une questions, que dois je faire, si je veux ma barre
"BarreColoriage" en ayant mon fichier en mode (plein écran)
merci pour tout !
Salutations
On 7 fév, 06:29, Tibert <syle...@hotmail.fr> wrote:
Bonjour à tous ;
Recherche un peut d'aide, j'ai beau me creuser la tête, mais je n'arrive pas
à trouver la formule
J'ai un planning avec un mois par feuille (janvier, février, etc. .) et une
colonne (AI) après le dernier jour du mois pour totaliser les congés de mes
chaque noms, à savoir que mes feuilles je les mets au compte goutte, « pour
une commodité si modifications ».
En fin de classeur j'ai refait un tableau en reprenant ma liste de nom et
une colonne pour chaque mois voir ci-dessous.
Existerait-il une formule pour que je récupère mes totaux congés de chaque
feuille sachant que j'ai des feuilles comme (avril, mai, etc) qui ne sont pas
encore dans mon classeur, mais une fois incorporer que les totaux viennent
s'inscrire dans les colonnes
Salutations
janvier février mars Mai juin
Dupont
Durand
Victor
Bonjour,
Les mois en D7,E7,..
En D8: =INDIRECT(D$7&"!AI"&LIGNE())
http://cjoint.com/?chivq4iQcy
JB- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -
Ajouter d'ans le module:
Sub auto_open()
On Error Resume Next
CommandBars.Add ("BarreColoriage")
CommandBars("BarreColoriage").Visible = True
For i = 1 To [Conges].Count
Set bouton > > > > > CommandBars("BarreColoriage").Controls.Add(Type:=msoControlButton)
bouton.Style = msoButtonCaption
bouton.Tag = i
bouton.OnAction = "'Coloriage """ & bouton.Tag & """'"
bouton.Caption = Range("Conges")(i)
Next i
Application.DisplayFullScreen = True
Application.CommandBars("BarreColoriage").Visible = True
End Sub
Sub Coloriage(p)
For Each c In Selection
c.Value = Range("Conges")(p)
Range("Conges")(p).Copy c
Next c
End Sub
Sub auto_close()
On Error Resume Next
Application.CommandBars("BarreColoriage").Delete
Application.DisplayFullScreen = False
End Sub
JB- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -- Masquer le texte des messages précédents -
Bonjour & merci car cette formule je n'aurais pas put la construire, mais elle fonctionne bien, le planning arrive en phase final. Salutations
En D6: =SI(JOURSEM(D2)=4;"s"&ENT(MOD(ENT((D2-2)/7)+0,6;52+5/28))+1;"")
On 11 fév, 17:40, Tibert wrote:
Bonjour « JB » Je suis toujours dans la construction de mon planning, pourrais tu me dire, si tu peux comment faire, pour mettre une troisième ligne pour avoir les numéro de semaine tu peux voir dans ton fichier « chivq4iQcy_Planning_jb » qu'on a eu déjà l'occasion de s'échanger
-Agrandir le nom de champ 'Conges' (insertion/nom/définir) -Sauvegarder -Fermer puis ouvrir à nouveau
La dernière cellule du champ Conges corresponpond au caractère d'efffacement.
JB
On 9 fév, 17:10, Tibert wrote:
Bonjour « JB » J'ai bien avancer dans mon planning, pourrais tu me dire d'où cela pourrais provenir dans mon planning la (Barre coloriage) repris dans ton fichier « chivq4iQcy_Planning_jb » quand je veux augmenter le nombre de lettre je suis limiter à (6) même en augmentant la plage dans la feuille « couleurs » la barre ne s'agrandit pas, peut tu m'apporter la solution pour que je puisse augmenter le nombre de lettre dans la barre coloriage Merci pour ton aide ! Salutations
On 7 fév, 10:26, Tibert wrote:
Bonjour "JB" Encore une questions, que dois je faire, si je veux ma barre "BarreColoriage" en ayant mon fichier en mode (plein écran) merci pour tout ! Salutations
On 7 fév, 06:29, Tibert wrote:
Bonjour à tous ; Recherche un peut d'aide, j'ai beau me creuser la tête, mais je n'arrive pas à trouver la formule J'ai un planning avec un mois par feuille (janvier, février, etc. .) et une colonne (AI) après le dernier jour du mois pour totaliser les congés de mes chaque noms, à savoir que mes feuilles je les mets au compte goutte, « pour une commodité si modifications ». En fin de classeur j'ai refait un tableau en reprenant ma liste de nom et une colonne pour chaque mois voir ci-dessous. Existerait-il une formule pour que je récupère mes totaux congés de chaque feuille sachant que j'ai des feuilles comme (avril, mai, etc) qui ne sont pas encore dans mon classeur, mais une fois incorporer que les totaux viennent s'inscrire dans les colonnes Salutations
janvier février mars Mai juin Dupont Durand Victor
Bonjour,
Les mois en D7,E7,..
En D8: =INDIRECT(D$7&"!AI"&LIGNE())
http://cjoint.com/?chivq4iQcy
JB- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents - Ajouter d'ans le module:
Sub auto_open() On Error Resume Next CommandBars.Add ("BarreColoriage") CommandBars("BarreColoriage").Visible = True For i = 1 To [Conges].Count Set bouton > > > > > CommandBars("BarreColoriage").Controls.Add(Type:=msoControlButton) bouton.Style = msoButtonCaption bouton.Tag = i bouton.OnAction = "'Coloriage """ & bouton.Tag & """'" bouton.Caption = Range("Conges")(i) Next i Application.DisplayFullScreen = True Application.CommandBars("BarreColoriage").Visible = True End Sub
Sub Coloriage(p) For Each c In Selection c.Value = Range("Conges")(p) Range("Conges")(p).Copy c Next c End Sub
Sub auto_close() On Error Resume Next Application.CommandBars("BarreColoriage").Delete Application.DisplayFullScreen = False End Sub
JB- Masquer le texte des messages précédents -
- Afficher le texte des messages précédents -- Masquer le texte des messages précédents -
