Macro toutes les minutes au changement de la valeur des cellules

Fermé
Cammi13 Messages postés 7 Date d'inscription lundi 20 avril 2015 Statut Membre Dernière intervention 24 avril 2015 - 20 avril 2015 à 16:33
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 - 20 avril 2015 à 21:50
Bonjour
j'ai du mal a débuter mon apprentissage, pouvez vous m'indiquer si mon problème a une solution dans VBA Dans ma feuille Excel
j 'ai une cellule en MD11 ou se trouve Affichée l'Heure =MAINTENANT()
j 'ai une colonne ME ou se trouve des valeurs (NOMS) de ME12:ME100
dans ma colonne MF,d'à coté j'ai en face de chaque valeur ,de MF12 à MF100 ,un nombre 'qui change invariablement ou pas automatiquement)
je voudrais que entre 08:00:00 et 08:00:59, 08:01:00 et 08:01:59, 08:02:00 et 08:02:59...etc. jusqu'au soir 18:00:00,une Macro me colle automatiquement:
tous les chiffres des qu'ils changent en plage MF 12:MF100
Exemple si dans la cellule MF12 la valeur change entre 08:00:00 et 08:00:59 mettre le résultat en cellule MS 12,si toujours dans la cellule MF12 le résultat change entre 08:01:00 et 08:01:59 mettre le résultat en cellule MT12...etc jusqu'au soir 18:00:00...

Autre exemple si dans la cellule MF13 la valeur change
entre 08:00:00 et 08:00:59 mettre le résultat en cellule MS 13,si toujours dans la cellule MF13 le résultat change entre 08:01:00 et 08:01:59 mettre le résultat en cellule MT13...etc jusqu'au soir 18:00:00
Merci de votre Aide
"c'est a se faire bouillonner le cerveau"
A voir également:

4 réponses

Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 524
20 avril 2015 à 17:44
Bonjour,

Il faut déjà savoir si le changement de valeur dans la colonne MF peut être détecté.
Peux-tu indiquer ce qui provoque cette modification ?

Tu peux déjà faire un test en plaçant le code suivant dans le module de la feuille concernée.
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Count > 1 Then Exit Sub
If Not Application.Intersect(Target, Range("MF12:MF100")) Is Nothing Then
Target.Offset(0, 1) = Now
End If
End Sub

Si un changement de valeur est détecté dans la plage MF12:MF100, l'heure sera notée dans la colonne MG.

A+
0
Cammi13 Messages postés 7 Date d'inscription lundi 20 avril 2015 Statut Membre Dernière intervention 24 avril 2015
20 avril 2015 à 20:24
re
j'oubliais
ce qui provoque le changement dans les cellules est un logiciel qui importe des données en liens DDE (dynamique data Exchange)
je n'ai aucune emprise sur le système c'est fait en automatique
c'est pour cela que si il n y a pas de solution précise pour arriver au résultat que je souhaite
je pensais que peut être une des solutions seraient de créer une macro qui me collerait toutes les minutes l'heure dans la cellule MD11 (en Valeurs) ,puis les chiffres de chaque cellules en colonne MF et me les mettrai dans les cellules désirées
je pense que si je n'ai pas d'autres solutions que celle la j'aurais un résultat certes bien moins précis mais c'est tout de même mieux que de n'avoir rien du tout
par contre je suppose que ce type de Macro doit être très complexe a trouver
qu'en pensez vous ?grand Merci
0
Cammi13 Messages postés 7 Date d'inscription lundi 20 avril 2015 Statut Membre Dernière intervention 24 avril 2015
20 avril 2015 à 20:09
Bonjour
merci d'avoir essayé
quand la valeur change dans les cellules de la colonne MF12MF100 la détection apparemment ne se fait pas il faut cliquer sur la cellule pour que heure change ;mais ce n'est pas le changement de la valeur qui déclenche le changement d'heure
Merci de me dire si vous avez une piste ou si c'est impossible a réaliser
cordialement Michel
0
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 524
20 avril 2015 à 20:36
Le problème, c'est que tu ne dis pas ce qui provoque la modification.
Si tu ne parviens pas à "pièger" cet l'évènement initiateur, tu auras du mal à lancer une procédure pour effectuer le traitement associé.

A+
0
Cammi13 Messages postés 7 Date d'inscription lundi 20 avril 2015 Statut Membre Dernière intervention 24 avril 2015
20 avril 2015 à 20:53
Bonsoir
ce qui provoque le changement dans les cellules est un logiciel d'importations de cotations par liens DDE
je te l'ai marqué un peu en dessus
0
Gyrus Messages postés 3334 Date d'inscription samedi 20 juillet 2013 Statut Membre Dernière intervention 9 décembre 2016 524
20 avril 2015 à 21:50
Désolé, je ne connait pas d'évènement Excel associé aux liens DDE.
Sur le web, on évoque parfois l'évènement Calculate mais je ne vois vraiment pas comment l'utiliser.

J'espère qu'un autre intervenant sera mieux inspiré.

A+
0