Bonjour à tous,
J'ai un petit niveau sur VBA, mais la je vois pas ce qui cloche...
J'ai même essayé avec Activesheet.paste mais rien n'y fait, ça bloque ici...
Merci pour votre aide
J'ai un petit niveau sur VBA, mais la je vois pas ce qui cloche...
VB:
Sheets("S1").Select
Range("E2:BZ2000").Select
Selection.ClearContents
Application.Calculate
Workbooks.Open (C9)
Cells.Select
Range("A2").Activate
Selection.Copy
Windows(C2).Activate
Sheets("S1").Range("E2").Select
Selection.Paste <==========ICI
Application.DisplayAlerts = False
Workbooks(C9).Close False
Application.DisplayAlerts = True
J'ai même essayé avec Activesheet.paste mais rien n'y fait, ça bloque ici...
Merci pour votre aide