Tienes que guardarlos en disco a través de bases de datos o bien mediante archivos planos por ejemplo este código guarda un string en un archivo de texto:
Sub EscribeArchivo(ByVal sPath As String) Dim sVal As String sVal = "Estoy escribiendo en un archivo" Open sPath For Output As #1 Print #1, sVal Close #1 End Sub