fermer une page web avec macro

[TYPX]

bonjour

peux t'on fermer une page web précise à l'aide d'une macro

merci par avance

typx

 

[MichelXld]

bonjour

cet exemple permet de boucler sur toutes les pages IE ouvertes et d'afficher leur URL

ensuite pour fermer la page , utilises IE.Quit

Sub listerFenetres_IE_Ouvertes()
'activer la référence 'Microsoft Internet Controls'
Dim IE As internetExplorer
Dim winShell As New shellWindows
On Error Resume Next
For Each IE In winShell
If IE.LocationURL <> '' Then MsgBox IE.LocationURL
'IE.Quit 'option pour fermer les fenetres
Next IE
End Sub

bonne journée
MichelXld

Message édité par: michelxld, à: 29/08/2005 11:40

 

[typx]

merci beaucoup de cette réponse ,j'ai du m... car la macro plante et bute sur IE As Internet Explorer en me disant type...non défini

Encore merci

typx

 

[typx]

ça y est ça fonctionne

mille merci

cordialement

TYPX