DA =ADESSO() A TESTO

[pippo1300]

VORREI SAPERE SE SI PUO' CON UNA FORMULA (ho con qualche altro modo)
TRASFORMARE UNA CELLA CON =ADESSO() [quindi formato data aaaa corrispondente 2010]
in testo 2010 [formato testo 2010] in un' altra cella.

Esempio A1 [=ADESSO()] > > > D1[2010] al modificarsi degli anni si modificherebbe come testo

GRAZIE ANTICIPATAMENTE A CHI MI POTREBBE AIUTARE.

[maxmula]

Se metti la formula nel foglio di calcolo puoi assegnare alla cella il formato voluto.
Menu Formato/celle; scegli il formato data che preferisci, oppure vai su Personalizzato e definisci tu quello che vuoi.

In alternativa puoi fare così:
- Apri VB Editor (ALT-F11) ed aggiungi un modulo.

- Nel modulo, inserisci questo codice:

Codice: Seleziona tutto

Function MIADATA(DATA)
    MIADATA = Format(DATA, "dd/mm/yyyy, HH:MM:ss")
End Function


e nella cella metti la formula:

Codice: Seleziona tutto

=MIADATA(ADESSO())

Se poi richiami la guida di VBA, puoi trovare un sacco di informazioni sulla funzione Format, così da crearti i lformato che ti serve.

Ciao!
MAx

[Flash30005]

VORREI SAPERE SE SI PUO' CON UNA FORMULA (ho con qualche altro modo)
TRASFORMARE UNA CELLA CON =ADESSO() [quindi formato data aaaa corrispondente 2010]

Ciò che chiedi è contraddittorio perché se è una formula non è testo
a meno che tu non voglia avere apparentemente e visivamente il formato testo dell'anno che è in A1
allora puoi utilizzare questa formula

="'" & ANNO(A1)

o questa

Codice: Seleziona tutto

=TESTO(ANNO(A1);0)

ma ripeto è una formula non testo per avere in formato testo devi usare una macro con solo una riga di codice, tipo:

Codice: Seleziona tutto

Sub TrasfTesto()
[D1] = "'" & Year(Range("A1").Value)
End Sub

Che avvierai ad ogni apertura del file o attivazione foglio o con qualsasi altro input

Ciao

[pippo1300]

=TESTO(ANNO(A1);0)

MI VA BENISSIMO GRAZIE 1000