Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Macro evenementielle

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion aurel30
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
A

aurel30

Guest
bonsoir

j'ai un souci dans l'execution de mon code, j'aimerai qu'une action se lance lorsqu'une valeur de cellule change.

pour plus de détail :

en feuil4 lorsque la valeur de la cellule E6 est inferieure ou égale à N6 ou supérieure ou égale à O6, la macro se lance

j'ai écrit comme code cela mais ça fonctionne pas 🙁 :

Private Sub Worksheet_Change(ByVal Target As Range)

If Target("E6").Value >= Range("O6").value Or <= Range("N6").Value Then

Merci pour votre aide.
 
Trier par date Trier par votes
Re : Macro evenementielle

Bonsoir Aurel

essaye comme ceci, non testé...

Code: 
If Target.Address(0, 0) = "E6" Then
If Target.Value >= Range("O6").value Or Target.Value <= Range("N6").Value Then
end if

bonne soirée
@+
 
Vote positif 0 Vote négatif
Re : Macro evenementielle

Salut

merci pour ta reponse rapide

mais j'ai une autre question, ma cellule E6 se met à jour ts les minutes grace à une requete web, est ce qu'excel reconnait ce changement de cellule à chaque màj de la requete web.

parce que pour l'instant avec ce code il ne réagit pas.

Merci
 
Vote positif 0 Vote négatif
Re : Macro evenementielle

Re Aurel

je pense que oui, mais pas de certitude, le mieux est de mettre un point d'arret, et déjà de tester manuellement.

pourmettre un point d'arret, tu te positionnes sur la première ligne et F9.

@+
 
Vote positif 0 Vote négatif
Re : Macro evenementielle

je laisse mon code et le fichier en piece jointe, car j'ai essayé le point d'arret mais je ne comprends pas tres bien comment cela fonctionne.
par contre j'ai testé manuellement le changement de ma cellule E6 et la macro se lance peu importe ce que je rentre, pour etre clair elle ne respecte pas les conditions dans les autres cellules (o6 et n6). si quelqu'un a la solution. 😕
De plus le cellule E6 change automatiquement grace à une requète web.

merci d'avance.
 

Pièces jointes

Dernière modification par un modérateur:
Vote positif 0 Vote négatif
Re : Macro evenementielle

Bonjour

Une piste
Si la mise à jour de la cellule est réalisée toute les minutes il faut lancer le programme de mise à jour toutes les 30 secondes ( problème d'échantillonnage).

Il faut rechercher sur le forum un exemple de cellule clignotante et utiliser le principe pour lancer périodiquement la macro.

JP
 
Vote positif 0 Vote négatif
Re : Macro evenementielle

Bonjour Aurel, Jp

je viens de tester le code ci dessous, a priori chez moi il fonctionne, enfn mis à par la requête web :

Code: 
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "E6" Then
If Target.Value >= Range("O6").Value [COLOR="Red"][B]And [/B][/COLOR]Target.Value <= Range("N6").Value Then
   MsgBox "ok"
End If
End If
End Sub

bonne fin d'après midi
 
Vote positif 0 Vote négatif
Re : Macro evenementielle

Bonsoir aurel30, Pierrot93, jp14, le Forum,

aurel30, ci-joint ton fichier modifié avec mon interprétation du problème... Peut-être suis-je à côté de la plaque (?)....

La macro est lancée et teste les valeurs lors de chaque évènement refresh de la requête Web. La gestion de cet évènement est rendue possible grâce à un module de classe (je ne connais pas d'autre moyen permettant de surveiller le Refresh d'une requête mis à part lancer la macro à intervalle régulier par la méthode OnTime comme le suggère judicieusement JP14).

Je me suis aussi permis de revoir légèrement ta procédure d'envoi de mail... A vérifier et adapter le cas échéant.

Dernière chose : je pense te proposer ici une solution "technique" possible sans remettre en cause le fond de ton projet. Toutefois, je m'interroge sur la cohérence de la démarche globale... En effet, si j'ai bien compris : les données sont réactualisées toutes les minutes. Tu souhaites vraiment adresser un mail toutes les minutes tant que les conditions sont remplies... (?) 😕

Cordialement,
 

Pièces jointes

Vote positif 0 Vote négatif
Re : Macro evenementielle

re tous le monde,

merci de cette modif, pcq je cherhcais encore une solution.
Par contre, je savais que cela allait etre problematique pour la frequence des mails, si la position reste dans les conditions toutes les minutes c clair que le mail partira aussi. pour l'instant je ne sais pas encore comment faire, mais je reflechis. ???


Aurel
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

  • Question Question
XL 2016 intégrer une macro sur les nouvelles feuilles crées
Réponses
6
Affichages
238
pascal21
J
  • Question Question
Microsoft 365 Worksheet_Change ou Worksheet_Calculate
Réponses
9
Affichages
508
job75
U
  • Question Question
Autres [RÉSOLU] macro à modifier
Réponses
1
Affichages
617
un internaute
U
S
  • Résolu(e)
XL 2021 enregistrer xltm en xlsm avec chemin automatiquement
2
Réponses
27
Affichages
598
TooFatBoy
  • Question Question
XL 2019 Application.Run
Réponses
3
Affichages
256
Atiom
U
  • Question Question
Autres [RÉSOLU] Peut-on faire une macro qui met une seule macro en commentaires puis le contraire!!!
2 3
Réponses
30
Affichages
2 K
un internaute
U
S
  • Résolu(e)
Microsoft 365 Déclenchement macro en série suite à cellule fusionnées
Réponses
3
Affichages
534
spike29
S
  • Question Question
Microsoft 365 Excel VBA: manipuler des fichiers partagés via Teams / Sharepoint
Réponses
2
Affichages
129
Eric 888
M
  • Résolu(e)
XL 2021 Problème d'activation d'une macro pour transférer des valeurs d'une feuille 1 à une feuille 2
Réponses
3
Affichages
420
MATLEA
M
E
  • Résolu(e)
Microsoft 365 Reduire Temps Execution Code
Réponses
5
Affichages
487
eric72
E
C
  • Question Question
Microsoft 365 worksheet_change
2
Réponses
29
Affichages
1 K
CortoXls
C
M
  • Question Question
XL 2013 MACRO VBA pour imprimer tous les bulletins d'un établissement scolaire
Réponses
4
Affichages
808
MBEPID
M
N
  • Question Question
Microsoft 365 Remplissage automatique d'une feuille à l'autre
Réponses
2
Affichages
432
Nonoo
N
  • Question Question
Microsoft 365 Méthode Evaluate pour se dispenser d'une boucle imbriquée
Réponses
14
Affichages
828
patricktoulon
Y
  • Résolu(e)
XL 2013 Macro si changement dans case à cocher
Réponses
6
Affichages
689
Yvan1
Y
A
  • Question Question
insertion d'une ligne automatique dans un tableau excel.
Réponses
1
Affichages
795
sylvanu
A
  • Résolu(e)
Microsoft 365 Vider des listes déroulantes en cascade
Réponses
6
Affichages
842
Franc58
F
EXCEL :: TCD :: SEGMENTS :: Identifier l'élément sélectionné dans le segment :: Modifier dynamiquement la valeur d'un segment :: VBA
Réponses
1
Affichages
840
oguruma
J
  • Résolu(e)
XL 2019 tableau excel vers html
Réponses
9
Affichages
648
jclaborde
J
  • Résolu(e)
Microsoft 365 comment "ralentir" une macro
Réponses
9
Affichages
626
Eric 888
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…