macro de défilement

[Goose]

Bjr à tous,

je cherche à faire une macro qui me permette de faire défiler des nombres par touche successive (via des boutons) dans une cellule genre "+" et "-", afin d'afficher un score de basket
merci de votre aide
@+

 

[Efgé]

Re : macro de défilement

Bonjour Goose,
Avec un petit fichier exemple, et un peu plus de précisions, il est toujours plus simple de trouver réponse...
Cordialement

 

[Efgé]

Re : macro de défilement

Re
J'envoi ça, si j'ai bien compris..
Cordialement

 

[Goose]

Re : macro de défilement

Bjr Efgé et merci pour cette macro...
ci-joint ton fichier avec quelques rajouts et une question
@+

 

[Efgé]

Re : macro de défilement

Re,
Pour la macro reset je propose:

Sub Reset_set2()
    Range("D5,D7,F5,F7,H5,H7,J5,J7,L5,L7").Value = "0"
End Sub

Pour la ventilation je propose:

Sub Ventiler()
For i = Range("N65536").End(xlUp).Row To 12 Step -1
    If Cells(i, 14).Value = Cells(3, 2).Value Then
        Cells(i, 15).Value = Cells(5, 4).Value
        Cells(i, 16).Value = Cells(5, 6).Value
        Cells(i, 17).Value = Cells(5, 8).Value
        Cells(i, 18).Value = Cells(5, 10).Value
        Cells(i, 19).Value = Cells(5, 12).Value
        Cells(i + 1, 15).Value = Cells(7, 4).Value
        Cells(i + 1, 16).Value = Cells(7, 6).Value
        Cells(i + 1, 17).Value = Cells(7, 8).Value
        Cells(i + 1, 18).Value = Cells(7, 10).Value
        Cells(i + 1, 19).Value = Cells(7, 12).Value
    End If
Next i
End Sub

Cordialement

 

[Efgé]

Re : macro de défilement

EDIT : Il faut copier/coller la cellule B3 en N12, N15 etc... pour que la macro reconnaisse les valeurs.

 

[Goose]

Re : macro de défilement

une fois de plus merci pour ton aide,
par ailleurs, la macro "Ventiler" ne s'exécute Pas ???

 

[Efgé]

Re : macro de défilement

Voir mon EDIT un peu plus haut :
Il faut copier/coller la cellule B3 en N12, N15 etc... pour que la macro reconnaisse les valeurs.
Cordialement

 

[Goose]

Re : macro de défilement

autant pour moi je n'ai pas vu ton édit avant de poster !!!
c'est nikel
@+

 

[Efgé]

Re : macro de défilement

Re,
A cause de mon réseau pro, je ne peux pas éditer mes post (c'est énervant...)
Donc: Edit: voici le fichier..