Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Convertire in automatico il formato data in una cella excel

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Convertire in automatico il formato data in una cella excel

Postdi akragas5 » 30/06/16 13:46

Salve,

Ho un piccolo problema da risolvere in excel.

Esiste un modo per trasformare la data inserita in una cella in modo automatico?

Mi spiego meglio cosa voglio ottenere:
io vorrei che ogni volta che scrivo una data nel formato ad esempio 01012015
in automatico il sistema me lo corregga e me la scriva in questo formato 01/01/2015.

Grazie anticipatamente per la risposta.

Akragas
akragas5
Newbie
 
Post: 1
Iscritto il: 30/06/16 13:38

Sponsor
 

Re: Convertire in automatico il formato data in una cella ex

Postdi alfrimpa » 30/06/16 14:40

Ciao akragas5

Avresti dovuto specificare in quali celle debba avvenire questa "trasformazione".

Con questa macro che va inserita nel modulo del foglio interessato il formato viene cambiato alla sola cella A1 ma si può variare come si vuole.

Codice: Seleziona tutto
Private Sub Worksheet_Change(ByVal Target As Range)
Dim giorno As String
Dim mese As String
Dim anno As String
Dim data As String
If Not Intersect(Target, Range("a1")) Is Nothing Then
    data = Target.Value
    giorno = Left(data, 2)
    mese = Mid(data, 3, 2)
    anno = Right(data, 4)
    If Target.Value = "" Then Exit Sub
    Application.EnableEvents = False
            Target.Value = giorno & "/" & mese & "/" & anno
    Application.EnableEvents = True
End If
End Sub


Ho provato (ma sicuramente c'è il modo) a farlo con i "Formati" ma non ci sono riuscito.

P.S. Attenzione la data va sempre scritta ggmmaaaa
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 840
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Convertire in automatico il formato data in una cella ex

Postdi alfrimpa » 30/06/16 15:18

Scusa akragas5 non considerare la mia precedente risposta che funziona ma è troppo complicata; che è un po' come voler ammazzare un moscerino con un bazooka :)

Fai così che è molto meglio

1) Seleziona le celle che vuoi formattare
2) Vai in Formato Celle, Personalizzato
3) nella casella Tipo digita questo

Codice: Seleziona tutto
0#"/"##"/"####


4) dai Ok.
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 840
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Convertire in automatico il formato data in una cella ex

Postdi Anthony47 » 30/06/16 22:16

Benvenuto nel forum ad akragas5 e un saluto ad Alfredo.

Con la formattazione noi cambiamo la visualizzazione di un dato, ma non la sua natura; quindi l'eventuale 01/01/2016 ottenuto non sara' una data, ma sempre il numero 01012016
Cosi' che se gli sommiamo 366 otterremo 01/01/2382; mentre se sommiamo 366 alla data 01/01/2016 otteniamo 01/01/2017

Se il risultato della formattazione non risolve il problema di akragas5, la strada giusta e' il bazooka della macro.
Ma per fare questo e' necessario che venga specificato quali sono le celle in cui tutto cio' che viene introdotto in quel formato deve essere trasformato in una data.

Ciao
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13894
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Convertire in automatico il formato data in una cella ex

Postdi alfrimpa » 01/07/16 11:42

Ottima precisazione Anthony.

A proposito cosa ne pensi della mia macro?

Da "artigiano" del VBA mi interessa conoscere il parere di un "professionista" :)
Alfredo

Win7 + Office 2007
Avatar utente
alfrimpa
Utente Senior
 
Post: 840
Iscritto il: 30/12/13 17:01
Località: Napoli

Re: Convertire in automatico il formato data in una cella ex

Postdi Anthony47 » 01/07/16 11:51

Da "artigiano" del VBA mi interessa conoscere il parere di un "professionista"
Ah aha, appena passa un professionista gli chiedo un parere...
La base e' quella, andrebbe solo controllato che il dato di partenza produce una data valida; come pure produrrei direttamente una data usando o DateSerial(Anno, Mese, Giorno) oppure DateValue(Stringa).
Sempre comunque da fare solo sul range di celle deputate a contenere la data.

Ciao!
Anthony
Win7 + Office 2010 Ita; Win 7 + Office 2013 Ita
Xp + Office 2003 Ita
E voi cosa usate? (per istruzioni vedere viewtopic.php?f=26&t=97449)
Avatar utente
Anthony47
Moderatore
 
Post: 13894
Iscritto il: 21/03/06 16:03
Località: Ivrea


Torna a Applicazioni Office Windows


Topic correlati a "Convertire in automatico il formato data in una cella excel":


Chi c’è in linea

Visitano il forum: Nessuno e 6 ospiti