Apache OpenOffice: Foro oficial de la comunidad

Publicado: **Vie Oct 05, 2018 10:25 am**

Alguien sabe si es posible cuando pulso un hiperenlace que se abra con un navegador determinado??

Por ejemplo... En una hoja quiero poner varios enlaces pero unos se tienen que abrir con Explorer y otros con Mozilla... Como puedo hacerlo para que cada uno se abra con el navegador que yo elija??

Publicado: **Vie Oct 05, 2018 3:05 pm**

Encontré aquí (en inglés) cómo abrir un hipervínculo en Microsoft Edge

Código: Seleccionar todo

=HIPERVINCULO("microsoft-edge:http://www.cnn.com")

No pude encontrar cómo elegir otros navegadores.

Publicado: **Lun Oct 08, 2018 10:55 pm**

Otra posible opción:
Supón que en A1 tienes la dirección http://www.hotmail.com y deseas que esta url sea abierta con Vivaldi
Supón que en A2 tienes la dirección http://www.hotmail.com y deseas que esta url sea abierta con Internet Explorer
Lo primero que debemos hacer es averiguar donde está el ejecutable de tus exploradores, en mi caso serían por ejemplo:
Para Vivaldi C:\Users\Federico\AppData\Local\Vivaldi\Application\vivaldi.exe
Para Internet Explorer C:\Program Files\Internet Explorer\iexplore.exe

En B1 colocamos una formula similar a esta

Código: Seleccionar todo

="C:\Users\Federico\AppData\Local\Vivaldi\Application\vivaldi.exe "&A1

En B2 colocamos una formula similar a esta

Código: Seleccionar todo

="C:\Program Files\Internet Explorer\iexplore.exe "&A2

Asignamos esta macro al evento "Clic Derecho"

Código: Seleccionar todo

Sub Explorador(Dato)
		On Error Resume Next
   oDoc = ThisComponent
   hoja = oDoc.CurrentController.ActiveSheet
  celda = hoja.getCellRangeByName(Dato.AbsoluteName)
   oURL = Dato.string
 Pagina = Shell(oUrl)
End Sub

Mira el ejemplo adjunto (Dando clic derecho en B1 o B2), solo cambia la ruta por tu ruta correcta.
Ojala puedas adaptarlo a tus necesidades.
Saludos, Federico.

Apache OpenOffice: Foro oficial de la comunidad

abrir hiperenlace

abrir hiperenlace

Re: abrir hiperenlace

Re: abrir hiperenlace