Discussion :

[anouar2012]

bonjour a tous
mon problème se résume comme suit:
j'ai un tableau contenant la présence des employés a chaque fois que excel remarque 3 jour successif A-ANJ (absence non justifié) il écrit "Lettre d'absence" mon problème se situ au niveau de la réalisation d'un recap dans la feuille "Action" tous en regroupant seulement les employées ayant une lettre d'absence et la date de début d'absence .
quelqu’un peu m'aider SVP
le tableau ci-joint explique le Problème)

Merci d'avance

[CristofMartins]

Salut,
Une méthode qui est pas mal c'est de créer un tableau.
Tu va me dire que tu la crée et tout mais on ne parle pas du même type de tableau.
Avec XL-2010 et aussi 2007 il me semble, dans insertion tu va sur tableau.
Tu sélectionne tout ton tableau existant, y compris les titres, et tu sélectionne que ton tabl. comprend des titres.

Quand tu clique sur une case de ton tableau, dans création tu peux le renommer.

Tu fais exactement la même chose pour ton tableau dans ACTION.

Et maintenant tu n'a plus que envoyer les données via VBA.

ex:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Dim feuille_1_tableau as Worksheet
Dim feuille_2_tableau as Worksheet

Dim tab1List as ListObject
Dim tab2List as ListObject 

Set feuille_1_tableau = sheets("Nom de ta feuille")
Set feuille_2_tableau = sheets("Nom de ta feuille2")

tab1list = feuille_1_tableau .listObjects("Nom de ton tableau")
tab2list = feuille_2_tableau .listObjects("Nom de ton tableau")

' Recherche d'une personne par exemple 

foreach var in tab1list.listrows
   if tab1list.listcolumns("Titre d'une colonne").range(var.index +1) = "jean pierre"
        tab2list.listcolumns("titre d'une colonne").range(var.index + 1) = tab1list.colimns("Titre d'une colonne").range(var.index + 1)

   end if

Next var

Essaye de comprendre et modifie pour que ça marche chez toi.
Salutations.

[anouar2012]

bonjour a tous,
Merci cher ami pour votre magnifique réponse
elle me convient très bien ça fonctionne
merci bcp