** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Error con Variable FileDialog
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoError con Variable FileDialog

 Responder Responder
Autor
Mensaje
Lean Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 14/Enero/2011
Estado: Sin conexión
Puntos: 29
Enlace directo a este mensaje Tema: Error con Variable FileDialog
    Enviado: 04/Abril/2019 a las 12:05
Hola,

Tengo una subrutina para subir un archivo desde Access 2016.
He registrado y comprobado la Referencia Microsoft Office 16.0 Object Library pero al ejecutar me da el error de Compilacion: No se ha definido el tipo definido por el usuario 
en la linea: 
    Dim fd As Office.FileDialog
  
¿Cual puede ser la causa?

Gracias
Arriba
prga Ver desplegable
Moderador
Moderador


Unido: 16/Noviembre/2004
Localización: España
Estado: Sin conexión
Puntos: 3137
Enlace directo a este mensaje Enviado: 04/Abril/2019 a las 13:20
Hola.
En un principio no tendría que dar error sí está activada la referencia a esa librería.
De todas formas, prueba este código

 Dim fd As Object 
 Set fd = Application.FileDialog(3) '1=msoFileDialogOpen;3=msoFileDialogFilePicker; 4=msoFileDialogFolderPicker
  fd.show

que "funciona" en access 2016 sin tener activada la referencia a esa librería

Espero que ayude a resolver la duda
Ya comentas.
Un saludo a todos

Arriba
Lean Ver desplegable
Nuevo
Nuevo
Avatar

Unido: 14/Enero/2011
Estado: Sin conexión
Puntos: 29
Enlace directo a este mensaje Enviado: 04/Abril/2019 a las 22:41
Muchas Gracias por tu ayuda, lo he probado y ha funcionado correctamente a la primera
Gracias
Saludos
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable