M
monsieurPatate
Guest
Bonjour à tous,
J'ai un fichier Excel composé d'une trentaine de feuilles.
Je tente de monter une table des matières destiné à la fois à l'impression et à la fois de menu avec liens vers chacune des sections du fichier.
Chaque feuille peut contenir plus d'une section.
J'utilise la routine suivante:
Sub ListAllNames()
Row = 1
For Each n In ActiveWorkbook.Names
Cells(Row, 1) = n.Name
Cells(Row, 2) = n.Value
Cells(Row, 3) = " " & n.RefersTo
Row = Row + 1
Next n
End Sub
Je croyais que 'n.Value' m'afficherai le contenu mais le résultat est 0.
Je me demande donc comment alors afficher le contenu de la cellule et en faire un hyperlien?
Merci
Mr P.
J'ai un fichier Excel composé d'une trentaine de feuilles.
Je tente de monter une table des matières destiné à la fois à l'impression et à la fois de menu avec liens vers chacune des sections du fichier.
Chaque feuille peut contenir plus d'une section.
J'utilise la routine suivante:
Sub ListAllNames()
Row = 1
For Each n In ActiveWorkbook.Names
Cells(Row, 1) = n.Name
Cells(Row, 2) = n.Value
Cells(Row, 3) = " " & n.RefersTo
Row = Row + 1
Next n
End Sub
Je croyais que 'n.Value' m'afficherai le contenu mais le résultat est 0.
Je me demande donc comment alors afficher le contenu de la cellule et en faire un hyperlien?
Merci
Mr P.