Dans mon onglet Feuil1 se trouve un tableau que j'ai récupéré dans un autre
fichier.
Dans ma Feuil2, je ne recopie que les lignes qui sont uniques sur ma Feuil1.
Ensuite je recopie manuellement la formule :
=SOMMEPROD(Feuil1!A2:A269=A1)*.......(Feuil1!H2:H269=H1);Feuil1!K2:K269) en
tirant la cellule vers le bas.
Est-il possible de faire une copie de cette cellule que sur le nombre de
ligne ayant une valeur et en incrementant cette formule automatiquement.
Car ce mois ci je n'aurais que 25 lignes mais le mois prochain je peux en
avoir 50 etc.
Merci pour votre aide. En effet, la colonne A était vide sur la ligne de départ. Erreur de ma part, car j'avais coloré les autres colonnes en blanc sur fond blanc. On devrait arréter de bosser aprés 16h00, cela eviterais les conneries de ce genre :-)
Encore merci pour votre aide et pour m'avoir proposer l'envoi de mon fichier. Je retourne à mes fichiers mais ne croyait pas en avoir fini avec moi, j'ai pleins d'idées et donc pleins de questions.
Encore merci pour tout.
Re.. Si tu le souhaites, une copie brouillon de ton fichier sur: http://cjoint.com
A demain JJ
"Jacky" a écrit dans le message de news:
Re.. Sûrement que colonne A est vide, non ??
JJ
"lolo" a écrit dans le message de news:
Rien ne se passe. J'ai mis un msgbox en plein milieu pour voir la valeur de derl, et il n'y a rien. derl est vide.
Bonjour, En supposant que ta formule se trouve en feuil1 B2 et que tu souhaites
la
copier en colonne B de la feuille 2 en fonction des données en colonne
A
Ceci pourrait convenir: '----------- Sub jj() On Error Resume Next derl = [A:A].Find("*", , 1, , 2, 2).Row Sheets("Feuil1").[b2].Copy Sheets("Feuil2").Range("b2:b" & derl) On Error GoTo 0 End Sub '----------- En mettant les "$" pour les cellules non incrémentées dans la formule
de
départ. Salutations JJ
"Comres.metz" a écrit dans le message de news:4333ed3a$0$7853$
Rebonjour à toutes et à tous,
Dans mon onglet Feuil1 se trouve un tableau que j'ai récupéré dans un
autre
fichier. Dans ma Feuil2, je ne recopie que les lignes qui sont uniques sur ma
Est-il possible de faire une copie de cette cellule que sur le nombre
de
ligne ayant une valeur et en incrementant cette formule
automatiquement.
Car ce mois ci je n'aurais que 25 lignes mais le mois prochain je peux
en
avoir 50 etc.
Merci pour votre aide. En effet, la colonne A était vide sur la ligne de
départ.
Erreur de ma part, car j'avais coloré les autres colonnes en blanc sur
fond blanc.
On devrait arréter de bosser aprés 16h00, cela eviterais les conneries
de ce genre :-)
Encore merci pour votre aide et pour m'avoir proposer l'envoi de mon
fichier.
Je retourne à mes fichiers mais ne croyait pas en avoir fini avec moi,
j'ai pleins d'idées et donc pleins de questions.
Encore merci pour tout.
Re..
Si tu le souhaites, une copie brouillon de ton fichier sur:
http://cjoint.com
A demain
JJ
"Jacky" <nospam@bidon.fr> a écrit dans le message de
news:OyARE0FwFHA.3452@TK2MSFTNGP14.phx.gbl...
Re..
Sûrement que colonne A est vide, non ??
JJ
"lolo" <l.maire_nospams_@free.fr> a écrit dans le message de
news:43342B66.6030908@free.fr...
Rien ne se passe.
J'ai mis un msgbox en plein milieu pour voir la valeur de derl, et il
n'y a rien. derl est vide.
Bonjour,
En supposant que ta formule se trouve en feuil1 B2 et que tu souhaites
la
copier en colonne B de la feuille 2 en fonction des données en colonne
A
Ceci pourrait convenir:
'-----------
Sub jj()
On Error Resume Next
derl = [A:A].Find("*", , 1, , 2, 2).Row
Sheets("Feuil1").[b2].Copy Sheets("Feuil2").Range("b2:b" & derl)
On Error GoTo 0
End Sub
'-----------
En mettant les "$" pour les cellules non incrémentées dans la formule
de
départ.
Salutations
JJ
"Comres.metz" <comres.metz@gendarmerie.net> a écrit dans le message de
news:4333ed3a$0$7853$8fcfb975@news.wanadoo.fr...
Rebonjour à toutes et à tous,
Dans mon onglet Feuil1 se trouve un tableau que j'ai récupéré dans un
autre
fichier.
Dans ma Feuil2, je ne recopie que les lignes qui sont uniques sur ma
Merci pour votre aide. En effet, la colonne A était vide sur la ligne de départ. Erreur de ma part, car j'avais coloré les autres colonnes en blanc sur fond blanc. On devrait arréter de bosser aprés 16h00, cela eviterais les conneries de ce genre :-)
Encore merci pour votre aide et pour m'avoir proposer l'envoi de mon fichier. Je retourne à mes fichiers mais ne croyait pas en avoir fini avec moi, j'ai pleins d'idées et donc pleins de questions.
Encore merci pour tout.
Re.. Si tu le souhaites, une copie brouillon de ton fichier sur: http://cjoint.com
A demain JJ
"Jacky" a écrit dans le message de news:
Re.. Sûrement que colonne A est vide, non ??
JJ
"lolo" a écrit dans le message de news:
Rien ne se passe. J'ai mis un msgbox en plein milieu pour voir la valeur de derl, et il n'y a rien. derl est vide.
Bonjour, En supposant que ta formule se trouve en feuil1 B2 et que tu souhaites
la
copier en colonne B de la feuille 2 en fonction des données en colonne
A
Ceci pourrait convenir: '----------- Sub jj() On Error Resume Next derl = [A:A].Find("*", , 1, , 2, 2).Row Sheets("Feuil1").[b2].Copy Sheets("Feuil2").Range("b2:b" & derl) On Error GoTo 0 End Sub '----------- En mettant les "$" pour les cellules non incrémentées dans la formule
de
départ. Salutations JJ
"Comres.metz" a écrit dans le message de news:4333ed3a$0$7853$
Rebonjour à toutes et à tous,
Dans mon onglet Feuil1 se trouve un tableau que j'ai récupéré dans un
autre
fichier. Dans ma Feuil2, je ne recopie que les lignes qui sont uniques sur ma
