> Tous les forums > Forum Bureautique
 Mise à jour de MFCSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
valpat35
  Posté le 01/05/2017 @ 19:18 
Aller en bas de la page 
Petit astucien

Bonjour à tous

j'ai un fichier Excel 2007 pour le suivi de notre colorateur de lames

j'ai des mises en formes conditionneles qui colorent des cases en vert l'orsque la premier cellule de chaque ligne est non vide et que :

Les lames "Macro" ont 1heure de séchage

Les lames "20 min" ont 20 min de séchage

Les lames "37°" ont 12h de séchage

lorsque je rentre des heures de mises à secher avec des valeurs dépassées cela fonctionne correctement,

mais lorsque le temps sont inférieures au temps de séchage , lorque l'heure arrive cela ne se met pas automatiquement à jour

il faut cliquer sur l'heure pour que la MFC fonctionne

que faut t'il faire pour que cela ce mette à jour automatiquement et voir d'un coup d'oeil les lames à mettre à colorer?

Voici le lien vers mon fichier http://www.cjoint.com/c/GEbrpyAYEuj

merci de votre aide

Cordialement

Publicité
valpat35
 Posté le 01/05/2017 à 22:03 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour

j'ai essayé avec

Option Explicit
Dim Tps As Date

Sub Tempo()
'Programmation de l'évènement toutes les minutes
Tps = Now + TimeValue("00:01:00")
Application.OnTime Tps, "Tempo"
'Traitement
Worksheets("Coloration").Calculate

End Sub

mais rien ne se passe

Cdt

ferrand
 Posté le 03/05/2017 à 06:52 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonjour,

Ta macro fonctionne !

Il faut seulement prévoir de l'arrêter.

Cordialement.

valpat35
 Posté le 03/05/2017 à 18:52 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour Ferrand

comment faire pour l'arrêter?

une fois quelle à été activer une fois, la macro fonctionne,mais il faut la réactiver à chaque ouverture du fichier.

Cordialement

valpat35
 Posté le 06/05/2017 à 21:38 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour

je n'arrive toujours pas a mettre a jour mes mfc

j'ai mis cette macro mais il faut toujours activer la macroa manuellement à l'ouverture de la feuille.

Private Sub Workbook_Open()
Tempo
End Sub

merci de votre aide

Cordialement

ferrand
 Posté le 07/05/2017 à 05:03 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonjour,

mais il faut la réactiver à chaque ouverture du fichier.

Ça tu ne peux pas y couper ! En fermant un fichier tout ce qui est en mémoire vive disparaît. Quand tu ouvre le fichier il faut la relancer.

Pour l'arrêter, il faut mettre son auto-relance sous condition :

Tu déclares une variable booléenne au niveau module (module standard dans lequel se trouve ta macro Tempo) en variable publique (puisque tu la lances par une évènementielle). La procédure de lancement met cette variable à True et lance la macro.
Dans le module standard, tu rajoutes une procédure d'arrêt (affectée à un bouton, ou exécutable autrement selon ton choix), qui se contente de repasser la variable à False.
Et dans Tempo :

If NomVariable Then
Tps = Now + TimeValue("00:01:00")
Application.OnTime Tps, "Tempo"
End If

Cordialement.



Modifié par ferrand le 07/05/2017 05:04
valpat35
 Posté le 07/05/2017 à 15:25 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour Ferrand

J'ai reussi à activer la macro Tempo à l'ouverture du fichier en mettant cette macro dans this Woorkbook

Private Sub Workbook_Open()
Tempo
End Sub

Cela fonctionne

pourquoi dois je arreter la macro Tempo?

le fichier est ouvert le matin à 7h30 et fermé le soir à 18h

la macro Tempo doit fonctionner pendant tout ce temps.

elle s'arette à la fermeture du fichier.

Cordialement

Valpat35

ferrand
 Posté le 08/05/2017 à 16:07 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonjour,

C'est toi qui vois... Il est vrai que ce n'est pas un clignotement, et cela ne se déclenche qu'une fois par minute. Cela devrait donc être supportable.

J'étais implicitement parti sur l'idée d'un déclenchement à la seconde... pour lequel je considère qu'il devient impossible de travailler sur le fichier en même temps.

Cordialement.

valpat35
 Posté le 08/05/2017 à 18:20 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour Ferrand

Merci de tes réponses et de ton aide

mon fichier correspond enfin à ce que je cherchais à avoir

encore merci de tes conseils

Cordialement et à plus sur le forum

Valpat35

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
-20 €20 € de réduction à partir de 299 € chez Cdiscount avec le code 20EUROS
Valable jusqu'au 26 Janvier

Cdiscount propose actuellement 20 € de réduction à partir de 299 € d'achats. Pour profiter de l'offre, utilisez le code promo 20EUROS.


> Voir l'offre
58,99 €SSD Crucial MX500 500 Go (M.2 SATA) à 58,99 €
Valable jusqu'au 26 Janvier

Amazon Allemagne propose actuellement le SSD Crucial MX500 500 Go au format M2 SATA à 58,99 € livré. On le trouve ailleurs à partir de 74 €. Ce SSD salué par la critique par son rapport qualité prix imbattable offre des débits de 560 Mo/s en lecture et 510 Mo/s en écriture. Il est garanti 3 ans.


> Voir l'offre
18,90 €Switch Gigabit TP-Link 8 ports métal à 18,90 €
Valable jusqu'au 28 Janvier

Amazon propose actuellement le switch Gigabit TP-Link TL-SG108 8 ports (10/100/1000) dans un boîtier métal à 18,90 €. On le trouve habituellement autour de 30 €. 


> Voir l'offre

Sujets relatifs
Mise à Jour Table Principale à Partir de champs Calculés
Libre Office mise à jour
Demande intempestive de mise à jour d'office pro 2013
Liste des mise à jour pour W10
mise a jour OpenOffice impossible
recopie et mise à jour de tableau dans excel
MISE A JOUR ADOBE ACROBAT READER DC FRANCAIS
mise en forme calendrier en fonction du jour
Mise à jour LibreOffice impossible
mise a jour de Adobe Acrobat Reader DC
Plus de sujets relatifs à Mise à jour de MFC
 > Tous les forums > Forum Bureautique