Macro cliquant sur toutes les cellules d'une plage

Bonjour à tous !

Je cherche à créer une macro dont la fonctionnalité serait la suivante :

Réaliser un clic gauche sur toutes les cellules d'une plage.

Etant relativement novice je ne sais pas comment procéder et toute aide serait la bienvenue !

Le but : je cherche à télécharger tous les PDF d'un site dont les liens sont sous la forme

www.blabal.fr/telecharger/PDF/XX1
www.blabal.fr/telecharger/PDF/XX2
...
www.blabal.fr/telecharger/PDF/999

J'ai généré sur une colonne tous les liens mais j'aimerais éviter d'avoir à cliquer sur tous les liens manuellement (environ 3000 pages...)

Merci à tous pour votre aide !

Cordialement,

Vincent

Bonsoir,

pour résoudre tes liens :

    For Each lhp In ActiveSheet.Hyperlinks
        lhp.Follow
    Next lhp

Ceci pour syntaxe, mais tu ne vas pas résoudre tes 3000 liens d'un coup, tu seras planté bien avant.

A toi de voir comment tu échelonnes ça, quite à changer de type de boucle pour faire des chargements par lots....

Cordialement.

Bonjour,

Merci pour la réponse rapide !

Pourquoi cela planterait ? En réalité, j'ai créé une dizaine d'onglets différents avec entre deux et trois cents liens hypertextes (si cela change quelque chose .?)

En revanche quand je copie colle ta macro dans mon éditeur cette partie là

lhp.Follow

Next lhp

est en rouge et je ne peux l'exécuter (erreur de syntaxe)

Sub Macro2()
   For Each lhp In ActiveSheet.Hyperlinks
    lhp.Follow
    Next hpl
End Sub

Faute de frappe : hpl n'est pas lhp !

Et tu peux aussi déclarer la variable en début de macro : Dim lhp As Hyperlink

As-tu déjà essayé d'ouvrir 300 sites sur ton navigateur ?

Non cela va être une grande première haha !

J'ai encore une erreur de syntaxe au niveau de la 5eme ligne (Next lhp)

Tu sais d'où ça provient ?

Sub Macro2()
Dim lhp As Hyperlink
   For Each lhp In ActiveSheet.Hyperlinks
    lhp.Follow
    Next lhp
End Sub

Je n'en vois pas. Quel message ?

Tu la lances d'où ?

Depuis Excel pour mac - affichage - afficher les macros - modifier

Ça ne me dit pas si tu es sur la feuille quii contient les liens.

Je suis sur une feuille qui contient des liens hypertextes oui (toutes les onglets du classeur en contiennent)

Je ne vois aucune erreur de syntaxe dans la macro.

Elle fonctionne d'ailleurs sans problème chez moi, et à défaut de lien trouvé dans la feuille elle ne fait rien et ne déclenche pas d'erreur.

Cela ne provient donc pas de la macro.

Ok, j'ai lancé la macro depuis excel sur PC et la macro fonctionne.

Pb : Pour générer mes liens hypertextes j'ai fait dans la colonne A :

http://www.blabla.fr/telecharger/XX1 -> Au format texte

etc..

Et dans la colonne B j'ai écrit =lien_hypertexte(A1)

Du coup, la macro fonctionne avec un lien formalisé, mais pas avec cette formule là

As tu une idée ?

Edit: je pensais a un simple Activate.cell mais je ne saurais pas formaliser la macro

Normalement, quand tu tapes le texte que tu indiques, Excel le transforme automatiquement en lien hypertexte.

Excel transforme en lien ht les adresses simples type www.blabla.com mais pas les adresses compliquées avec des /

je tape ton adresse blabla citée et j'ai bien un lien hypertexte !

Oui bien sur, mais essaie avec ça

http://www.bodacc.fr/annonce/telecharger/EBODACC-A_20080004_0001_p000.pdf

marche plus !

Là c'est que ton lien est incomplet, il ne marchera jamais.

J'ai édité mon message précédent, il s'est shorté tout seul

Parce que ton texte commence par un saut de ligne et se termine par 2 sauts de ligne.

Tu enlèves ces caractères et ça fonctionne, il est donné cours au lien et on me demande si je veux ouvrir ou enrregistrer...

Même chose, ce lien ne sera pas reconnu comme lien valide avec ces caractères.