lancer une macro sur modif de cellule

Staple1600

XLDnaute Barbatruc

• 20 Décembre 2011

• #16

Re : lancer une macro sur modif de cellule

Re


Dans ce cas, tu n'avais pas ajouté la suggestion de Dranreb
(ou alors tu n'a pas fait le bon copier/coller)

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 21 Décembre 2011

• #17

Re : lancer une macro sur modif de cellule

Bionjour JM,
Merci pour votre réponse.
J'ai essayé les deux codes mais rien n'y fait, il exécute tjrs la macro quand j'ajoute ou que je supprime une ligne.
Amicalement,
Lionel,

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 21 Décembre 2011

• #18

Re : lancer une macro sur modif de cellule

Bonjour à tous

ce code fonctionne chez moi...

Code:

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 And Not Intersect(Target, Range("C10:C500")) Is Nothing Then
    Application.EnableEvents = False
    Macro1
    Application.EnableEvents = True
End If
End Sub

"macro1" n'est pas lancée en cas de suppression / insertion de ligne ....

bonne journée
@+

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 21 Décembre 2011

• #19

Re : lancer une macro sur modif de cellule

Bonsoir,
Vraiment curieux. J'ai vérifié et j'avais déjà recopié la même.
Je l'ai encore recopié à partir de la votre et...... toujours le même résultat.
Ce n'est pas très gênant mais pour la "beaut" du geste" cela aurait été mieux.
Un grand merci à vous tous,
Amicalement,
Lionel,

 

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 21 Décembre 2011

• #20

Re : lancer une macro sur modif de cellule

Bonsoir à tous

arthour973
Le code de ta macro est bien dans la Feuille et pas dans un module ?
(Pour vérifier: Clic-droit sur l'onglet, Visualiser le code -> C'est là que doit être ta macro)

Je te repose la question car tu n'as répondu à cette de Dranreb sur le même sujet
https://www.excel-downloads.com/threads/lancer-une-macro-sur-modif-de-cellule.175095/

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 21 Décembre 2011

• #21

Re : lancer une macro sur modif de cellule

Bonsoir JM,
Oui, la macro est bien dans la feuille > Visualiser le code > et la macro.
Mon fichier est un peut gros ( 300 ko ), je vous l'envoie.
Amicalement,
Lionel,

 

Pièces jointes

• Pointage Matrice test.xlsm

  283.9 KB · Affichages: 45
• Pointage Matrice test.xlsm

  283.9 KB · Affichages: 50
• Pointage Matrice test.xlsm

  283.9 KB · Affichages: 49

Vote positif 0 Vote négatif

Staple1600

XLDnaute Barbatruc

• 21 Décembre 2011

• #22

Re : lancer une macro sur modif de cellule

Re

Alors quand un fichier es trop gros, ne pas appelez le Capitaine Flamme, il est trop occupé à sauver les gens de Mégara.
mais plutôt lire le PsBis présent dans ce message
https://www.excel-downloads.com/thr...er-et-optimiser-mon-fichier-code-defi.174510/

Il suffit de bien faire un sort à ce que j'appelle des cochoncetés 😉

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 22 Décembre 2011

• #23

Re : lancer une macro sur modif de cellule

Bonjour.
Tout marche alors maintenant chez vous aussi je suppose.
Votre macro Présence pourrait s'écrire un peu plus court et plus rapide :

VB:

Sub Présence()
With Feuil1.Range("D10:AH500")
   .FormulaR1C1 = "=IF(OR(RC1="""",R7C=""sam"",R7C=""dim"",RC3>R8C),"""",""x"")"
   .Value = .Value
   End With
End Sub

Cordialement.

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 23 Décembre 2011

• #24

Re : lancer une macro sur modif de cellule

Bonsoir,
Malheureusement, chez moi, la macro se lance quand j'insère une ligne car ensuite je fais les actions suivantes :

- copier/coller de la ligne qui suit,
- effacer le contenu des colonnes A B et C ligne 10

je pense que c'est à cause de la cellule C10 qui se trouve ainsi modifée et qui fait partie de ma sélection dans cette macro (Target, Range("C10:C500"))

Est-il possible d'empêcher cela UNIQUEMENT à l'insertion d'une ligne ?

Merci d'avance de votre aide,
Amicalement,
Lionel,

 

Dernière édition: 23 Décembre 2011

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 23 Décembre 2011

• #25

Re : lancer une macro sur modif de cellule

Bonsoir.
Si vous faites souvent cette dernière manœuvre, vous pourriez écrire une macro qui la fait.
Pour que cela ne déclenche aucune exécution de procédure évènement, il suffirait de mettre Application.EnableEvents à False avant,
puis à True après.
Cordialement.

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 30 Décembre 2011

• #26

Re : lancer une macro sur modif de cellule

Bonjour à tous,
le code qui m'a été donné fonctionne très bien..... trop même, je le rappelle ci-dessous !

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count = 1 And Not Intersect(Target, Range("C10:C500")) Is Nothing Then
Application.EnableEvents = False
Présence
Application.EnableEvents = True
End If
End Sub

Cliquez pour agrandir...

L'inconvénient, c'est qu'il s'active toujours à chaque ajout ou suppression de lignes ou à chaque exécution des autres macros lancées.

Il y a une solution pour empêcher cela ?

Merci de votre aide,
Amicalement,
Lionel,

 

Vote positif 0 Vote négatif

MJ13

XLDnaute Barbatruc

• 30 Décembre 2011

• #27

Re : lancer une macro sur modif de cellule

Bonjour à tous

L'inconvénient, c'est qu'il s'active toujours à chaque ajout ou suppression de lignes ou à chaque exécution des autres macros lancées.

Il y a une solution pour empêcher cela ?

Cliquez pour agrandir...

C'est normal, puisqu'il s'agit d'une procédure sur un évènement (ici Worksheet_Change). Sinon, tu peux l'actionner sur un bouton en le lançant dans une macro d'un module classique.

 

Vote positif 0 Vote négatif

Usine à gaz

XLDnaute Barbatruc

• 30 Décembre 2011

• #28

Re : lancer une macro sur modif de cellule

Merci "Dranreb"
J'ai essayé mais je n'y arrive pas.
vous pouvez me dire o j'ajoute votre code ?
Merci d'avance,
Amicalement,
Lionel,

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 30 Décembre 2011

• #29

Re : lancer une macro sur modif de cellule

Je ne sais pas moi. À chaque fois qu'une modification de cellule est effectuée depuis une macro il est possible d'empêcher l'exécution de la Worksheet_Change qui s'en suivrait en mettant Application.EnableEvents = False devant.

 

Vote positif 0 Vote négatif