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??
abrir hiperenlace
abrir hiperenlace
OpenOffice 3.1 en Windows Vista
Re: abrir hiperenlace
Encontré aquí (en inglés) cómo abrir un hipervínculo en Microsoft Edge
No pude encontrar cómo elegir otros navegadores.
Código: Seleccionar todo
=HIPERVINCULO("microsoft-edge:http://www.cnn.com")
Re: abrir hiperenlace
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
En B2 colocamos una formula similar a esta
Asignamos esta macro al evento "Clic Derecho"
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.
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
Código: Seleccionar todo
="C:\Program Files\Internet Explorer\iexplore.exe "&A2
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
Ojala puedas adaptarlo a tus necesidades.
Saludos, Federico.
- Adjuntos
-
- Explorador.ods
- Abrir URL con diferente explorador
- (9.9 KiB) Descargado 152 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!
¡Un aplauso para todos los que luchan por proteger y promover la Web abierta!