M_le_maudit
XLDnaute Nouveau
bonjour je débute en vba, et je voudrais passer à la ligne lorsque je click sur un bouton et que ma macro se réalise.voici mon programme:
Sub ARCHIVERS()
Sheets("feuil1").Range("A9,B9,C9,D9,E9").Copy
Sheets("feuil3").Select
Cells(1, Range("IV1").End(xlToLeft).Row + 1).PasteSpecial Paste:=xlPasteValues
Cells(1, Range("IV3").End(xlToLeft).Row + 1) = Date$ & " " & Time
Cells(1, Range("IV4").End(xlToLeft).Row + 1).PasteSpecial Paste:=xlPasteValues
Cells(1, Range("IV4").End(xlToLeft).Row + 1).PasteSpecial Paste:=xlPasteFormats
End Sub
es-ce que quelqu'un pourrais m'aider? PLEASE
Sub ARCHIVERS()
Sheets("feuil1").Range("A9,B9,C9,D9,E9").Copy
Sheets("feuil3").Select
Cells(1, Range("IV1").End(xlToLeft).Row + 1).PasteSpecial Paste:=xlPasteValues
Cells(1, Range("IV3").End(xlToLeft).Row + 1) = Date$ & " " & Time
Cells(1, Range("IV4").End(xlToLeft).Row + 1).PasteSpecial Paste:=xlPasteValues
Cells(1, Range("IV4").End(xlToLeft).Row + 1).PasteSpecial Paste:=xlPasteFormats
End Sub
es-ce que quelqu'un pourrais m'aider? PLEASE