|
Domanda.
nome=Vincenzo
cognome=Vicarelli
versione=2000
conosco2=medio
email=amm.vicarelli@angelini.it
chra=720
problema=Vorrei sapere se esiste una funzione che agisca come fine mese
(fine.mese) per fine anno.
Esempio: 03/07/2002 deve scrivere -> 31/12/2002
08/09/2002 deve scrivere -> 31/12/2002
oppure si deve scrivere una macro o codice VBA.
Grazie per il consulto.
Risposta.
no Vincenzo, non mi risulta una funzione FineAnno. Te ne ho preparata una,
questa:
Function FineAnno(data As Date, anni As Long) As Date
Y = Year(data)
Z = Y + anni
FineAnno = "31/12/" & Z
End Function
Dovrai inserirla in un modulo, e poi potrai richiamarla come fai per il
Fine.Mese, esempio, se in A1 hai la data, e in B1 vuoi il fine anno, in B1
scrivi
=FineAnno(A1;0)
ed avrai la data di fine anno. Se al posto dello zero, come secondo
argomento, metterai 2, o un'altro numero, ti verrà calcolato il fine anno
della data corrente più tanti anni corrispondenti al valore immesso.
unico accorgimento: il formato cella che ospita la funzione dovrà essere di
tipo Data, con il formato che vorrai tu.
ciao, fammi sapere, ennius
|