J
Jamal
Guest
Bonjour à tous le forum,
Voila mon souci.
J'importe des données.
Je crée une formule (si..)sur la première cellule vide à coté ( F2).
Je veux la copier sur la dernier ligne de mon tableau. je me suis mis sur une cellule de mon tableau, j'ai fait(ctrl+Maj+bas) pour aller à la derniere cellule. ensuite je me suis décalé pour etre en dessous de ma colonne de formule, j'ai fait(ctrl+Maj+haut)puis coller
Mais mon problème c'est qu'il me met
Range('E7742').Select
Ca ne me convient pas car mon tableau bougera lors d'un future import. (le nombre de ligne ne sera plus le même)
Voici une partie de la macro (fait avec l'assistant macro):
Range('F2').Select
ActiveCell.FormulaR1C1 = '=IF(RC[-2]=RC[-1],0,1)'
Range('E2').Select
Selection.Copy
Range('B1').Select
Selection.End(xlDown).Select
Range('E7742').Select
Range(Selection, Selection.End(xlUp)).Select
ActiveSheet.Paste
ActiveWindow.ScrollRow = 1
J'éspère avoir été le plus clair possible.
A+++++++++++++++++++++++++
Voila mon souci.
J'importe des données.
Je crée une formule (si..)sur la première cellule vide à coté ( F2).
Je veux la copier sur la dernier ligne de mon tableau. je me suis mis sur une cellule de mon tableau, j'ai fait(ctrl+Maj+bas) pour aller à la derniere cellule. ensuite je me suis décalé pour etre en dessous de ma colonne de formule, j'ai fait(ctrl+Maj+haut)puis coller
Mais mon problème c'est qu'il me met
Range('E7742').Select
Ca ne me convient pas car mon tableau bougera lors d'un future import. (le nombre de ligne ne sera plus le même)
Voici une partie de la macro (fait avec l'assistant macro):
Range('F2').Select
ActiveCell.FormulaR1C1 = '=IF(RC[-2]=RC[-1],0,1)'
Range('E2').Select
Selection.Copy
Range('B1').Select
Selection.End(xlDown).Select
Range('E7742').Select
Range(Selection, Selection.End(xlUp)).Select
ActiveSheet.Paste
ActiveWindow.ScrollRow = 1
J'éspère avoir été le plus clair possible.
A+++++++++++++++++++++++++