Bonjour
Je debute sous VBA et j'aimerai savoir comment faire pour utiliser range avec une variable, dans une boucle.
Je vous donne mon code
Merci d'avance
Benoit
Sub test()
'
' test Macro
' Macro recorded 12/08/2004 by Benoit Evrard
'
'
Dim COMPTEUR, AUTRE, BOX
For COMPTEUR = I To BW
AUTRE = 8
BOX = "COMPTEUR$92"
If BOX <> 0 Then
NOUVEAU = Range("COMPTEUR$5").Address
Range(NOUVEAU$).Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet2").Select
Range("A$AUTRE").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
Sheets("Sheet1").Select
Range("COMPTEUR$4").Select
Application.CutCopyMode = False
Selection.Copy
Sheets("Sheet2").Select
Range("B$AUTRE").Select
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
AUTRE = AUTRE + 1
Else
End If
Next
End Sub