copier/coller dans dernière ligne uniquement valeur

pascal21

XLDnaute Barbatruc
Code:
With Sheets("planning") .Range("A1:p1").Copy Sheets("sauvegardes").Range("c65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues
bonjour j'ai essayé ce code mais j'ai une erreur de syntaxe
pouvez-vous la rectifier
merci
 

Staple1600

XLDnaute Barbatruc
Re : copier/coller dans dernière ligne uniquement valeur

Bonjour


On peut avoir le code dans son intégralité ?

Car ici et ainsi cela semble fonctionner
Code:
Sub b()
Sheets(1).Range("A1:P1").Copy
Sheets(2).Range("c65536").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues
End Sub
 
Dernière édition:

Discussions similaires

Statistiques des forums

Discussions
312 177
Messages
2 085 971
Membres
103 073
dernier inscrit
MSCHOE16