Macro pour liens hypertextes pdf

Résolu/Fermé

lolo78350 Messages postés 2 Date d'inscription mercredi 10 décembre 2014 Statut Membre Dernière intervention 12 décembre 2014 - Modifié par pijaku le 11/12/2014 à 08:18
lolo78350 Messages postés 2 Date d'inscription mercredi 10 décembre 2014 Statut Membre Dernière intervention 12 décembre 2014 - 12 déc. 2014 à 13:42

Bonjour,
je débute sur les macros & j'aurai besoin d'aide : j'ai fait une macro pour relier des numéros sur une une colonne de mon fichier excel avec des pdf regroupéssur un autre dossier nommés par ces mêmes numéros.
Ma macro fonctionne lorsque je les sélectionne un par un mais si je sélectionne toute la colonne, la macro attribue le même pdf pour toutes les cellules à savoir le premier.

Ci-dessous ma macro :

    ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
    "\\sqynetapp04\data1\EIN\ASA\03 - GESTION\FACTURIERS\SCAN FACTURES\2014\" & ActiveCell.Value & ".pdf", TextToDisplay:=ActiveCell.Value
    ActiveSheet.Hyperlinks(ActiveSheet.Hyperlinks.Count).CreateNewDocument _
    Filename:="\\sqynetapp04\data1\EIN\ASA\03 - GESTION\FACTURIERS\SCAN FACTURES\2014\" & ActiveCell.Value & ".pdf", EditNow:=True, _
    Overwrite:=False

Merci pour votre aide

A voir également:

Macro pour liens hypertextes pdf
Lire le coran en français pdf - Télécharger - Histoire & Religion
Save as pdf - Télécharger - Bureautique
Comment faire un pdf - Guide
Macro word - Guide
Comment modifier un pdf - Guide

2 réponses

Réponse 1 / 2

pijaku Messages postés 12263 Date d'inscription jeudi 15 mai 2008 Statut Modérateur Dernière intervention 4 janvier 2024 2 744
11 déc. 2014 à 08:25

Bonjour,

Il te faut donc boucler sur toutes les cellules de ta colonne, du style :

Dim DLig As Long, Plage As Range, Cel As Range
'A ADAPTER : la colonne concernée. Ici j'ai mis C
DLig = Range("C" & Rows.Count).End(xlUp).Row
Set Plage = Range("C2:C" & DLig)

For Each Cel In Plage
    'ici tu ajoutes tes liens
Next Cel

Réponse 2 / 2

lolo78350 Messages postés 2 Date d'inscription mercredi 10 décembre 2014 Statut Membre Dernière intervention 12 décembre 2014
12 déc. 2014 à 13:42

Super merci pour votre aide & votre réponse rapide

Discussions similaires

Rajout de lien sur plusieurs pages

Discussions similaires

Newsletters