MACRO DANS EXCEL Résolu/Fermé

Question

Bonjour à tous,

Michel m'a envoyé une macro pour appliquer dans excel
mais pouvez-vous m'expliquer pas à pas comment l'appliquer car cela a fonctionné une fois et puis plus rien

mon fichier excel se compose comme suit :
je ne vous donne qu'une ligne et j'appliquerai aux autres lignes
                             a           b
médicaments       1200        125
je désirerais que la colonne a additionne automatiquement et que la colonne b s'efface pour rentrer d'autres sommes 
j'ai excel 2007
merci à tous pour votre gentillesse
le message ci-dessous est de michel :

Bon, bin faut passer par une tite macro classique 

tes comptes commencent en ligne 2 (pharma) et l"ajout dans la colonne C 



Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("C2:C50")) Is Nothing Or Target.Count > 1 Then Exit Sub
Target.Offset(0, -1) = Target + Target.Offset(0, -1)
Application.EnableEvents = False
    Target = ""
Application.EnableEvents = True
End Sub


Tu fais un copier de cette macro 
dans ton classeur clic droit sue le nom de l'onglet de ta feuille 
visualiser le code 
coller 

:-x

Mike-31 · Answer

Salut,

Le code de Michel_m, est parfait. Il additionne les valeurs de la colonne C aux valeurs de la colonne B et efface les valeurs en C. Pour prendre en compte les valeurs en B et les additionner aux valeurs en A il suffit simplement décaler le code d'une colonne

Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, Range("B2:B50")) Is Nothing Or Target.Count > 1 Then Exit Sub
Target.Offset(0, -1) = Target + Target.Offset(0, -1)
Application.EnableEvents = False
Target = ""
Application.EnableEvents = True
End Sub

RESTANQUE · Answer

BONJOUR A TOUS,

ma macro ne fonctionne pas 
pourriez vous me donner la marche à suivre exacte point par point


                              a                b
médicaments        1200           125

je désire que le montant 125 (b) vienne directement dans colonne (a) 1200 et que la colonne b devienne blanche pour rentrer d'autres montants par la suite

merci

Mike-31 · Answer

Re,

Expliques de ton côté point par point, en ce jour de fête les neurones qui ont du mal à suivre.
Colonne A tu as 1200 et colonne B 125

La macro de Michel_m que j’ai modifié post 2 ajoute 125 à la colonne A qui passe à 1325 et efface la valeur 125 colonne B

Si ce n’est pas ce que tu cherches, sur ces base 1200 en A et 125 en B que faut il faire !

michel_m · Answer

Bonjour tt le monde,

1/La macro se déclenche que si tu changes une donnée dans la colonne; si les montants à additionner sont déjà inscrits avant d'avoir installer la macro, tu peux toujours cliquer sur la cellule, il ne se passera rien

Sinon,peut-^tre que...

2/Dans ton classeur et dans l'éditeur VBA (Alt+F11) tu crées un module(insertion-module)
et tu écris et lance cette macro
Sub orsec()
Application.EnableEvents = True
End Sub
et si ca re-fonctionnne après, tu le dis on modifiera la macro avec un sémaphore

RESTANQUE · Answer

BONJOUR MICHEL,

ton aide m'est très précieuse pour mon association que j'ai crée pour les seniors de ma commune

maintenant comment faire pour recopier cette macro dans un autre document excel 
que j'appellerai cours excel 2010

je voudrais la mettre dans le premier feuillet

merci de ta réponse

explique moi étape par étape

Mike-31 · Answer

Salut,

C'est souvent dans les macros que se cache des fichiers malveillants, avec Excel 2007 systématiquement les codes macros sont désactivés ce qui les rend inopérant.
Deux choix
1/ Dans l’onglet Développeur/Sécurité des macro/Paramètres des macros/Cocher Activer toutes les macros mais on ouvre la porte à des codes dangereux

2/ créer sa propre signature numérique Astuce rédigé par mes soins et Publié par Gbinforme sur le Forum

https://www.commentcamarche.net/faq/21009-excel-signature-numerique

