Récupérer les données d'une page IE déjà ouverte

Bonjour et merci d'avance !

Je souhaite récupérer les données d'une page web déjà ouverte et d'une ligne en particulier que j'active par une case à cocher, ce qui serait le must ! (Pour info : Si je fais contrôle C après avoir cocher cette case je copie les bonnes informations)

Attention l'URL de ce site ne change pas quelque soit la page que j'ouvre. Donc c'est ce qui est à l'écran qui m'intéresse !

J'ai déjà essayé certaines macro mais elles m'ouvrent la page de connexion...

merci grandement !

1ère étape réussie !!

je fais un focus sur IE déjà ouvert avec

AppActivate "titre de mon IE"

Maintenant comment je copie une sélection ? manuellement Ctrl + C fonctionne très bien mais pas :

SendKeys "^(c)", True

Petite idée ?

merci

Bonjour,

tu peux faire

    SendKeys "^a"
    Application.Wait (Now + TimeValue("00:00:01"))
    SendKeys "^c"
    Application.Wait (Now + TimeValue("00:00:01"))
    ActiveSheet.Paste

puis épurer le résultat en supprimant les images

Sub epurer()

    Dim Img As Object
    For Each Img In ActiveSheet.Pictures
        Img.Delete
    Next

    With Cells.Font
        .Name = "Calibri"
        .Size = 11
    End With

End Sub

Merci Steelson pour ton partage

alors c'est très approchant de ce que j'ai trouvé

Declare PtrSafe Sub Sleep Lib "kernel32" (ByVal dwMilliseconds As Long)

Sub Activer_IE()
 Application.CutCopyMode = False
Range("N1").Select
AppActivate "Titre" 'titre de la page IE
Sleep 500
SendKeys "^(c)", True
Sleep 500
AppActivate "RC_Data"
    Sleep 2000
    ActiveSheet.PasteSpecial

Merci pour plus des images mais j'en ai pas !

Merci à toi

Rechercher des sujets similaires à "recuperer donnees page deja ouverte"