|
Be the first user to complete this post
|
Add to List |
VBA-Excel: Maximize, Minimize and Restore Internet Explorer (IE) using Microsoft Excel.
To Maximize, Minimize and Restore Internet Explorer (IE) using Microsoft Excel, follow the steps mentioned below
Steps:Create the object of Internet Explorer
- Make the Internet Explorer visible
- Navigate to the specified URL
- Wait till the browser is busy and page is fully loaded
- Create WshShell (Windows Script Host) object
- Use send keys function to maximize, minimize and restore operations
Create the object of Internet Explorer
Set objIEBrowser = CreateObject("InternetExplorer.Application")
Make the Internet Explorer visible
objIEBrowser.Visible = True
Navigate to the specified URL
objIEBrowser.Navigate2 "www.google.com"
Wait till the browser is busy and page is fully loaded
Do While objIEBrowser.Busy
Loop
Create WshShell (Windows Script Host) object
Set oShell = CreateObject("WScript.Shell")
Use send keys function to maximize, minimize and restore operations
oShell.SendKeys "% x" ‘ MAXIMIZE
oShell.SendKeys "% n" ‘ MINIMIZE
oShell.SendKeys "% r" ‘RESTORE
Complete Code:
Function FnMaxMinRestoreIE()
Dim objIEBrowser
Set objIEBrowser = CreateObject("InternetExplorer.Application")
objIEBrowser.Visible = True
objIEBrowser.Navigate2 "www.google.com"
Do While objIEBrowser.Busy
Loop
Set oShell = CreateObject("WScript.Shell")
oShell.SendKeys "% x" ‘ Maximize
oShell.SendKeys "% n" ‘Minimize
oShell.SendKeys "% r" ‘ Restore
End Function
Also Read:
- VBA-Excel: Open word document using GetObject()
- Excel-VBA : Open a MS Word Document using Excel File using Explorer Window.
- Send Mail With Multiple Different Attachments From MS Outlook using Excel.
- Excel-VBA : Send Mail with Embedded Image in message body From MS Outlook using Excel.
- VBA-Excel: Create and Save the Word document