Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

liste feuilles avec liens hypertexte

1 réponse
Avatar
gilles
bonjour =E0 tous et =E0 Chris et Papou en particulier
suite du test
j'ai rajout=E9 la ligne
Sheets("Sommaire").Cells(i, 1).Value =3D Sheets(i).Name
apr=E8s
for i=3D2 To sheets.count
le code de CHris fonctionne, et il recopie bien les noms=20
de feuilles m=EAme suivis de (1) ex:toto(1) qui ne marchait=20
pas (c'=E9tait mon pb de d=E9but)
Toutefois, =E7a ne marche pas sur xl97
il copie bien mais pas en lien hypertexte
Vous allez commencer =E0 me trouver pesant, non?=20
Ou peut-on voir les =E9volutions de vba entre version=20
d'application?
=E0+

1 réponse

Avatar
isabelle
bonjour gilles,

je crois que sur ex97 il n'y a pas de méthode TextToDisplay.

il faudrait faire un test avec l'enregistreur macro pour voir la
différence avec xl2000.

isabelle


bonjour à tous et à Chris et Papou en particulier
suite du test
j'ai rajouté la ligne
Sheets("Sommaire").Cells(i, 1).Value = Sheets(i).Name
après
for i=2 To sheets.count
le code de CHris fonctionne, et il recopie bien les noms
de feuilles même suivis de (1) ex:toto(1) qui ne marchait
pas (c'était mon pb de début)
Toutefois, ça ne marche pas sur xl97
il copie bien mais pas en lien hypertexte
Vous allez commencer à me trouver pesant, non?
Ou peut-on voir les évolutions de vba entre version
d'application?
à+