N
Nico_OOo
Guest
Sub Copie_Cell_X_Y()
'
' Copie_Cell_X_Y Macro
' Macro enregistrée le 27/04/2004 par NS
'
Dim x As Integer
Dim y As Integer
x = 2
y = 3
'
ActiveWindow.ScrollRow = 1
Range(x, y).Select '<- c'est ici que ca ne vas pas ! je n'ai pas la syntaxe.
Selection.Copy
Sheets("Feuil1").Select
Range("F10").Select
ActiveSheet.Paste
Range("F11").Select
End Sub
'
' Copie_Cell_X_Y Macro
' Macro enregistrée le 27/04/2004 par NS
'
Dim x As Integer
Dim y As Integer
x = 2
y = 3
'
ActiveWindow.ScrollRow = 1
Range(x, y).Select '<- c'est ici que ca ne vas pas ! je n'ai pas la syntaxe.
Selection.Copy
Sheets("Feuil1").Select
Range("F10").Select
ActiveSheet.Paste
Range("F11").Select
End Sub