M
michaelrlanier
I use the following code to open a Google Search window and place text ready for a search, but the window is minimized. I would like for it to open maximized. Can you offer a suggestion? Thanks.
If Range("F338").Value = Range("X340").Value Then
Dim Info As String
Dim FullURL As String
Info = Range("H337").Value & " smtp settings"
FullURL = "https://google.com/webhp?q=" & Info
ActiveWorkbook.FollowHyperlink Address:=FullURL
NewWindow = True
End If
If Range("F338").Value = Range("X340").Value Then
Dim Info As String
Dim FullURL As String
Info = Range("H337").Value & " smtp settings"
FullURL = "https://google.com/webhp?q=" & Info
ActiveWorkbook.FollowHyperlink Address:=FullURL
NewWindow = True
End If