Hola Bea,
Cita: con alguna variable predefinida o no de visual
esto no lo he entendido...
Para trabajar con archivos utilizala clase FileSystemObject.
Unos ejemplos sacados de MSDN:
Private Sub Command10_Click()
' Obtiene una instancia de FileSystemObject.
Dim fso As New FileSystemObject, fldr As Folder, s As String
' Obtiene el objeto Drive.
Set fldr = fso.GetFolder("c:")
' Imprime el nombre de la carpeta principal.
Debug.Print "El nombre de la carpeta principal es: " & fldr
' Imprime el nombre de la unidad.
Debug.Print "Contenida en la unidad " & fldr.Drive
' Imprime el nombre del archivo raíz.
If fldr.IsRootFolder = True Then
Debug.Print "Esta carpeta es una carpeta raíz."
Else
Debug.Print " Esta carpeta no es una carpeta raíz."
End If
' Crea una nueva carpeta con el objeto FileSystemObject.
fso.CreateFolder ("c:\Bogus")
Debug.Print "Se ha creado la carpeta C:\Bogus"
' Imprime el nombre base de la carpeta.
Debug.Print "Basename = " & fso.GetBaseName("c:\bogus")
' Libera la carpeta creada recientemente.
fso.DeleteFolder ("c:\Bogus")
Debug.Print "Se ha eliminado la carpeta C:\Bogus"
End Sub
Saludos
Pablo