Bonjour
J'aimerai recuper le presse papier (.parentwindow.clipboardData.setData("Text", matable.outerhtml) dans un tablo avant de le transposer dans la feuille mais je sais pas faire ?
Code vba : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub tesreq() Dim url url = "http://www.geny.com/partants-pmu/2017-08-25-cabourg-pmu-prix-de-cherbourg_c922077" With CreateObject("microsoft.xmlhttp"): .Open "post", url, False: .send: code = .responsetext: End With With CreateObject("htmlfile") .body.innerhtml = code Set matable = .getelementbyid("tableau_partants") memo = .parentwindow.clipboardData.setData("Text", matable.outerhtml) With ActiveSheet: .Cells(1, 1).Select: .Paste: End With End With End Sub
Partager