Risultati da 1 a 8 di 8

Discussione: Attivare macro a un determinato orario o a un determinato valore cella



  1. #1
    L'avatar di Davide
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Rimini
    Messaggi
    10
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0

    Attivare macro a un determinato orario o a un determinato valore cella

    ciao a tutti,
    sto cercando di fare in modo che mi si attivi una macro a una certa ora fissa (esempio 21:00).
    Premetto che non sono tanto pratico.

    Su internet ho trovato questo esempio, ma non so come fare per creare il testo completo di questa routine.

    - Con questa istruzione vogliamo che alle 19 e 15 venga eseguita la routine "MiaRoutine"
    Application.OnTime TimeValue("19:15:00"), "MiaRoutine"

    Qualcuno sa aiutarmi?

    E vorrei anche chiedere:
    Se voglio fare in modo che una macro si attiva se una determinata cella (es I16) assume un determinato valore (es.999) dovuto al risultato di una formula inserita in questa cella (es.I16) come devo fare?

    grazie in anticipo
    davide

  2. #2

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923
    Ciao Davide,
    per quanto riguarda la partenza della macro ad un determinato orario, di solito si mette nell'evento Workbook_Open() (modulo di classe di "Questa_cartella_di_lavoro" o "this_Workbook" che dir si voglia) :

    Codice: 
    Private Sub Workbook_Open()
    Application.OnTime TimeValue("19:15"), "miasub"
    End Sub
    Alle 19:15 verrà richiamata la sub "miasub" che avrai precedentemente messo in un modulo standard (per semplicità la "miasub" consiste in un semplice messaggio):

    Codice: 
    Sub miasub()
    MsgBox "E' partita..."
    End Sub
    Detto questo, si capisce che il file deve essere già aperto prima delle 19:15...
    __________________________________________________________________________________________________________________

    Per la seconda domanda...
    conviene utilizzare l'evento "
    Worksheet_Change" (nel modulo di classe del foglio interessato...esempio "Foglio1") riferito alle celle a cui fa riferimento la formula nella cella I16.

    Per capirci.... se nella cella I16 c'è questa formula:

    =SOMMA(A1:A2)

    L'evento Change sarà riferito alle celle A1 e A2, in modo che ad ogni loro cambiamento venga controllato il valore della cella I16 e se quest'ultimo è uguale a 999 allora si eseguirà il codice (nel mio caso è sempre un semplice messaggio):

    Codice: 
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:A2")) Is Nothing Then
        If Range("I16").Value = 999 Then
            MsgBox "Valore raggiunto!"
        End If
    End If
    End Sub
    Ti lascio un file di esempio in allegato per capire dove mettere i vari codici....

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  3. #3

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923
    Davide,
    so che sei nuovo ma una lettura al regolamento avresti comunque dovuto darla.....
    non è consentito postare la stessa discussione su più forum:
    http://forum.masterdrive.it/excel-80...e-cella-93501/

    Regola nr.3 "Crossposting" la stessa domanda vietata su più forum
    Non è consentito postare lo stesso messaggio o parti di esso in più aree del forum o su altri forum di excel, salvo casi di particolare interesse che dovranno comunque essere autorizzati da un Admin
    Messaggi crossposting verranno chiusi e quando possibile riuniti.
    Se ripetuti potranno portare all'allontanamento dell'utente.


    Inoltre sarebbe gradito (non obbligatorio) un messaggio di presentazione:
    http://www.forumexcel.it/forum/14-se...presentati-qui

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  4. #4
    L'avatar di Davide
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Rimini
    Messaggi
    10
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0
    Ciao,
    grazie per le macro! per la seconda ho scaricato il file, l'ho modificata in base alle mie esigenze ed è partita regolarmente! perfetto!
    mentre per la prima ho fatto come mi hai detto ma non mi è partita.Ti allego il file.Ti chiedo una cortesia, se puoi allegare il file di prova come hai fatto per la seconda, così vedo se ho sbagliato io e come andrebbe fatta.
    Per la fretta non avevo letto il regolamento, ok! ora lo so, grazie.
    File Allegati File Allegati

  5. #5
    L'avatar di Davide
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Rimini
    Messaggi
    10
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0
    scusa, ti ho allegato il file sbagliato...questo è quello giusto che non mi funziona la macro.
    grazie ciao
    File Allegati File Allegati

  6. #6

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923
    Citazione Originariamente Scritto da Davide Visualizza Messaggio
    scusa, ti ho allegato il file sbagliato...questo è quello giusto che non mi funziona la macro.
    grazie ciao
    Ciao,
    il file che ti avevo allegato conteneva anche l'esempio con "Application.OnTime", naturalmente per verificarne la funzionalità devi modificare l'orario ed essendo legata all'evento "Workbook Open" o chiudi e riapri il file per far partire la macro oppure avvii manualmente la macro dall'editor VBA tramite l'apposito pulsante (il tasto "play").

    N.B.
    Ho aperto il tuo ultimo file allegato e funziona correttamente anche quello.

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  7. #7
    L'avatar di Davide
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Rimini
    Messaggi
    10
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0
    ora mi funziona anche a me! meglio così!
    grazie mille per l'aiuto! ciao

  8. #8

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4016
    Versione Office
    2013
    Likes ricevuti
    1225
    Likes dati
    923
    Citazione Originariamente Scritto da Davide Visualizza Messaggio
    ora mi funziona anche a me! meglio così!
    grazie mille per l'aiuto! ciao
    Ciao Davide,
    Se hai risolto il problema, segna questa discussione come "RISOLTO".
    Vai sul menù "Strumenti Discussione" (all'inizio del thread) e scegli la voce ""Segna questo thread come risolto...".

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

Discussioni Simili

  1. [Risolto] Salta celle con un determinato valore.
    Di NikiDiluccio nel forum Domande su Excel VBA e MACRO
    Risposte: 7
    Ultimo Messaggio: 11/04/17, 18:31
  2. Assegnare un testo in base a determinato valore
    Di Nic1907 nel forum Domande su Excel in generale
    Risposte: 15
    Ultimo Messaggio: 18/02/17, 17:15
  3. Eliminare righe che contengono un determinato valore
    Di Keishusan nel forum Domande su Excel VBA e MACRO
    Risposte: 14
    Ultimo Messaggio: 07/09/16, 13:43
  4. Inserire un valore in un determinato arco temporale
    Di Giol91 nel forum Domande su Excel in generale
    Risposte: 4
    Ultimo Messaggio: 22/08/16, 16:37
  5. macro per cancellare cella con determinato dato
    Di dorico75 nel forum Domande su Excel VBA e MACRO
    Risposte: 4
    Ultimo Messaggio: 13/04/16, 18:57

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •