Introducción En el transcurso del desarrollo de aplicaciones, a menudo nos encontramos con que nuestro programa tiene que poder interactuar con el sistema para gestionar archivos o carpetas. Este pequeño tutorial trata precisamente de enseñar a abrir una ventana de sistema para localizar archivos y/o carpetas, del mismo modo que lo hace cualquier otro programa cuando escogemos la opción de menú Archivo/Abrir. Vaya por delante que el código no es mío. Lo único que hago es tomarlo de una aplicación en que lo usé y explicarlo. Copio y pego el código y lo explico después: Public Function importaB() As Variant Dim respuesta As Long Dim dlgAbrir As FileDialog Dim vrtSelected As Variant Dim narchivo As String Set dlgAbrir = Application.FileDialog(msoFileDialogFilePicker) With dlgAbrir .AllowMultiSelect = False .title = "Titulo de la ventana" .InitialFileName = Application.CurrentProject.Path .ButtonN