Modifier des champs sur une page http avec une macro vba

vaughane Messages postés 1 Date d'inscription dimanche 22 février 2009 Statut Membre Dernière intervention 22 février 2009 - 22 févr. 2009 à 15:50
Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 - 23 févr. 2009 à 08:18
Bonjour 
j'ai une macro qui permet d'aller remplir des champs sous page de type http à partir d une feuille excel qui contient les donées mais je n'arrive pas agir par cette même macro sur les cases à cocher de type radio dans le code source.

Dans cette exemple je prends une réference sous excel que j'insere aini que la date cela me permet de faire une recherche sur site intranet et de recuerer des éléments en boucles en me revoyant sur ma feuille excel les elements que je lui fais rechercher.

Je peux affiner ma recherhe en cochant  une case  d'option et c'est la que je seche...

d 'avance merci

    ActiveSheet.Cells(2, 1).Select
    Do Until IsEmpty(ActiveCell)
        If ActiveCell.Offset(0, 7) <> "NON TROUVEE" Then
         navigateur.Navigate "http://******************************************"
            Do While navigateur.Busy: DoEvents: Loop
            Do While navigateur.ReadyState <> 4: DoEvents: Loop
            Set collection = navigateur.Document.all.tags("INPUT")
VOICI L ENDROIT OU JE VEUX INSERER UNE LIGNE
            collection.Item("reference").Value = ActiveCell.Value
            collection.Item("datedebut").Value = Format(ActiveCell.Offset(0, 6).Value, "dd/mm/yyyy")
            collection.Item("datefin").Value = Format(ActiveCell.Offset(0, 6).Value, "dd/mm/yyyy")
            collection.Item("rechercher").Click
            Do While navigateur.Busy: DoEvents: Loop
            Do While navigateur.ReadyState <> 4: DoEvents: Loop

1 réponse

Renfield Messages postés 17287 Date d'inscription mercredi 2 janvier 2002 Statut Modérateur Dernière intervention 27 septembre 2021 71
23 févr. 2009 à 08:18
quel est le code HTML correspondant a ton formulaire ?
0