Discussion :

[dafchap]

Bonjour,

le titre de ce sujet est un peu confus j'en conviens, mais je n'arrive pas à résumer en quelques mots le problème que voici :
en fait dans le code ci-dessous je veux, par une boucle, afficher dans Cells(1,1) "5", dans Cells(2,1) "9", etc. Mais bien sûr mon code m'affiche dans Cells(1,1) "C1", dans Cells(2,1) "C2", etc.
Qu'est-ce qui manque dans mon code pour afficher ce que je veux ?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
Dim C1 As Double
Dim C2 As Double
Dim C3 As Double
Dim C4 As Double
 
C1 = 5
C2 = 9
C3 = 12
C4 = 20
 
  ActiveWorkbook.Worksheets.Add
 
  For i = 1 To 4
 
    Cells(i, 1).Select
    ActiveCell.FormulaR1C1 = "C" & i
 
    Next i
 
 
End Sub

Merci d'avance pour vos retours,

David

[Marc-L]

Bonjour,

ne pas confondre texte et variable !

Utiliser les variables tableaux en VBA Excel …

______________________________________________________________________________________________________

Je suis Paris, Charlie, Bruxelles, …

[ZX12R]

Bonjour,

Tu peux utiliser une variable tableau qui te permettra d'utiliser i comme indice.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
Sub test()
Dim MyArray(4) As Integer
Dim I As Integer
 
MyArray(1) = 4
MyArray(2) = 6
MyArray(3) = 3
MyArray(4) = 8
 
For I = 1 To 4
 
    Cells(1, I) = MyArray(I)
 
Next
 
End Sub

Cordialement.

Bruno

[dafchap]

Ok, merci Bruno. Je pensais qu'il y avait une astuce syntaxique pour résoudre mon problème, sans passer par un tableau.
Apparemment non. Je vais donc utiliser ta méthode.

Cordialement,

David

[Marc-L]

Et après voir lu le tutoriel, tu pourras même te passer de la boucle inutile !