salut
voila le code qui plante ,en fait il m'affiche que la moitie de la page html sur 1 feuille excel et il bloque
Sub Htm(Chemin As String, WS As String, plage As String)
ThisWorkbook.PublishObjects.Add(xlSourceRange, Chemin, WS, plage, xlHtmlStatic, "", "").Publish (True)
End Sub
Sub telecartes()
Set fich = Workbooks.Open("http://perso.wanadoo.fr/mickael.lecointre/1987-88.html")
MsgBox fich.Sheets(1).Cells.Find("CAC 40", , , xlWhole).Offset(0, 1)
fich.Close (False) '(referme la page Web)
End Sub
merci d'avance si quelqu un peut m 'aider
@+
blacsap
\|||/
(\ /)
------------------------------oOO-(_)-OOo------------------