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