Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Laurent Longre
Bonjour,
je voudrais retrouver toutes les requetes sur le web d'un classeur excel comment faire?
Si je ne me trompe pas sur le sens de la question, essaie cette procédure VBA :
Sub RequetesWeb()
Dim Sht As Worksheet, QT As QueryTable
For Each Sht In Worksheets For Each QT In Sht.QueryTables If QT.QueryType = xlWebQuery Then MsgBox "Connexion : " & QT.Connection & vbLf & _ "Plage : " & QT.Destination.Address(External:=True) End If Next QT Next Sht
End Sub
Cordialement,
Laurent
Bonjour,
je voudrais retrouver toutes les requetes sur le web d'un classeur excel
comment faire?
Si je ne me trompe pas sur le sens de la question, essaie cette procédure VBA :
Sub RequetesWeb()
Dim Sht As Worksheet, QT As QueryTable
For Each Sht In Worksheets
For Each QT In Sht.QueryTables
If QT.QueryType = xlWebQuery Then
MsgBox "Connexion : " & QT.Connection & vbLf & _
"Plage : " & QT.Destination.Address(External:=True)
End If
Next QT
Next Sht
je voudrais retrouver toutes les requetes sur le web d'un classeur excel comment faire?
Si je ne me trompe pas sur le sens de la question, essaie cette procédure VBA :
Sub RequetesWeb()
Dim Sht As Worksheet, QT As QueryTable
For Each Sht In Worksheets For Each QT In Sht.QueryTables If QT.QueryType = xlWebQuery Then MsgBox "Connexion : " & QT.Connection & vbLf & _ "Plage : " & QT.Destination.Address(External:=True) End If Next QT Next Sht
