Contenu récent par thespeedy20

Bonsoir Job75 Merci beaucoup pour l'info, cela fonctionne nickel. @+ OLi

Bonjour à tous, Je dois dupliquer, une ligne d'un tableau (choix par inputbox) quand cela est nécessaire, la coller juste après après celle-ci, j'y arrive avec la macro présente dans mon fichier, le soucis que si j'essaye de dupliquer la dernière ligne de mon tableau, il copie la ligne hors du...

Je comprends...Merci, bon we

Bonjour à tous, @sylvanu J'ai essayé de faire un récap (10 noms par feuille, le modèle est dans fichier) en partant de la dernière macro que tu as écrite, mon soucis c'est qu'il copie 10 x le même nom sur la feuille...et autant de feuille que de nom... surement un problème de boucle ? OLi

re, c'est exactement ce que je désirais... mille et une excuses pour mon manque de clarté... Merci beaucoup Sylvanu Ps : j'ai du remplacer Set Plage = Farr.[A1.G52] par Set Plage = Farr.[A1:G52] car j'avais une erreur d'incompatibilité...;)

re, Je suis sincèrement désolé, je vais essayer de m'exprimer plus clairement... Le but est de transférer nom - prénom - date de naissance et adresse complète sur le Débition_Caution_Ind de la façon suivante : En B33 : nom + prénom En B35 : date de naissance En B37 : adresse + code postal +...

Bonjour Sylvanu, oui effectivement , dans les cas il y a un soucis...:eek: Est-il possible alors de contourner ces problèmes et d'arriver à ce que je désirais faire...? Autre méthode, autre approche ... ? OLi

re, Le but, c'était de prendre les données filtrées, et les insérés dans une feuille et répéter l'opération autant de fois que de données... Les données sur chaque feuille doivent se trouver En B33 : nom + prénom En B35 : date de naissance En B37 : adresse + code postal + localité Voilà...

re, J'ai repris l'idée d'une macro que j'ai trouvé sur le net afin de tester les tableaux, et je n'en sais pas plus malheureusement... si je change les ET en OU, les résultats sont totalement différents...ils collent les données des autres feuilles... j'ai effectué le changement et c'est vrai...

Re, Sub DCI() Dim a As Integer Dim tabloR(), tablo Dim FDep As Worksheet: Set FDep = Worksheets("Données") Dim Farr As Worksheet: Set Farr = Worksheets("Débition_Caution_Ind") Dim ws As Worksheet Dim LR1 As Long, LR2 As Long Dim sTableau As String...

Bonjour Sylvanu, je ne vois pas comment m'y prendre...quelle boucle utilisée.. , le end if et le next...en un mot je galère.... Merci encore une fois pour ton aide

Bonjour Deadpool_CC, merci pour l'astuce...;) A+ OLi

Merci beaucoup pour ton aide et ta patience Sylvanu... Juste une chose comment obtiens tu le résultat du post 8 @+ Oli

re, comme ceci : For a = 1 To UBound(tablo) ReDim tabloR(29, 1 To 4) ' If a > UBound(tablo) Then Exit For If tablo(a, 0) <> "" Then r = 2 tabloR(r, 1) = tablo(a, 1) & " " &...

re, Non car je ne sais pas ou je dois le mettre. Je découvre les tableaux, là c'est galère pour moi... Je dois boucler comme ceci ? For N = 0 To [Tableau1].Rows.Count If tablo(N, 0) <> "" Then OLi