Dim Texto As StringTexto = "Hola" & vbCrLf & "Me llamo David :D"MsgBox Mid(Texto, InStrRev(Texto, vbCrLf) + 2)