programmer l'execution d'une macro!!

G

GSXR282005

Guest
bonsoir le forum;
Ma question , comment faire pour programmer l'execution d'une macro a une heure precise?( heure, minute)
Car en programmant pour une date, celle ci s'execute a chaque ouverture du fichier sur 24 heures, alors si modif!!!!!
L'ideal serait de programmer a une date +l'heure

Merci d'avance a tous les pros
@+
 
G

GSXR282005

Guest
Re Bonsoir,
est ce que cette ecriture correspond a ce que je voudrais??????????
Merci

Private Sub Workbook_Open()
If Date = DateValue('20/01/06')
end if
Application.OnTime TimeValue('17:00:00') Then
Range('E28').Select
ActiveCell.FormulaR1C1 = '0'
 

Bernard_XLD

XLDnaute Barbatruc
Membre du Staff
Re

non, ce n'est pas comme cela
voici un exemple, j'ai modifié la commande pour que la macro 'la_proc' se lance 5 secondes aprés l'ouverture
Code:
Private Sub Workbook_Open()
'If DateValue(Date) = DateValue('20/01/2006') Then Application.OnTime TimeValue('17:00:00'), 'La_proc'
If DateValue(Date) = DateValue('16/01/2006') Then Application.OnTime Now + TimeValue('00:00:05'), 'La_proc'
End Sub
ce code à mettre dans un module, c'est lui qui agit.
Code:
Sub La_proc()
MsgBox 'il est l'heure', vbOKOnly + vbInformation
'code à exécuter
End Sub

A+
 

Discussions similaires

Statistiques des forums

Discussions
312 512
Messages
2 089 193
Membres
104 060
dernier inscrit
peffaumoikemmi-pro-5430