Data Odierna



  • Data Odierna
    di Pietro (utente non iscritto) data: 23/04/2013 22:06:49

    Ciao ragazzi, ho creato un pulsante grazie al quale, cliccandolo, su una cella compare la data odierna.
    Ho notato, pero', che, se riapro il file dopo qualche giorno, all'apertura del file non mi ridà la data di qualche giorno prima ma aggiorna la data attuale.
    Come posso fare per fargli mantenere la data di quel determinato giorno?
    Grazie.



  • di totygno71 data: 24/04/2013 08:27:42

    ciao Pietro
    quale funzione utilizzi per avere la data?
    In che formato ti piacerebbe visualizzarla? es. gg/mm/aa oppure gg/mm/aaaa


  • Data Odierna
    di Pietro (utente non iscritto) data: 24/04/2013 13:40:47

    Ciao, ho creato un pulsante al quale ho associato questa codice.

    Per il formato mi piacerebbe avere questo: gg/mm/aaaa

    Grazie.
     
    Range("Y6").Select
        ActiveCell.FormulaR1C1 = "=TODAY()"
        Range("Y8").Select



  • di totygno71 data: 24/04/2013 13:53:53

    Ciao
    sostituisci con questo codice.
    Il motivo era legato al fatto che con il tuo codice veniva inserita una formula nella cella "=oggi", che ovviamente ad ogni apertura del file riportava la data odierna...
    Ciao
     
    Range("Y6").Select
        ActiveCell.FormulaR1C1 = Date
        Range("Y8").Select



  • di Vecchio Frac data: 24/04/2013 16:22:27

    cit. " Per il formato mi piacerebbe avere questo: gg/mm/aaaa "
    ---> due alternative:
    Format ([Y6], "dd/mm/yyyy")
    FormatDateTime([Y6], vbShortDate)





  • Data Odierna
    di Pietro (utente non iscritto) data: 24/04/2013 20:55:57

    Grazie mille, tutto ok.



  • di totygno71 data: 24/04/2013 21:05:47

    Ottimo
    Ciao alla prossima