読者です 読者をやめる 読者になる 読者になる

ExcelVBAでIEを全部閉じる

ExcelVBA
Dim objShell As Object
Dim objWin As Object
Set objShell = CreateObject("Shell.Application")
For Each objWin In objShell.Windows
If TypeName(objWin) = "IWebBrowser2" Then
 Set objIE = objWin
 objIE.Quit
End If
Next

ネタ元