[RESUELTO]Abrir pdf boton formulario desde selección archivo

[Francisco T.]

Editado: Por SLV-es: Tema separado del principal Abrir pdf con boton en formulario

Hola soy nuevo en esto y no tengo mucha idea de programación. Estudie la macro que pusisteis aqui y me funciona bien, pero a mi me gustaría que en lugar de hacerlo con un campo de texto, se pudiese hacer con un campo de tipo "Selección de Archivo", de manera que pulsando sobre los puntos, buscas el archivo PDF que quieres y pulsando el boton, te abra el archivo que hay en la ruta del campo Selección de Archivo.
Es posible hacer eso?. Yo lo estoy intentando con esta misma macro, pero cambiando solamente el nombre del campo de texto , por el del nombre del campo Selección de Archivo, pero no me funciona. Ya sabía yo, que tan fácil no iba a resultar .

Para mi es mucho más cómodo utilizar este tipo de campo, ya que en una ficha cliente, va a haber muchos documentos con distintos nombre asignados a un solo cliente y no quiero tener que estar escribiendo siempre el nombre del documento pdf a abrir.

Me pueden ayudar?
Gracias

[RMG]

Hola,

No se debe exponer un problema en un tema resuelto, por favor abre un nuevo hilo e intentaremos ayudarte.

Saludos

[SLV-es]

Tema separado del principal Abrir pdf con boton en formulario

[SLV-es]

Hola

No elimines el cuadro de texto.
Al seleccionar un archivo invoca una macro desde el evento Texto modificado que llene el cuadro de texto con el nombre del archivo seleccionado.
Si no quieres ver el cuadro de texto, cambia su propiedad Visible a No.
De esta forma las modificaciones serán mínimas.

[RMG]

Hola,

Para hacer lo que planteas con este aporte lo solucionarás.

Código: Seleccionar todo

Global archivo 

Sub MostrarArchivo (Evento)'Evento del botón
	Dim sAbrir
	Dim sRuta
   sRuta = archivo
   If FileExists(archivo) Then
      sAbrir = CreateUnoService("com.sun.star.system.SystemShellExecute")
      sAbrir.execute( sRuta, "", 0)
   Else
      MsgBox "no existe"
   End If
End Sub

Sub obtienearchivo (Evento)'Evento texto modificado de seleccion archivo
  archivo = Evento.Source.Text
End Sub

Aunque pienso que no es la solucion más acertada, lo ideal seria abrir una carpeta por cliente para seleccionar un archivo y no como tu lo planteas.

Saludos

[Francisco T.]

Bueno, igual me explique mal. La idea va a ser abrir una carpeta por cliente. Cada cliente tiene un número de identificación único que se lo asigna el ID de la tabla principal de forma automática (autonumérico). Despues dentro del directorio Documentación, se crea de forma manual una carpeta con el mismo identificador del cliente, 001 - 002 - 003 - 004 etc.... dentro de ese directorio se introduciran los archivos PDF de cada cliente y es cuando quiero crear el campo del que hablamos para poder seleccionar los diferentes archivos PDF de cada cliente. La idea sería poner un subformulario a modo de tabla en la que en cada línea se pueda poner un documento y poder abrir cada uno de forma independiente, lo que pasa en modo tabla, no se como hacerlo. se podría poner la ruta del archivo en cada línea de la tabla, pero no se como hacer para que se pueda abrir cada uno de ellos.

En access había una propiedad para los campos que era "vincular archivo" de esa manera se podía seleccionar con el boton derecho la ruta del archivo y despues pulsando sobre la ruta, ya se abría de forma automática el PDF, pero en OpenOffice y LibreOffice no existe la opción esta y entonces no se hacerlo.

Espero explicarme bien, Gracias

[Francisco T.]

La macro que invoca desde el evento Texto modificado y que llene el cuadro de texto con el nombre del archivo seleccionado, existe en la librería de Macros del programa o hay que crearla desde cero. Lo mio no es el programar

[Francisco T.]

Podría valer esto que se pone aqui en este post que encontré para aplicarlo yo a los PDF? https://forum.openoffice.org/es/forum/v ... 770#p30770.

Se puede hacer esto mismo pero para documentos en PDF. Osea que pongas el nombre de un documento en pdf y la abra. Tengo una pequeña base de un laboratorio, en la que entra mucha documentación relacionada con un caso determinado. Cada caso tiene una ficha 001-002-003 etc... toda la documentación relacionada con cada caso la paso a PDF y la meto en su carpeta correspondiente 001-002-003 etc... Cuando accedo a la ficha que sea, 001-002-003 etc.. quería poder abrir los documentos en pdf. Un campo para cada documento, con un boton que me lo abra y muestre. Gracias.

Quiero saber si puedo aplicar esto que pusieron aquí, para los documentos pdf.

No se nada de programar, Gracias

[RMG]

Hola,

Mira este ejemplo, posiblemente haga lo que pretendes. Con el botón insertar archivo grabas el archivo igual da donde este situado y el tipo que sea y con el botón abrir lo abres.

Saludos

[SLV-es]

Otra opción

Se supone que en la misma carpeta en la que reside la base de datos tienes una subcarpeta llamada clientes
Dentro tienes carpetas con el ID de cada cliente 00001, 00002, etc

El botón Leer PDF abre un selector de archivos, y si seleccionas un PDF lo abre

Nota: no es posible definir la carpeta por defecto en la que se tiene que abrir en Windows Vista y 7 (ver https://issues.apache.org/ooo/show_bug.cgi?id=110141)

Nota 2: sin programar, dificil adaptar las soluciones a tu problema, aunque en este caso es sencillo.

[Francisco T.]

Muchas gracias por vuestras respuestas y vuestra labor, voy a probar lo que me habéis dicho y ya os comento como va la cosa.
Gracias

[Francisco T.]

Hola,

Mira este ejemplo, posiblemente haga lo que pretendes. Con el botón insertar archivo grabas el archivo igual da donde este situado y el tipo que sea y con el botón abrir lo abres.

Saludos

Esta es la opción que más se ajusta a lo que quiero. Copie las macros a mi base. Pero cuando creo los botones y les asigno las macros asignar y abrir, me sale un error al abrir el formulario que contiene los botones, que dice:
"No se pudieron cargar los contenidos de los datos.
No hay ninguna tabla llamada tabClientes"

Obviamente se refiere a la tabla Clientes que me pusiste de ejemplo, pero no encuentro dentro del código de las macros, ninguna referencia a la tabClientes, y no puedo modificar por el nombre de mi tabla.

[Francisco T.]

Arreglado, copie los botones y los pegue en mi formulario y me pego también su correspondencia con la tabla Clientes, se veía en el navegador del formulario. Elimine los botones y la referencia a esa tabla y volvi a crear los botones y ya me funciona.

[RMG]

Hola,

Si consideras que se ha resuelto tu consulta, debes ponerlo como tal, así mantendremos un foro más organizado.

https://forum.openoffice.org/es/forum/v ... f=3&t=2668

Saludos