Aide sur macro
Bonjour ,
Sub concatener_iris()
'
' concatener_iris Macro
'
'
Sheets("Iris").Select
Columns("C:C").Select
Selection.Insert Shift:=xlToRight, CopyOrigin:=xlFormatFromLeftOrAbove
Range("C2").Select
ActiveCell.FormulaR1C1 = "=LEFT(RC[-1],5)"
Range("C2").Select
Selection.AutoFill Destination:=Range("C2:C61")
Range("C2:C61").Select
Range("Q2").Select
ActiveCell.FormulaR1C1 = "=RC[-14]&"" ""&RC[-3]"
Range("Q2").Select
Selection.AutoFill Destination:=Range("Q2:Q61")
Range("Q2:Q61").Select
Columns("B:B").Select
Selection.Copy
Columns("R:R").Select
ActiveSheet.Paste
Sheets("Menu").Select
End Sub
ma macro créée une colonne et insère des formules mon seul problème c'est Sélection. AutoFill destination: =Range("C2: C61") et Sélection. AutoFill destination: =Range("Q2: Q61") je souhaiterais modifier cette partie jusqu'à la dernière ligne...
Merci pour votre aide
Bonjour
Si tu insères en C c'est que tu as une colonne B dont il faut trouver la dernière ligne et recomposer ta zone range figée en
range(cells(3,n°col),cells(dernière ligne,N)Col))
ci joint un exemple
Cordialement
FINDRH
Bonjour,
Je m'étais également intéressé au problème.
Ma solution en pièce jointe.
Cordialement
PS : Findrh, tu as une petite erreur dans ton code. A la dernière ligne, "Feuil1" au lieu de "Feuil"
Bonjour Yvouille
Merci pour ton regard vigilant et t syntaxe plus concise !
Cordialement
FINDRH
Bonjour ,
Merci a vous pour votre aide si precieuse