Comment insérer une opération dans une macro?

bonjour,

Voici une exemple de code qui fait cela :

For ligne = 7 To 92
    Cells(ligne, 8) = Cells(ligne, 9) + Cells(ligne, 10)
Next ligne

Attention parce que ce morceau de code là :

Range("J7:J92").Select
 Selection.Copy
 Range("H7").Select
 ActiveSheet.Paste

écrase les valeurs de la colonne H pour mettre les valeurs de la colonne J donc c'est peut-être ce code qu'il faut remplacer par la boucle qui met la somme.

j'ajoute que ce code ici :

Range("H7:I92").Select
 Selection.ClearContents

efface les valeurs de la colonne H et J il faut donc le modifier et le déplacer

La macro finale peut ressembler à cela :

For ligne = 7 To 92
    Cells(ligne, 8) = Cells(ligne, 9) + Cells(ligne, 10)
 Next ligne
 Range("I7:K92").Select
 Selection.ClearContents
 
 Range("Q7:Q21").Select
 Selection.ClearContents
 
 Range("Q23:Q45").Select
 Selection.ClearContents
 
 Range("Q47:Q73").Select
 Selection.ClearContents
 
 Range("Q76:Q87").Select
 Selection.ClearContents
 
 Range("H7").Select

A+
Cordialement,

Bonjour, Pilas31,

Merci pour ta réponse je vais essayé, j'espère que ça va fonctionner, c'est super sympas et je je peux à mon tour t'aider....., mais pas en in formatique.
Je suis cuisinier de métier.

Cordialement.

Franck.

Bonjour,

J'ai modifié la macro "macro1" selon tes indications. Même si je ne comprends pas trop la logique.

J'ai ajouté la colonne Vente qui s'appelle V .

Voici le lien du classeur adapté :
https://www.cjoint.com/c/DBlls3zWTZT

A tester

Bonjour,

Ok je te remercie bien, je vais testé et je te tiens informé.

C'est sympas.

Cordialement.

bon, je viensde testé, je crois que mon explication n'étais pas très claire.

Quand je clic sur mouton "mise à jour" j'aimerais que dans la colonne vente "v" s'affiche le nombre vendu. par ce que là quand le clic j'ai un "0" qui s'affiche.
Quand je saisis les retours "R" moin la quantité livre "Q" moin les pertes "p" et que le clic sur le bouton, il faut que la macro me calcule et affiche dans la colonne "V" le résultat.

Désolé tu vas me prendre pour un chiant.

Merci.

Bonne soirée, à +.

Cordialement.

Salut Pilas,

Oui c'est exactement ça. Mais en faites je suis con !! je n'ai pas besoin de macro pour le résultat de la cellule "V". Puis ce que quand je saisis les données c'est tout simplement une formule qu'il faut. C'est à dire comme tu l'as écrit V=Q-R-P le résultat s'affiche.
Etant donné que moi j'imprime toujours les bons de commande de tous les Kiosques avant de cliquer sur mise à jour, j'ai une trace des ventes quand même.
Mais ce qui serait bien c'est que les ventes se reportent sur un onglet nommé "analyse des ventes" par exemple de façon que quand je clique sur mise à jour je conserve le résultat.

je te remercie beaucoup pour ton aide Pilas, moi c'est Franck.

Je t'envoie le nouveau fichier si tu peux me le corriger pour qu'il fonctionne avec tous les onglets (k1,k2,.......) merci. http://cjoint.com/?3BqkfCoqSvp

merci.

Salut Pilas,

J'espère que tu vas bien.

Oui l'onglet analyse des ventes n'est pas encore créer c'est quelle chose que j'aimerais avoir avec des liaison (qui se remplis automatiquement).
Le résultat des ventes s'afficherai dans la colonne "V" quand je saisis les données de mes "kiosques" (cela se fait par téléphone), ce qui me permettrais de voir et puis il faudrait aussi que le résultat se reporte sur 1 tableau hebdo ou mensuel (avec des liaisons je sais pas comment là je te laisse le soins de faire c'est toi le PRO.) Par contre quand on clic sur mise à jour les colonnes "V,P,R" doivent s'effacer, il doit y avoir dans la colonne "Q" le chiffre correspondant au quantité à vendre pour le lendemain (R+C).
L'onglet "récap "comme tu as vu c'est 1 tableau récapitulatif qui centralise les commandes de certains produits quand je saisis les commandes de tous mes KIOSQUES, je l'imprime pour que les collaborateurs qui travaille avec moi puisse répartir les commandes passées.

Voilà tu sais tout.
Par contre l'onglet analyse des ventes laisse tomber ce n'est pas grave si tu n'as pas la solution

Merci encore pour tout.

Franck.

Bonjour Pilas,

T'inquiète ce n'est pas grave, j'ai beaucoup de travail en ce moment en ce moment, c'est pour cela que je ne t'ai pas répondu plus tôt.
Et non je n'ai pas avancé du tout sur l'amélioration de mon fichier. Je t'envoie le dernier fichier, puis que tous les 2 mois je change de carte donc de produits mais ça ne change rien pour le fonctionnement du fichier et donc pour toi.
http://cjoint.com/?3CwkwAF4wK5

Rappelle toi il faut que cela fonctionne pour tous les onglets (k1,k2,k3......)
Merci bon courage