Imágen vinculada a celda

Discute sobre la aplicación de hojas de cálculo
Responder
j2rm
Mensajes: 1
Registrado: Vie Jun 01, 2018 6:40 pm

Imágen vinculada a celda

Mensaje por j2rm »

Hola muchach@s como esta?

Estoy intentando hacer algo parecido a lo que se muestra en este vídeo

Código: Seleccionar todo

https://www.youtube.com/watch?v=wZMrOOU9iXs
Más no logro hacer que las imágenes cambien, cuando el valor de la celda a la cual están vinculadas varia.

Alguien por acá sabrá como hacerlo de forma correcta?
Última edición por mauricio el Vie Ago 24, 2018 6:26 pm, editado 1 vez en total.
Razón: Cambiar titulo
LibreOffice 6.0.4 con Parabola GNU/Linux-Libre
Avatar de Usuario
jjuanhdez
Mensajes: 14
Registrado: Dom Ene 10, 2010 1:46 pm
Ubicación: España

Re: LIBREOFFICE CAL Imágen vinculada a celda

Mensaje por jjuanhdez »

¡Hola!

Con macros tienes la respuesta en : https://forum.openoffice.org/es/forum/v ... c97deaf087

Pero, imagenes vinculadas sin macros como en el ejemplo que indicas no se si se puede hacer con Calc. Investigará un poco y si lo encuentro te indico.

Un saludo.
LibreOffice 6.0.4 en Windows 10 Pro
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: LIBREOFFICE CAL Imágen vinculada a celda

Mensaje por mauricio »

No se si lo soñé, pero creo recordar leer en unas notas de desarrollo de LibreOffice, que se estaba implementado para insertar en las celdas, voy a intentar buscarlo.
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
fornelasa
Mensajes: 3268
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: LIBREOFFICE CAL Imágen vinculada a celda

Mensaje por fornelasa »

Calc no puede trabajar con un digamos "VLOOKUP IMAGEN" pues no lo soporta, excepto con macros.
Sin duda un tema complejo para un novato.
Aquí un ejemplo de un "VLOOKUP PICTURE" usando macros.
Cambia cualquier celda del rango I3:I7 (J3:J7 en el archivo de OpenOffice) y ve lo que sucede.
Y obvio por el momento no funciona para LibreOffice ya que este tiene un Bug a la hora de copiar objetos entre celdas

 Editado: Mensaje re, re, re, super reeditado 


Envío también un ejemplo para LIbreOffice y otro más para OpenOffice

Saludos, Federico.
Adjuntos
vlookpictureEnd %25281%2529_Libre.ods
VLOOKUP PICTURE para LibreOffice y OpenOffice
(145.85 KiB) Descargado 263 veces
vlookpictureEnd.ods
Para OpenOffice (debido a un bug de LibreOffice no funciona en LibreOffice)
(152.24 KiB) Descargado 240 veces
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
carlosmle167
Mensajes: 5
Registrado: Sab Abr 22, 2017 8:26 pm

Re: LIBREOFFICE CAL Imágen vinculada a celda

Mensaje por carlosmle167 »

Hola amigos después de leer el libro de Mauricio (Bueno vale consultar muchísimo)
hice esta hoja de calculo con imagenes y Conseguí que funcionara aunque creo que se puede mejorar y sobre todo solucionar el fallo que os comento que es la superposición de las imágenes osea lo que quiero es que cada vez que le doy al botón se borren las
fotos anteriores y se queden las nuevas.
Muchas gracias.
OpenOffice 3.1 en Windows Vista
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: LIBREOFFICE CAL Imágen vinculada a celda

Mensaje por mauricio »

No, no lo soñe, se ha implementado en 6.1: https://wiki.documentfoundation.org/Rel ... s/6.1#Calc
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Avatar de Usuario
fornelasa
Mensajes: 3268
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: LIBREOFFICE CAL Imágen vinculada a celda

Mensaje por fornelasa »

Parecería que esa implementación no se refiere a lo que pudiéramos llamar una VLOOKUP PICTURE que (parece) es lo que solicita el posteador original al referirse al vídeo, parece que tiene que seguirse haciendo solo con macros, al menos hasta ahora.

Saludos, Federico.
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
Pierrot-le-fou
Mensajes: 8
Registrado: Vie Ago 24, 2018 2:04 pm

