Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Incrémenter

A

AS

Guest
Comment incrémenter une cellule automatiquement en utilisant un bouton ?
 
O

omicron

Guest
Bonsoir AS,

Voici une petite macro qui devrait résoudre le problème.

=======================================================
Private Sub CommandButton1_Click()
Set Cel = Range("A1") '<<< Cellule à incrémenter (Adresse à adapter)
If Cel = "" Then Cel = 0
If isNuméric(Cel) Then Cel = Cel + 1
End Sub
=======================================================

Cordialement.

Omicron.
 
O

omicron

Guest
Bonjour Temjeh,

Je suis un peu surpris de ta remarque, car je pense que le message que je t'ai adressé était peut-être un peu succint, mais tout à fait correct. Merci de me dire ce qui a pu te choquer dans ma réponse, cela m'aidera à faire mieux une prochaine fois.

L'avis d'autres "Excelliens" sera le bien venu.

Cordialement.

Omicron.
 
B

Brigitte

Guest
Bonjour à tous,


Si j'ai bien tout suivi, la remarque de Temjeh doit s'adresser à AS qui n'a mis ni Bonjour, ni merci, ni rien d'autre...

Omicron, tu as tout fait comme il faut, je pense que tu n'as rien à te reprocher... T'inquiète pas, Temjeh a été un peu succinct (e) dans son message réclamant de la politesse (un peu brut de décoffrage) qui allait dans le bon sens tout de même.

AS semble d'ailleurs avoir rectifié de lui (elle) même..

A bientôt. C'était mon avis, Omicron, comme tu l'as demandé...



Brigitte
 
A

AS

Guest
Bonjour ou Bonsoir c'est selon...

Mille excuses à tous, c'est vrais que j'ai manqué de politesse, j'étais pris par mon Pb et l'envie de rechercher une solution dans ce creuset de compétence (que je n'ai d'ailleurs pas résolu)

Cordialement
AS
 

Discussions similaires

Réponses
3
Affichages
434
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…