Re : Rationaliser la constitution de mon fichier
Bonsoir à tous,
Depuis que JP m'a répondu, je cherche, je lis les questions et les réponses, j'avance doucement.
Néanmoins, je ne parviens à utiliser une variable pour définir une plage:
J'ai fait ceci:
' Identification de l'antenne concernée
derliA = Range("A65536").End(xlUp).Row
Range("AG2").Select
ActiveCell.FormulaR1C1 = _
"=+VLOOKUP(""Ale2"",'[Fichier .xls]Antennes'!R3C1:R15C3,3)"
Range("AG2:AG" & derliA).Select
Selection.FillDown
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
'Fin de l'identification de l'antenne concernée
'derliA = Range("A65536").End(xlUp).Row + 1
'derCol = Range("IV5").End(xlToLeft).Column
'Range("A2:AG" & derliA).Copy Range("A2:AG" & derliA)
'Range("A2:AG" & derliA).Copy Range("A2:AG" & derliA)
Application.Goto Reference:="R2C1:R5000C33"
Selection.Copy
Windows("Fichier rap.xls").Activate
[A65536].Select
Selection.End(xlUp)(2).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
[A65536].Select
Selection.End(xlUp)(2).Select
Application.CutCopyMode = False
Il y a une apostrophe devant mes essais infructueux
Et je ne m'en sors pas.
si quelqu'un peut m'éclairer...
Merci
|