Re: LIBREOFFICE CAL Imágen vinculada a celda

Mensaje por Pierrot-le-fou »

Buenas, me surge una duda. Se podría hacer con macros algo similar al ejemplo adjunto?

Yo lo que quiero es, tener la base con las fotos en una hoja y que, en funcion del número que aparezca en B1, B7, B12 y así sucesivamente, aparezca la foto relacionada en la hoja Fotos. Serían entre 150 y 200 registros más o menos.

Sería viable? Gracias de antemano.
Adjuntos
ejemplo.ods
(54.45 KiB) Descargado 218 veces
LibreOffice 6.0.6.2 en Ubuntu 18.04
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: LIBREOFFICE CAL Imágen vinculada a celda

Mensaje por mauricio »

Por favor, no uses un tema expuesto para plantear una duda diferente, abre un nuevo tema, pero antes... ¿ya realizaste una búsqueda en el foro?, creo recordar que tu pregunta ya se ha respondido...
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Pierrot-le-fou
Mensajes: 8
Registrado: Vie Ago 24, 2018 2:04 pm

Re: Imágen vinculada a celda

Mensaje por Pierrot-le-fou »

La duda viene en relación al ultimo ejemplo del usuario fornelasa, vendría a ser casi lo mismo pero con matices.

Y por supuesto que he realizado la búsqueda, de hecho así encontré el presente hilo. Si hay algo exacto a la cuestión planteada, no he sabido encontrarlo.

Gracias de todos modos.
LibreOffice 6.0.6.2 en Ubuntu 18.04
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: Imágen vinculada a celda

Mensaje por mauricio »

Es verdad, ahora que veo tu archivo... tu pregunta, ya la respondió mi amigo fornelasa... mira y aplica su ejemplo...
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Pierrot-le-fou
Mensajes: 8
Registrado: Vie Ago 24, 2018 2:04 pm

Re: Imágen vinculada a celda

Mensaje por Pierrot-le-fou »

xD Si supiera como aplicarlo no hubiera planteado la cuestión.

Saludos
LibreOffice 6.0.6.2 en Ubuntu 18.04
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: Imágen vinculada a celda

Mensaje por mauricio »

Lo menos que esperaba, es al menos que intentaras hacerlo... ojala alguien pueda hacerlo por ti.

Saludos
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Pierrot-le-fou
Mensajes: 8
Registrado: Vie Ago 24, 2018 2:04 pm

Re: Imágen vinculada a celda

Mensaje por Pierrot-le-fou »

Lo menos que esperaba, es al menos que intentaras hacerlo... ojala alguien pueda hacerlo por ti.

Saludos
No presuponga usted las acciones de los demás.

Por supuesto que intenté adaptarlo a lo que necesitaba pero me encontré con los siguientes problemas:

