Incrémenter une cellule

Bonjour à toutes et à tous

Voici ma demande

Jaimerais par 2 touches bouton "ClicPlus et ClicMoins" incrémenter une cellule plus ou moins 1

je vous mais un exemple plus parlant

Merci de vos réponses

20incrementerc4.zip (4.08 Ko)

Bonjour,

Un exemple dans le fichier joint.

Cdlt.

9incrementerc4.zip (13.04 Ko)
Public Sub Add_1()
    With ActiveSheet
        .Cells(4, 3).Value = .Cells(4, 3).Value + 1
    End With
End Sub

Public Sub Substract_1()
    With ActiveSheet
        .Cells(4, 3).Value = .Cells(4, 3).Value - 1
    End With
End Sub

Merci Eric de ta réponse spid

Je mais ça en place dans mon programme et je te tiens au courant

Bonjour a tous

Parfait ERIC c'est top :

Rechercher des sujets similaires à "incrementer"