bonjour
je souhaite remplacer un bout de code ( copy - paste ) qui utilise le presse papier
(en espérant que cela influe sur ma macro )
Par un COPY DESTINATION
ce que j'ai déjà essayé ne fonctionne pas pour le moment
With F08
debut = .Range("E1").End(xlDown).Row
f06.Range("A2:F" & f06.Range("A2").End(xlDown).Row).Copy ' Destination:=F08.Range("A" & debut + 1) ne fonctionne pas
' F06.Range("A2:F" & F06.Range("A2").End(xlDown).Row).Copy Destination:=F08.Range("A65536:F65536").End(xlUp)(2)
' ne foncitonne pas
' f06.Range("A2:F" & f06.Range("A2").End(xlDown).Row).Copy Destination:=F08.[debut] ne fonctionne pas
.Range("A" & Rows.Count).End(xlUp).Offset(1).PasteSpecial Paste:=xlPasteValuesAndNumberFormats 'collage specail valeur
Application.CutCopyMode = False
fin = .Range("A1").End(xlDown).Row