|
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: Login To Already Opened GMAIL In An Internet Explorer (IE)
- VBA-Excel - Merger - Merge or Combine Many Word Documents Into One
- VBA-Excel: Create worksheets with Names in Specific Format/Pattern.
- VBA-Excel: Open an Existing Word Document
- Excel-VBA : Prevent Changing the WorkSheet Name