Créer une macro sous excel Résolu

Question

Bonjour,
Je souhaite créer une macro sous excel pour incrementer une case de 1 lorsque je clique sur un bouton.

Pouvez vous m'aider?

kadeh · Answer

Bon soir
tu affecte cette macro à ton bouton (clique droit sur bouton, affecter une macro)
bien sur tu remplace A1 par la cellule que tu veux incrémenter


Sub incrémentation()

    Dim x As String
    Range("A1").Select
    x = ActiveCell.Value
    ActiveCell.Value = x + 1
   
End Sub


Bonne soirée

perrus53 · Answer

Cela ne fonctionne pas, ca me met erreur d'execution 13, incompatibilité de type.

eriiic · Answer

Bonsoir,

essaie :
Sub inc()
[A1].value = [A1].value + 1
end sub

Tu peux aussi utiliser le contrôle compteur (menu 'affichage / barres d'outils... / formulaire').
Dessiner le contrôle, clic-droit dessus et lier à une cellule dans 'format de contrôle...'

eric

perrus53 · Answer

Bizarre, ca ne fonctionne que dans un classeur vide!!!

perrus53 · Answer

Bon la deuxieme (celle d'eric) fonctionne
Mais je vous explique, quand j'appuie sur le bouton, j'aimerais que l'incrementation fonctionne si la case n'est pas vide uniquement, j'imagine qu'il doit y avoir une manip?

eriiic · Answer

???
Ca fonctionne dans la feuille où tu as mis le code, qu'il soit vide ou non...
N'oublie pas de mettre en résolu si tu pb est réglé stp
Merci

perrus53 · Answer

Justement, je veut que quand A1=0, le compte ne se fasse pas. Je sais je suis chiant!!

perrus53 · Answer

Sa marche nikel, mis a part que tu avait oublié Sub inc() au debut!!
C'est marrant ce language de programmation ressemble beaucoup a celui des calculatrices!!
Faut que je trouve ou l'apprendre, car il est pratique!!
Post resolu!!

Créer une macro sous excel

8 réponses

Newsletters