Bonjour,

Je suis en train de rédiger une macro qui me permettrait de récupérer une variable depuis une page internet. Comme je travaille avec du html je ne peux faire apparaître cette variable que dans le lien url donc avec ma macro j'aimerais détecter la fenêtre internet explorer active et en récupérer l'url pour ensuite extraire la variable. En cherchant sur ce forum j'ai vu comment récupérer du texte, transformer un "string" en un nombre en revanche je n'ai pas réussi à copier l'url d'une page. Quelqu'un aurait une idée ? Merci d'avance.

Mon bout de code pour le moment :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Sub auto_open ()
 
Dim lien, var As String
Dim v As Integer
 
'Recupération de l'url
 
var = Right(lien, 3)
v = Val(var)
 
End Sub