Bonjour à tous,

Je voudrais sélectionner une plage de cellule à partir du moment ou ces cellules deviennent des chiffres. Voici ma macro, qui ne fonctionne pas :


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
Sub Graph_Rad()
 
Dim i As Integer
Dim j As Integer
 
j = 2
 
For i = 1 To 10
 
If Not WorksheetFunction.IsText(Cells(B, i).Value) Then j = j + 1
 
Next
 
End Sub
 
Cells(a, j).Select
Range(ActiveCell, "C10").Select
 
End Sub