COMPTEUR EN VB

[NATACHA]

BONJOUR LE FORUM
BONJOUR A VOUS

JE RECHERCHE COMMENT FAIRE EN VBA UN INCREMENT A CHAQUE FOIS QUE LA VALEUR DE B CHANGE

VOIR LA PIECE JOINTE

MERCI DE VOTRE AIDE

NATACHA

 

[Georges]

Bonjour Natacha,

Voici une tentative de réponse.

A+

Georges

 

[Hervé]

Salut natacha

Je ne suis pas sur d'avoir tout compris quand tu dis "LA VALEUR DE B CHANGE" ton exemple montre le contraire (??).

regarde la pièce jointe.

PS : sur les forums les majuscules sont réservées aux énervés.

salut
Hervé

 

[H@nnoun]

Bonjour Natacha je ne suis fort en VBA mais voila une idee j'ai cree 2 boutons
voici le code j'espere que c'est ce que tu veus

Private Sub CommandButton1_Click()
Range("c65536").End(xlUp).Offset(1, 0).Select

ActiveCell.FormulaR1C1 = "=IF(RC[-1]>0,R[-1]C+1,0)"
Selection.Copy
Selection.PasteSpecial Paste:=xlValues, Operation:=xlNone, SkipBlanks:= _
False, Transpose:=False
End Sub

Private Sub CommandButton2_Click()
Range("c65536").End(xlUp).Offset(1, 0).Select

ActiveCell.FormulaR1C1 = "=IF(RC[-1]>0,R[-1]C+1,0)"
End Sub

A++ H@nnoun

 

[arnaud]

Salut 🙂,

LOL 🙂 personne n'a compris la question de la même façon ( j'avais moi même compris encore différement la question ).
On peut dire que tu as de la chance d'avoir autant de réponse avec une question si peu clair 😉

 

[H@nnoun]

Re salut le forum Natacha Georges Herve

Natacha laisse tomber ma solut celle de Georges me semble plus adapter
a ce que tu cherche

A+ H@nnoun

 

[NATACHA]

MERCI POUR VOS REPONCE OUPSSS je suis pas trés clair

J'AI MAL POSER MA QUESTION MAIS JE V METTRE MON FICHIER SOURCE
ça sera plus facile pour vous

merci trés gentil a vous

merci voussss