Bueno, mi aburrimiento cada dia es mas grande, y si estoy en mi casa "malo" y no voy al cole, aun más... (es coña, esos dias son los mejores xD)
Bueno, os dejo un código en el que separa la fecha en 3 partes, dia, mes, año... (Es de mi cosecha privada (mio)):
Dim fechatotal As String
Dim dma() As String
fechatotal = Date
dma = Split(fechatotal, "/")
MsgBox "Dia: " & dma(0) & vbNewLine & "Mes: " & dma(1) & vbNewLine & "Año: " & dma(2), vbInformation, "Fecha: "
¿Se nota que volvi a instalar windows porque me obligaron? xD