XL 2016 VBA - Application.OnTime plante dans un UserForm bien que la fonction soit publique

[Dudu2]

Bonjour,

Je n'arrive pas à gérer un Application.Ontime dans un UserForm. Je ne veux pas passer par un Module écrit ou généré.
Excel ne trouve pas la fonction à activer à échéance bien que publique et complètement qualifiée !

Alors ce n'est peut-être simplement pas possible avec Appliction.OnTime. auquel cas il faudra trouver une autre méthode (Timer @patricktoulon sur CommandBar, autre ?)

 

[Dranreb]

Bonjour.
J'ai dans ce classeur un module de classe Planification qui utilise les services d'un module standard XPlanificateur

 

[Deadpool_CC]

Bonjour,
jette un œil sur :

Application.OnTime doesn't work with userform

I've got a problem with a piece of code: Private Sub cyclic() Static i As Integer i = i + 1 Cells(i, 11) = i Open source For Append As #1 Write #1, Cells(i, 11) Close #1 Application.Wait (Now +

stackoverflow.com

c'est pas Application.ontime qui bloque ... c'est certainemet ta fonction/procédure que tu souhaites lancé "l'heure" doit elle être dans un module.

 

[Deadpool_CC]

C'est écrit dans la doc Officiel

Application.OnTime, méthode (Excel)

Rubrique de référence sur Office VBA

docs.microsoft.com

Procedure ne doit prendre aucun argument et ne peut pas être déclarée dans une classe ou un formulaire personnalisé.
J'ai pas mieux

 

[Dranreb]

En fait un argument peut quand même être précisé à condition de tout encadrer d'apostrophes.

 

[Dudu2]

Bonjour @Deadpool_CC, @Dranreb

Procedure ne doit prendre aucun argument et ne peut pas être déclarée dans une classe ou un formulaire personnalisé.

Et oui, merci ! Je me rappelle maintenant, j'avais déjà été confronté au problème.

En fait un argument peut quand même être précisé à condition de tout encadrer d'apostrophes.

@Dranreb, ok pour les arguments. Bon à savoir !

 

[Dranreb]

Ça ne change rien au fait qu'une méthode ne peut être invoquée ainsi, mais une procédure d'un module standard avec un argument, si.

 

[Dranreb]

Exemple avec une animation dans un UserForm qui utilise deux objets Planification, PlnSéq et PlnFermeture

 

[Dudu2]

@Dranreb, merci pour l'exemple. Cependant, je n'ai pas compris le principe de fonctionnement.
Il faudrait au moins que tu le décrives dans les grandes lignes.

Entre temps j'ai essayé une alternative.

Edit: fichier modifié un peu plus homogène sur les Save / Restore des valeurs Application.

 

[Dranreb]

Édudie les commentaires guides d'utilisation que je mets toujours dans mes modules de classe et modules standard de service pour ceux dont certaines procédures ont à être utilisées par le programmeur d'application.

 

[Dranreb]

S'il ne suffisent pas, bien sûr, tu peux toujours me demander des précisions.

 

[Dudu2]

Désolé @Dranreb, je suis dans un code de fonction où j'ai utilisé l'alternative illustrée au Post #9, et je n'ai eu le temps de me plonger dans ton code.
Si tu as des précisions je suis preneur car je n'ai pas compris le système de temporisation que tu utilises malgré une revue rapide (trop ?) de tes commentaires. Juste sur le principe et les API utilisées.

 

[Dranreb]

Les API n'ont pas de rapport avec l'objet Planification.
Il y a QueryPerformanceCounter qui renvoie sur 8 octets la valeur d'un compteur système très régulier, avançant très vite, et QueryPerformanceFrequency qui indique de combien il avance en une seconde. Ça permet des mesures de durées très précises, à la nanoseconde près.
Qu'est ce que tu ne comprend pas dans l'utilisation d'un objet Planification ?

 

[Dudu2]

Bah laisse tomber, c'est pas grave.
Je ne comprends pas ces fonctions. Vu des exemples sur stackoverflow mais ça me dépasse complètement.

 

[Dranreb]

Et pour l'objet Planification ? C'était quand même ça, d'abord le sujet de ma proposition.