Macro A Tempo

[ROBY_70]

E' possibile inserire in un foglio excel una macro a tempo? Preciso che la macro dovrebbe attivarsi automaticamente dopo alcuni secondi (preventivamente impostati) dall'apertura del file.Grazie ciao

[Americano]

Prova a dare un'occhiata al metodo OnTime inserendo Application.OnTime nell'help del VBA

Ciao.

[grullo]

Se ti basta effettuare un ritardo per lanciare la macro ecco un esempio:

Private Sub Workbook_Open()
Dim tempoStart, tempoTrasc
tempoStart = Timer
tempoTrasc = 0
Do Until tempoTrasc > 5
tempoTrasc = Timer - tempoStart
Loop
Call miaMacro
End Sub

Sub miaMacro()
MsgBox "Adesso parte la macro"
End Sub

Comunque la soluzione di Americano è decisamente migliore. Ecco un esempio:

Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:00:05"), "ThisWorkbook.miaMacro"
End Sub

Sub miaMacro()
MsgBox "Adesso parte la macro"
End Sub

Se la macro è registrata o se non è posizionata nel modulo ThisWorkbook devi sostituire la parte ThisWorkbook con il nome del modulo in cui si trova.
Per esempio se la macro è in Foglio1 scriverai "Foglio1.miaMacro".

Spero di essere stato sufficientemente chiaro.
:D

[ROBY_70]

GRAZIE MILLE PER L'INDISPENSABILE AIUTO. CIAO A PRESTO