Sous environnement Microsoft Excel 2007 
Si l'onglet Développeur n'est pas activé, cliquer sur le bouton Microsoft Office 
Puis sur Options Excel. 
Cliquer sur Standard, puis cocher Afficher l'onglet Développeur dans le ruban. 
Ouvrir le fichier contenant le code macro à signer 
Dans l'onglet Développeur, Visual Basic ou (Alt+F11) 
Dans la barre des menus du Visual Basic : Outils > Signature Électronique > cliquer sur choisir > puis sur le nom de sa signature et OK. 
Revenir sur la feuille de calcul 
Onglet Développeur,Sécurité des macros 
Cocher : Désactiver toute les macros à l'exeption des macros signées numériquement et OK 
Enregistrer 
Fermer le fichier et l'application

RESTANQUE · Answer

BONSOIR MIKE 31

super toutes tes explications
je suis arrivée à faire ma signature
ma macro fonctionne super bien
mais une dernière question
quand j'ai terminé mon fichier excel au niveau sécurité qu'est ce qu'il faut faire
dans excel 2007
merci encore

Mike-31 · Answer

Re,

Après cette étape

Cocher : Désactiver toute les macros à l'exeption des macros signées numériquement et OK 
Enregistrer 
Fermer le fichier et l'application 

Tu n'as plus rien à faire, le système n'activera que les macros des tes fichiers dont tu auras signés les codes et désactivera les autres pour la sécurité de ton PC--
A+
Mike-31

Une période d'échec est un moment rêvé pour semer les graines du savoir.

RESTANQUE · Answer

MERCI ENCORE MIKE 31
JE TERMINE EXCEL ET ENCORE MERCI POUR MES PETITS SENIORS

AU FAIT JE NE SAIS PAS SI JE T'AI SOUHAITE MEILLEURS VOEUX

Mike-31 · Answer

En haut du portail comment ca marche, tu as le moteur de recherche du forum et ton pseudo avec une enveloppe, lorsque tu as un message privé un carré rouge avec le nombre de message privé non lu.
clic sur l'enveloppe, ce qui t'ouvrir l'historique de tes messages privés reçus ou expédiés. Clic sur le titre du message MACRO DANS EXCEL

RESTANQUE · Answer

ok mike31,

je désirerais savoir quand j'ai un petit problème et que je désire t'avoir comme assistant
comment faire ?

sur excel stp comment faire pour passer un tableau tapé en minuscule le repasser en majuscule
complètement sans refaire cellule par cellule

merci

Mike-31 · Answer

Salut,

Le but d'un forum, n'est pas de choisir son intervenant qui peut être absent ou pris dans une autre discussion.

La majorité des intervenants sont de haut niveau et certainement plus compétent que moi.

Lorsque tu as un problème, continu à ouvrir une discussion comme tu le fait, les intervenants  cernant le mieux ta difficulté t'offriront leurs compétences.

Pour répondre à ta question, tu as la fonction Majuscule (Insertion/Fonction) très bien expliquée sur ce lien

http://www.info-3000.com/excel/majuscule.php

Autrement un code macro soit automatique lors de la saisie ou à déclenchement avec un bouton par exemple

Sub Majuscule()
    Dim Cellule As Variant
    For Each Cellule In Range("Table")      'Table est la plage à traiter
    Cellule.Value = UCase(Cellule.Value)   'LCase pour mettre en minuscule
    Next Cellule
End Sub

RESTANQUE · Answer

MERCI MIKE31

j'ai compris le message et je te remercie encore pour ton intervention immédiate
je ferai comme tu me l'indiques
mais tes réponses étant très rapides et fonctionnelles c'est pourquoi je voulais avoir à faire
avec toi
mais en attendant encore merci pour toutes tes interventions de la part de mes seniors

ce n'est pas pour moi personnellement mais pour mon association car je n'ai pas la science infuse
et des personnes comme toi qui peuvent nous aider à avancer c'est super !!!!

peut-être à bientôt

MACRO DANS EXCEL

13 réponses

Discussions similaires