XL2013 _ Problème incrémenter cellule

Bonjour le forum,

Je me remets à vous car je ne trouve aucune explication qui me permet de trouver le problème dans ma macro.

J'ai programmé un outil qui fonctionne bien. Malheureusement, je bute sur un détail essentiel. et ce dernier détail m'empêche de mettre à disposition cet outil aux collègues.

Sur mon userform1, j'ai le bouton "envoi de la demande". Quand je clique dessus, il fait un certain nombre de chose. Dont incrémenter une cellule sur mon onglet "Paramètres".

J'ai réalisé ce code :

If Worksheets("Feuil2").Range("C4").Value = "A" Then
   Worksheets("Paramètres").Range("AO2").Value = Worksheets("Paramètres").Range("AO2").Value + Worksheets("Paramètres").Range("AQ2").Value
End If

PS : Pour info j'aurai pu faire ceci ça fonctionne aussi :

If Worksheets("Feuil2").Range("C4").Value = "A" Then
   Worksheets("Paramètres").Range("AO2").Value = Worksheets("Paramètres").Range("AO2").Value + 1
End If

Mais le problè

me, Quand j'ouvre le fichier, je tape les infos sur la partie "Critères de la commande" sur l'userform 1 (C'est cette zone la que les données en partie va se copier coller sur la Feuil2 du classeur).

Quand je clique :

S'il détecte la lettre A en C4 sur Feuil2, il incrémente ma cellule AO2 dans l'onglet "Paramètres" du classeur.

Malheureusement, il ne fonctionne pas dès le premier clique, il est censé incrémenter dès respect de la condition et à chaque clique.

Il fonctionne très bien quand je réalise à partir de la deuxième fois jusqu'à fermeture du fichier. Mais quand je l'ouvre à nouveau et fait la première demande en cliquant dessus, ma cellule ne s'incrémente pas, je dois réaliser à nouveau une nouvelle fois pour que cela fonctionne.

Ce que je souhaiterai c'est à l'ouverture quand je fais la première demande dans ce formulaire en cliquant sur ce bouton "envoi de la demande" qu'il m'incrémente directement et qu'il n'attende pas que je fasse la deuxième et même manipulation pour qu'il le fasse.

Je ne sais pas si c'est à cause d'un autre code que j'ai fait qui fait que cela bloque.

Merci par avance de votre aide

Bien à vous

Namco

Bonjour,

Finalement j'ai trouvé la réponse.

J'ai ouvert un module, mis le code à l'intérieur et utilisé la fonction Call pour appeler mon module.

A+

Rechercher des sujets similaires à "xl2013 probleme incrementer"