De modifications d'un fichier

Question

J'ai créer avec le concours d'internautes sur ce site une application qui a pour but à partir d'un fichier excel, de rechercher des numéros de tel manquants sur les pages blanches via internet voir précédent post : https://forum.excel-pratique.com/excel/erreur-d-execution-91-variable-objet-t13034.html La mise en page a encore changé, pourriez vous m'aider à reconfigurer mon programme ? Merci beaucoup nota : je viens de retourner sur les pages blanches. auparavant l'adresse était individualisée, ajourd'hui tout est fusionné, ce que je n'arrive pas à comprendre sur mon post "erreur d'exection 91 variable etc..." c'est de savoir ou sont les indics ? car pour les remplacer encore faudrait il savoir ou ils se trouvent. Cordialement 10/01 10h30 am : je me suis apercu que l'adresse en fait n'était pas la bonne il faut que la bonne page soit : http://www.pagesjaunes.fr/trouverunnom/pagesBlanchesAvancee.do ; néanmoins j'ai toujours le cafouillage suivant : le contenu de la cellule prénom doit aller dans adresse et le contenu de la cellule adresse doit aller dans localité ; comment faire ? merci...

cousinhub · Accepted Answer

Effectivement, dans le code du Bouton5 et du Bouton6, remplace tout d'abord l'adresse : Ensuite, à chaque ligne qui comporte : Indics(x).Value = ........... ajoute un 1 à chaque valeur numérique de "Indics()" par exemple, pour la première ligne : Indics(1).Value = .Cells(Ligne, 1).Value devient : Indics(2).Value = .Cells(Ligne, 1).Value Modifie dans les deux codes (Commandbutton5 et CommandButton6) Bonne soirée...

cousinhub · Answer

Re-,

comme te l'avait expliqué USB512 dans ce fil :

https://forum.excel-pratique.com/post76319.html#p76319

le site a changé sa présentation.

en déroulant le code en mode pas-à-pas, et en mettant un espion sur Indics, on peut retrouver ses index

Bonne soirée

3cellule-identique-additionner-autre-cellule-3.xlsm (25.86 Ko)

3bon-de-fab-v3.xlsm (31.75 Ko)