Ajout du .value dans une macro Copy-Destination
t
Bonjour à tous,
J'ai une macro qui me permet de copier une partie des données vers une autre feuille.
Elle détecte la dernière ligne non vide dans la colonne, et colle à la suite
Mais celle ci me permet de faire uniquement du copié/collé, et non pas de coller les valeurs.
J'ai essayé de la modifier pour y rajouter un .value dans la destination, mais je ne m'en sors pas
Sub suivi()
Dim i As Integer
i = Feuil3.Range("J10").Value
Set PlageA = Feuil3.Range("A13:A" & 12 + i)
PlageA.Copy _
Destination:=Feuil13.Range("A65536").End(xlUp)(2)
End SubMerci d'avance pour votre aide les champions !
A
Bonjour,
un essai à tester :
Application.ScreenUpdating = False
Set PlageA = Feuil3.Range("A13:A" & 12 + i)
PlageA.Copy
DL = Feuil13.Range("B" & Rows.Count).End(xlUp).Row + 1
Feuil13.Range("B" & DL).PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = FalseA+
t
Ca fonctionne parfaitement merci beaucoup