range avec variable

[zoef747]

bonjour
je voudrais activer une cellule en fontion d'une variable excel n'a pas l'air d'accord !!

Dim k As Integer
Do
Range("A" & k).Activate
ActiveCell = k
k = k + 1
Loop Until k > 10


ca me donne:
Erreure d'execution '1004'
La méthode 'Range' de l'objet '_Global' a échoué

merci d'avance

 

[Catrice]

Re : range avec variable

Bonsoir,

Il faut initialiser k

Sub test()
Dim k As Integer
k = 1
Do
Range("A" & k).Activate
ActiveCell = k
k = k + 1
Loop Until k > 10

End Sub

 

[Spitnolan08]

Re : range avec variable

Bonsoir,

Il faut que tu définisses k avant d'activer la cellule sinon Excel ne sait pas quelle valeur attribuer à k... Par exemple :

 Dim k As Integer
Do
For k = 1 to 10
Range("A" & k)= k
next

Cordialement

 

[zoef747]

Re : range avec variable

merci,

je me sens un peu ridicule ...