Forum di Excel e VBA, per condividere esperienze e risolvere problemi su: Excel, Word, Access, Power Point, Microsoft Office, macro, Visual Basic e Visual Studio.
sostituzione stringa di caspita! (utente non iscritto) data: 29/06/2014 15:21:42
Salve a tutti,
ho un problema inerente ad alcune date, antecedenti il 1900.
Es.
02/5/1853
22/11/1855
3/06/1854
Dal momento che in alcune date non sono stati inseriti gli zeri (es. 02/05/1853) come posso fare per aggiugerli automaticamente al giorno o al mese e ottenere così sempre una stringa di 10 caratteri?
Grazie
di lepat (utente non iscritto) data: 29/06/2014 15:58:16
in quale colonna ?
di lepat (utente non iscritto) data: 29/06/2014 16:03:51
se in colonna A usa questa macro
Sub a()
LR = Cells(Rows.Count, "A").End(xlUp).Row
For r = 1 To LR
d = Cells(r, "A")
If InStr(d, "/") = 2 Then Cells(r, "A") = "0" & d
d = Cells(r, "A")
If InStrRev(d, "/") = 5 Then Cells(r, "A") = Left(d, 3) & "0" & Right(d, 6)
Next
End Sub
di caspita! (utente non iscritto) data: 29/06/2014 17:37:13
perdonami, è possibile usando le sole funzioni excel?
di lepat (utente non iscritto) data: 29/06/2014 17:45:06
sicuramente sì, ma io non lo so fare
di caspita! (utente non iscritto) data: 29/06/2014 18:05:20
come funziona la macro? cosa devo fare? perdona l'ignoranza. Grazie.
di lepat (utente non iscritto) data: 29/06/2014 18:18:14
h t t p://www.mrwebmaster.it/visual-basic/guide/guida-vba/
di lepat (utente non iscritto) data: 29/06/2014 18:19:42
se non hai tempo per imparare allega il file e te lo restituisco con la macro attivabile da pulsante
di caspita! (utente non iscritto) data: 29/06/2014 18:35:48