Thread: Launching a web browser from excel

Hello GordonPSmith,

This will automatically maximize the window after Internet Explorer is tarted.

' This line must appear above before any Sub or Function statements in the VBA module.
Private Declare Function ShowWindow Lib "User32.dll" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long


Sub Button_PS_Login()

    Dim Site As Object

        Set Site = CreateObject("InternetExplorer.application")
        Site.Visible = True
        Site.Navigate "http://www.cnn.com"
        
        ShowWindow Site.hWnd, 3

End Sub

I don't know what 'tarting' is (only a wild guess) but:

Sub snb()
 With CreateObject("InternetExplorer.application")
  .Visible = True
  .FullScreen = True
  .Navigate "http://www.cnn.com"
 End With
End Sub