Résultats de la recherche

Après quelque heure de recherche j'ai trouvé. Voilà pour qui ça peut intéresser. Private Sub CommandButton1_Click() Sheets("année").Select Dim c As Date c = Sheets("année").Rows(1).Find(what:=Range("a2").Value, LookIn:=xlValues) Dim x As Range Set x = Sheets("année").Range("b1:q1").Find(c, ...

Voila, essaye le fichier...

Bonjour, est il possible de placer avec le bouton, un "H" dans le tableau de la page "année" en fonction de la date et en face de chaque personne, en fonction des jours férié specifier dans la page "parametres" ? J'ai essayé en vain, je me suis perdu dans le méandre des code du VBA. Merci...

Merci beaucoup pour ton aide

J'ai modifier le code comme ceci. Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) a = ActiveSheet.Range("A4").ListObject.Name b = ActiveSheet.Name If Not Application.Intersect(Target, Range("A3")) Is Nothing Then ActiveSheet.Name = Target End If...

on avance petit a petit. ça bog a la ligne "ActiveWorkbook.Worksheets(b).ListObjects(a).Sort.SortFields. _" Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range) a = ActiveSheet.Range("A4").ListObject.Name b = ActiveSheet.Name If Not Application.Intersect(Target...

Merci pour la réponse mais le code ne fonctionne pas ! Qu'est ce qui active le code ? et la ligne Add2 Key:=Range("Tableau2[[#All],[O/F]]"), SortOn:=xlSortOnValues, Order _ çà veut dire que mon tableau doit s'appeler "Tableau2" ?

Le problème c'est que je vais créer plusieurs feuille avec des noms different et le tableau dans chaque feuille va avoir un nom different donc le code n'est plus bon. merci pour la reponse

Bonjour, J'ai un classeur avec une feuille par jour, le nom de la feuille est égale a la cellule A3 (une date), je voudrai bien quand je clic sur une feuille que le tableau dessus soit filtré. Il faut afficher ("C", "CS", "F", "H", "HS", "M", "O", "P", "RF", "VA/HS") dans la colonne O/F et la...

Un grand merci. Excuse moi de mettre mal exprimé

Quand je fais cette manipulation en manuel, je retire la protection de la feuille "année", je sélectionne les cellules du "01/01/20 au 10/01/20" a la ligne de "Carine", je copie, je fais un collage special (coller valeur) et je remet la protection. Je dois faire cette manipulation sur plusieurs...

Non c'est pas vraiment ce qu'il me faut. c'est pas facile d'exprimer sont idée en Français. Si on inscrit dans la feuille "Parametres" le nom de "Carine" dans A3, la date de debut "01-01-20" dans B3 et la date de fin "10-10-20" dans C3. Et que l'on clic sur un bouton, je voudrai bien que dans...

En faite, en fonction des infos de la feuille "parametre" au cellule A3, B3 et C3. (cellules en face du nom "Carine" de la date 01/01/20 au 10/01/20) Ca va dans la feuille "année" en B16 à K16 retirer la formule dans chaque cellule et mettre la valeur. Et le faire dans plusieurs feuille. Est ce...

Bonsoir François Votre code fonctionne pas mal. Mais il copie les cellules sur la feuille "parametre" et je souhaite copier sur la feuille "année". Je ne sais pas si j'arrive a bien décrire ce que je souhaite ? merci pour cette réponse aussi rapide

merci pour la réponse mais ça ne sélectionne pas les cellules en fonction du nom écrit en A3.

Bonjour, est il possible de m'aider ? Je voudrai bien faire ceci en VBA. Si on inscrit dans la feuille "Parametres" le nom de "Carine" dans A3, la date de debut "01-01-20" dans B3 et la date de fin "10-10-20" dans C3. Et que le clic sur un bouton Je voudrai bien que çà : -retirer la protection...

C'est exactement ça qu'il me fallait. En plus avec les commentaire je comprend plus ou moins le scripte. Merci beaucoup

Bonjour, Je crois que je me suis mal exprimé. Je voudrai bien mettre le contenu de la cellule B10 de la feuille "Absence" en commentaire dans la cellule B12 de la feuille "Année" Faire ça pour chaque cellule de la ligne 10 de B a NC (feuille Absence) vers la ligne 12 de B a NC (feuille Année)...

Bonjour, je voudrai bien mettre en commentaire le contenu d'une cellule d'une autre feuille. Il faudrait retirer la protection de la feuille avant et ensuite la remettre. J'ai trouvé un code mais impossible de modifier pour mon classeur. merci pour votre aide. Private Sub...