Discussion :

[bird007]

Bonjour,
Je voudrais bien créer un compteur qui se deplace vers l'adroite, c'està dire par ex il se pointe sur le C4 et après sur le D4. Comment le faire?

Merci

[bird007]

bonjour,
Merci pour ta reponse
en revanche, je me demandais si tu pourrais me corriger ce code car ca s'execute mais ca donne rien comme resultat

code:
[

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
Sub test_si()
 
Application.ScreenUpdating = False
 
    '
            Sheets("CA(PS)").Select
            Sheets("CA(PS)").Range("AE10") = ActiveCell
            CPT = 0
            Do Until CPT < 48
                If ("E10") < ("AE9") Then
                ActiveCell.Value = 0
                Else
                ActiveCell.Value = 1
                End If
                CPT = CPT + 1
 
                Loop
 
Application.ScreenUpdating = True
End Sub

Merci