Merci Yves et Claude Vos deux solutions me conviennent parfaitementJuste une remarque chez moi le paramétre 10 ou 2 ouvre un onglet en plein écran
Cordialement Le 08/06/2020 à 21:04, prog.amateur@free.fr 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 = 1IE.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 à users+unsubscribe@fr.libreoffice.org pour vous désinscrire Les archives de la liste sont disponibles à https://listarchives.libreoffice.org/fr/users/ Privacy Policy: https://www.documentfoundation.org/privacy