XL 2010 Exécuter une macro lorsqu'une cellule est rempli.

[DAVID-44-]

Bonjour à tous,
J'ai une macro associée à un bouton et je souhaiterais utiliser cette macro sans utiliser ce bouton.
J'aimerais dès que je remplis et valide une cellule, la macro s'exécute.
Je vous joins le classeur.
La macro est : copier_coller_ligne_suivant_calcul()
Elle est utilisée pour la feuille "STOCK" et dans la colonne "E".
Merci de votre aide.
Bonne journée.
Cordialement.
David.

 

[herve62]

Bonjour
Déjà , on ne joint pas de classeur avec un MdP !!!!!!
ensuite c'est quel bouton ? quelles sont les données , sur quelle feuille ?
Là ta SUB euh ??? , la boucle i fait 8 to 9 avec step -1 , donc .....????????

 

[DAVID-44-]

Bonjour herve62,
Pardon pour le mot de passe ! Un simple oublie, merci de me l'avoir rappelé.
C'est le bouton "CALCULER" dans la feuille "STOCK" et c'est les cellules de la colonne "E > BESOIN DE"
La macro est : copier_coller_ligne_suivant_calcul()
Merci de votre aide.
Bonne journée.
Cordialement.
David.

 

[herve62]

Désolé mais ta feuille STOCK est TOUJOURS protégée !!!!!!!!
Vérifie bien avant de joindre

 

[DAVID-44-]

Oooopppssss, Là ça devrait être bon !
Merci de votre aide.
Bonne journée.
Cordialement.
David.

 

[herve62]

Bon ça va mieux
Regarde ce que cela donne si tu mets une valeur en E de STOCKS
Moi ça donne rien car je pige pas ce que ta SUB fait ??
mais elle s'execute bien comme tu as demandé
Tu fais à un moment un COPY ...mais jamais de PASTE ???? donc je vois pas comment tu colles ???
j'ai décortiqué en variables tes instructions ...un peu complexe pour rien , puisque on peut faire simple
j'ai mis des commentaires
Je fais en mode debug et avec "pas à pas " donc je vérifie à chaque execution de ligne le résultat
tu peux faire idem et comparer
Que fait la variable SUP ?? ( true et false) elle ne sert à rien
Donc explique mieux ce que tu veux faire car il faut revoir ta Sub

 

[DAVID-44-]

Bonjour herve62,
Merci beaucoup de votre aide.
J'ai essayé le nouveau classeur, quand j'inscris un chiffre et que je valide par "ENTRÉE" ça fonctionne bien. Malheureusement, ça crée 49 lignes sous la ligne du résultat.
Je souhaite en fait :
Mettre dans la colonne "BESOIN DE" une quantité (exemple 2 pour la ligne "14") et qu'une soustraction se fasse automatiquement puis avoir le résultat en créant une ligne "15".
Vous pouvez faire un essai en utilisant le classeur que j'ai mis en ligne et en exécutant le bouton "CALCULER".
Ça fonctionne très bien et vous pourrez voir vraiment ce que je souhaite.
La modification que je souhaite, c'est de ne plus utiliser le bouton, mais pouvoir exécuter la macro simplement en écrivant dans la colonne "E" la quantité des besoins.
Merci de votre aide.
Bonne journée.
Cordialement.
David.

 

[herve62]

Bonjour
Mais il est OU ce fichier ?

 

[DAVID-44-]

Bonjour, je vous joins le fichier

 

[herve62]

ok , je termine un autre sujet et je regarde
Sinon si il y a 49 lignes en + , ce n'est pas moi qui ai fait la sub , j'ai juste créé l'événement en validant la saisie
donc c'est bien ce que j'ai dit ...il y a un hic dans la sub ( copy sans paste et autre) , je verrai

 

[DAVID-44-]

OK merci beaucoup.
Pour les 49 lignes, je me doute bien que ce n'est pas de votre faute
Bonne journée.

 

[herve62]

Bon c'était pas très évident à gérer
mais ça doit être bon ?

 

[job75]

Bonjour DAVID-44-, herve62,

Voyez le fichier joint avec cette macro très simple dans le code de la feuille STOCK :

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
copier_coller_ligne_suivant_calcul
Application.EnableEvents = True
End Sub

J'ai ajouté une boucle dans la macro copier_coller_ligne_suivant_calcul pour supprimer les doublons.

A+

 

[DAVID-44-]

Bonjour herve62, job75,
Avant tout merci pour votre aide, vous faites vraiment des prouesses.

herve62, le fichier fonctionne bien, mais dès que je remets une protection, j'ai un message d'erreur quand je clique sur le bouton "supprimer ligne". Je regarde depuis tout à l'heure, mais je ne trouve pas la solution ! Je joins le fichier protégé avec le mot de passe : GAgner73

job75, le calcule ce fait bien et la ligne est bien créée. Par contre, j'ai des soucis quand je mets la date dans la cellule "PRÉVU LE". Cela me rajoute une ligne supplémentaire avec deux dates. Dès que j'ouvre la feuille "PRÉVU LE", les deux lignes s'ajoutent et une ligne reste présente avec la date dans la feuille "STOCK". Quand je protège la feuille, les boutons verts ne fonctionnent plus.

J'imagine que c'est très complexe de trouver les solutions et je vous remercie beaucoup et sincèrement de votre aide.

Bonne soirée.
Cordialement.
David.

 

[herve62]

Re
Quand on met une protection de feuille et que l'on lance du vba qui modifie il faut absolument faire un unprotect au début de sub et la remettre à la fin .....c'est du courant
Worksheets("xxxxx").Unprotect "ton password"
ou
Worksheets("xxxxx").Unprotect Password:="ton password"

remettre à la fin idem avec protectet le Mdp