Private Sub Form_Load()
Dim d As HTMLDocument, dd As IHTMLDocument2, c As IHTMLTableCell
Set d = New HTMLDocument
Set dd = d.createDocumentFromUrl("file.htm", "null")
End Sub
Сейчас этот форум просматривают: Google-бот, SemrushBot, YaCy [Bot] и гости: 7