R: augmentation da la valeur d'une cellule en cliquant

Bonjour

Je cherche un code vb sert à cliquer sur un bouton

Bon si la valeur de la cellule choisie B3 (le code vb en bas) est vide il va écrire le chiffre : 1

Si non il va écrire i+1 (incrémentation)

J’ai essayé comme mais je n’ai pas arrivé

Merci à vous

Sub Suivant_Cliquer()

Dim i As Integer

For i = 3 To 44

If Val(Feuil1.Cells(3, b)) = "" Then

Feuil1.Cells(c, i) = 1

Else

Feuil1.Cells(c, i) = i + 1

End If

Next

End Sub

Bonsoir

Peut-être comme ceci

Sub Suivant_Cliquer()
  Feuil1.Range("B3") = Feuil1.Range("B3") + 1
 End Sub
Banzai64 a écrit :

Bonsoir

Peut-être comme ceci

Sub Suivant_Cliquer()
  Feuil1.Range("B3") = Feuil1.Range("B3") + 1
 End Sub

Merci Bien

C’est magnifique

bonjour

je sais pas mais il donne souvet

erreur d'execution 424 - objet requis

y'a t'il une solution

Bonsoir

Un code si simple ne devrait pas le faire

Détermine exactement quand il te génère l'erreur afin que l'on puisse le reproduire

A suivre

Rechercher des sujets similaires à "augmentation valeur cliquant"