- El primer método (https://forum.openoffice.org/es/forum/v ... c97deaf087) que propone usted, está más bien pensado a modo de buscador, e implica tener una carpeta aparte donde ir almacenando todas las imágenes. Puede resultar muy cómodo si eres el único usuario del fichero, pero no es el caso puesto que somos varios los que intervenimos en alimentarlo de datos para realizar los correspondientes cálculos mes a mes. Aparte, el fichero se manda por mail, así que lo descarté de primeras.

- El segundo método que propone el compañero fornelasa se adapta mucho más a lo que yo necesito puesto que ya incluye las imágenes incrustadas pero al revisar el código me encontré con lo siguiente:

Código: Seleccionar todo

   uno = Trim(hoja.getCellRangeByName("C4").String)
       dos = trim(hoja.getCellRangeByName("D4").String)
       tres = trim(hoja.getCellRangeByName("E4").String)                          
              For i = 0 To (Imagenes.count - 1)
              if Imagenes.getByIndex(i).Name = uno then u = hoja.getCellRangeByName(uno) : imgU = Imagenes.getByIndex(i)
              if Imagenes.getByIndex(i).Name = dos then d = hoja.getCellRangeByName(dos) : imgD = Imagenes.getByIndex(i)
              if Imagenes.getByIndex(i).Name = tres then t = hoja.getCellRangeByName(tres) : imgT = Imagenes.getByIndex(i)                                        
              Next                    
                    imgU.Anchor = hoja.getCellRangeByName("C5")
                    imgD.Anchor = hoja.getCellRangeByName("D5")
                    imgT.Anchor = hoja.getCellRangeByName("E5")
O sea, que habría que definir los rangos de las celdas uno a uno, lo cual con 180 registros me resulta bastante tedioso. Aparte que, cada vez que quisiera añadir uno nuevo implicaría modificar la macro lo cual lo hace aún más tedioso.

Me preguntaba si había una forma más rápida y cómoda que se adaptara a lo que necesito, de ahí mi consulta. Pensé que el foro estaba para eso.

Gracias de todos modos y perdón por el tostón.

Un saludo
LibreOffice 6.0.6.2 en Ubuntu 18.04
Avatar de Usuario
fornelasa
Mensajes: 3268
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: Imágen vinculada a celda

Mensaje por fornelasa »

Hola a todos, creo sí es posible hacerlo, en cuanto pueda intentaré subir un archivo ejemplo, si antes no se me adelantan :D
Saludos, Federico.
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
Avatar de Usuario
mauricio
Mensajes: 6092
Registrado: Sab Nov 22, 2008 5:36 am
Ubicación: CDMX
Contactar:

Re: Imágen vinculada a celda

Mensaje por mauricio »

Pierrot-le-fou escribió: No presuponga usted las acciones de los demás.
Exactamente no lo hice, te escribí después de ver tu archivo que no trae nada, nos atenemos a lo escriben y muestran aquí, no podemos "presuponer" que es lo que hicieron o no.
______________________________________________
"Todo cuanto no podemos dar nos posee". - André Gide
LibreOffice 6.2 | ArchLinux | Gnome3
No respondo preguntas privadas, por favor, usa el foro
Pierrot-le-fou
Mensajes: 8
Registrado: Vie Ago 24, 2018 2:04 pm

Re: Imágen vinculada a celda

Mensaje por Pierrot-le-fou »

fornelasa escribió:Hola a todos, creo sí es posible hacerlo, en cuanto pueda intentaré subir un archivo ejemplo, si antes no se me adelantan :D
Saludos, Federico.
Muchas gracias compañero, se agradece muchísimo el interés.

Un saludo.
LibreOffice 6.0.6.2 en Ubuntu 18.04
Avatar de Usuario
fornelasa
Mensajes: 3268
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: Imágen vinculada a celda

Mensaje por fornelasa »

aquí una posible opción (por el momento solo se me ocurre esto), Pulsa el botón VLOOKUP para buscar y el botón acomodoInicial para regresar las imágenes a su estado original.
Las imágenes necesariamente deben estar en la misma hoja, en este caso están en la columna Q
Saludos, Federico.
Adjuntos
ejemplo (7).ods
VLOOKUP PICTURE
(194.29 KiB) Descargado 223 veces
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
Pierrot-le-fou
Mensajes: 8
Registrado: Vie Ago 24, 2018 2:04 pm

Re: Imágen vinculada a celda

Mensaje por Pierrot-le-fou »

fornelasa escribió:aquí una posible opción (por el momento solo se me ocurre esto), Pulsa el botón VLOOKUP para buscar y el botón acomodoInicial para regresar las imágenes a su estado original.
Las imágenes necesariamente deben estar en la misma hoja, en este caso están en la columna Q
Saludos, Federico.
Muchisimas gracias. Aunque no es exactamente lo que necesito, creo que puedo adaptarlo bastante bien a mis necesidades.

Prometo subir mi fichero cuando lo tenga montado, por si a alguien más le puede ser de utilidad.

Muchas gracias de nuevo y un saludo muy grande.
LibreOffice 6.0.6.2 en Ubuntu 18.04
Avatar de Usuario
fornelasa
Mensajes: 3268
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: Imágen vinculada a celda

Mensaje por fornelasa »

Aunque no es exactamente lo que necesito, creo que puedo adaptarlo bastante bien a mis necesidades.
Si, los ejemplos aquí plasmados son precisamente eso, ejemplos, para que los usuarios intenten adaptarlo a sus propias necesidades, no pretenden cubrir todos los casos.
Prometo subir mi fichero cuando lo tenga montado, por si a alguien más le puede ser de utilidad.
A mi si me gustaría ver tu archivo, si se puede.
Saludos, Federico.
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
Pierrot-le-fou
Mensajes: 8
Registrado: Vie Ago 24, 2018 2:04 pm

Re: Imágen vinculada a celda

Mensaje por Pierrot-le-fou »

fornelasa escribió:
Aunque no es exactamente lo que necesito, creo que puedo adaptarlo bastante bien a mis necesidades.
Si, los ejemplos aquí plasmados son precisamente eso, ejemplos, para que los usuarios intenten adaptarlo a sus propias necesidades, no pretenden cubrir todos los casos.
Por razones operativas, debo tener las imagenes en una hoja separada de la principal. He estado trasteando y no he sido capaz de copiar de una hoja a la otra:

Código: Seleccionar todo

Sub BuscarPicture()


	   oDoc = ThisComponent
    oSheet0 = oDoc.Sheets(0) 
	oSheet1	= oDoc.Sheets(1)                             
   Imagenes = oSheet0.GetDrawPage()
   
        fin = 1000    
      for i = 0 To fin / 5 Step 5      
            dato = oSheet0.getcellbyPosition(0, i).String
      for j = 0 To (Imagenes.count - 1)
         If "clv" + Imagenes.getByIndex(j).Name = dato Then
             Imagenes.getByIndex(j).Anchor = oSheet0.getCellByPosition(0, i)      
         End If   
      Next
      Next
End Sub

Sub acomodarImagenes()

	   oDoc = ThisComponent
    oSheet0 = oDoc.Sheets(0) 
	oSheet1	= oDoc.Sheets(1)                             
   Imagenes = oSheet1.GetDrawPage()

        fin = 1000
       numd = -1
       On Error GoTo Salir   
      for i = 0 To fin / 5 Step 5      
       numd = numd + 1
       If Imagenes.getByIndex(numd).Name = "buscar" Or Imagenes.getByIndex(numd).Name = "acomodar" Then
       numd = numd + 1
       Else 
            Imagenes.getByIndex(numd).Anchor = oSheet1.getCellByPosition(2, i) 'Columna B Hoja 'Fotos'
       End If
      Next
      Salir:	      
End Sub

Solo me funciona dentro de la misma hoja y ahí estoy atascado.

Gracias de antemano. Un saludo.
LibreOffice 6.0.6.2 en Ubuntu 18.04
Avatar de Usuario
fornelasa
Mensajes: 3268
Registrado: Jue Feb 17, 2011 8:30 pm
Ubicación: Estado de México, México.

Re: Imágen vinculada a celda

Mensaje por fornelasa »

La propiedad Anchor no soporta las imágenes entre hojas pero es la única en LibreOffice que nos puede ayudar para este tema, lo correcto sería usar por ejemplo:

Código: Seleccionar todo

hoja.copyRange(hoja.getCellRangeByName("D5").cellAddress, u.rangeAddress)
pero como ya se ha mencionado LO tiene un bug en este tema en el copiado de imágenes.
fornelasa escribió:
Y obvio por el momento no funciona para LibreOffice ya que este tiene un Bug a la hora de copiar objetos entre celdas
Si usas LIbreOffice como dice tu firma, o las ponemos en la misma hoja o las ponemos en la misma hoja, no hay otra manera en LO.

Saludos, Federico.
lo 6.2.0 | aoo 4.1.6 | win 7/10
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!
Pierrot-le-fou
Mensajes: 8
Registrado: Vie Ago 24, 2018 2:04 pm

Re: Imágen vinculada a celda

Mensaje por Pierrot-le-fou »

fornelasa escribió:La propiedad Anchor no soporta las imágenes entre hojas pero es la única en LibreOffice que nos puede ayudar para este tema, lo correcto sería usar por ejemplo:

Código: Seleccionar todo

hoja.copyRange(hoja.getCellRangeByName("D5").cellAddress, u.rangeAddress)
pero como ya se ha mencionado LO tiene un bug en este tema en el copiado de imágenes.
fornelasa escribió:
Y obvio por el momento no funciona para LibreOffice ya que este tiene un Bug a la hora de copiar objetos entre celdas
Si usas LIbreOffice como dice tu firma, o las ponemos en la misma hoja o las ponemos en la misma hoja, no hay otra manera en LO.

Saludos, Federico.
Me queda claro, de hecho lo mencionaste al subir el ejemplo pero por algún motivo se me pasó.

Le daré una vuelta al fichero a ver que se me ocurre. Muchas gracias por el interés y la solución planteada.

Un saludo.
LibreOffice 6.0.6.2 en Ubuntu 18.04
Responder