interaction excel-IE

[laurent]

J'ai une fenetre IE ouverte.
Je sélectione tout CTRL-A, puis CTRL-C et je les CTRL-V dans une feuille Excel.
Résultat je ne garde que les textes de la page WEB; c'est ce que je cherche.


Maintenant , existe t-il un moyen de faire cette manip automatiquement ?

Merci de vos réponses

Laurent

 

[@+Thierry]

Salut Laurent, le Forum

Une méthode vite faite avec des SendKeys...

Sub CopieColle()
AppActivate "Forum Excel Downloads"

SendKeys "^a", True
SendKeys "^c", True

AppActivate "Microsoft Excel"
Range("A1").Activate
Application.SendKeys "^v"

End Sub

Pour que ceci fonction il faut dans cet exemple que tu aies une fenêtre IE ouverte sur une page du Forum retournant en barre de titre de l'Explorer "Forum Excel Downloads"

Bon Aprem
@+Thierry

 

[@+Thierry]

PS, si tu ne veux pas de format HTML et de Link...

Sub CopieColleSansFormat()
AppActivate "Forum Excel Downloads"

SendKeys "^a", True
SendKeys "^c", True

AppActivate "Microsoft Excel"
Range("A1").Activate
ActiveSheet.PasteSpecial Format:="Texte", Link:=False
End Sub

@+Thierry