Merci Yves et Claude
Vos deux solutions me conviennent parfaitement
Juste une remarque chez moi le paramétre 10 ou 2 ouvre un onglet en
plein écran
Cordialement
Le 08/06/2020 à 21:04, [email protected] a écrit :
Bonsoir,
A adapter avec le bon chemin
/Sub OuvrirPageHtml_FF //
// Dim RetVal As Long //
////
// '10 : Affichage en plein écran //
// RetVal = Shell("C:\Program Files (x86)\Mozilla
Firefox\firefox.exe" _ //
// , 10 , "https://www.gouvernement.fr/info-coronavirus";) //
////
//End Sub//
/
Claude
Le 08/06/2020 à 19:12, linux a écrit :
Dim IE As Object
IE = CreateObject("InternetExplorer.Application.1")
IE.Visible = 1
IE.Navigate( "https://www.gouvernement.fr/info-coronavirus";)
<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=emailclient>
Garanti sans virus. www.avast.com
<https://www.avast.com/sig-email?utm_medium=email&utm_source=link&utm_campaign=sig-email&utm_content=emailclient>
<#DAB4FAD8-2DD7-40BB-A1B8-4E2AA1F9FDF2>
--
Envoyez un mail à [email protected] pour vous désinscrire
Les archives de la liste sont disponibles à
https://listarchives.libreoffice.org/fr/users/
Privacy Policy: https://www.documentfoundation.org/privacy
