Bonjour,
J'ai essayé de profiter de toutes les bonnes infos de ce forum pour monter un tableau qui fini par être un peu complexe et je n'arrive pas à comprendre ce qui cloche dans la macro suivante :
Selection.Copy
Sheets("Archives").Select
Range("A65536").End(xlUp).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Sheets("Données").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlUp
Apparemment c'est la 3° ligne qui coince...
Merci de votre éclairage...
Bien cordialement,
Stéphane
J'ai essayé de profiter de toutes les bonnes infos de ce forum pour monter un tableau qui fini par être un peu complexe et je n'arrive pas à comprendre ce qui cloche dans la macro suivante :
Selection.Copy
Sheets("Archives").Select
Range("A65536").End(xlUp).Offset(1, 0).Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Sheets("Données").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlUp
Apparemment c'est la 3° ligne qui coince...
Merci de votre éclairage...
Bien cordialement,
Stéphane