OVH Cloud OVH Cloud

macro marche sur xl03 et pas sur 97

3 réponses
Avatar
gilles
bonjour =E0 tous
une macro con=E7ue sur xl 03 qui supprime des onglets , en=20
ajoute, ins=E8re une feuille recap ,avec des liens=20
hypertexte, =E0 partir de codes trouv=E9s sur ce site=20
Elle fonctionne bien sur xl03 mais sur xl 97 erreur 424=20
portant surla 1=E8re ligne ci-dessous (extrait de la macro)
nSht.Name =3D "Sommaire"
[A1] =3D "Liste des onglets du classeur"
y-a t-y un dieu du vb qui saurait me dire si certaines=20
lignes de codes sont assez vicieuses pour ne marcher que=20
sur certaines versions d'xl?
merci et =E0 +

3 réponses

Avatar
Pierre CFI [mvp]
Bonjour
il y a quelques fonctions de 2003 qu'on ne retrouve pas dans 97, mais regarde les réfs dans outils, pour voir s'il y en a pas
marquées manquantes

--
Pierre CFI
MVP Microsoft Access
Mail : http://cerbermail.com/?z0SN8cN53B

Site perso
http://access.cfi.free.fr
"gilles" a écrit dans le message de news:2180601c45ac3$dc05d9b0$
bonjour à tous
une macro conçue sur xl 03 qui supprime des onglets , en
ajoute, insère une feuille recap ,avec des liens
hypertexte, à partir de codes trouvés sur ce site
Elle fonctionne bien sur xl03 mais sur xl 97 erreur 424
portant surla 1ère ligne ci-dessous (extrait de la macro)
nSht.Name = "Sommaire"
[A1] = "Liste des onglets du classeur"
y-a t-y un dieu du vb qui saurait me dire si certaines
lignes de codes sont assez vicieuses pour ne marcher que
sur certaines versions d'xl?
merci et à +
Avatar
michdenis
Bonjour Gilles,

Une erreur de type 424 signifie que l'objet est manquant et dans ton code l'objet est la feuille de calcul : nSht

Essaie ceci pour voir si nSt représente réellement un objet "Worksheet"
Juste avant la ligne à problème insère ceci, Est-ce que la boîte
de message te renvoie "Worksheet" ?

As-tu vérifié si tu avais une autre feuille dans ton classeur portant déjà ce nom "Sommaire" ?

MsgBox TypeName( nSht)

nSht.Name = "Sommaire"


Salutations!


"gilles" a écrit dans le message de
news:2180601c45ac3$dc05d9b0$
bonjour à tous
une macro conçue sur xl 03 qui supprime des onglets , en
ajoute, insère une feuille recap ,avec des liens
hypertexte, à partir de codes trouvés sur ce site
Elle fonctionne bien sur xl03 mais sur xl 97 erreur 424
portant surla 1ère ligne ci-dessous (extrait de la macro)
nSht.Name = "Sommaire"
[A1] = "Liste des onglets du classeur"
y-a t-y un dieu du vb qui saurait me dire si certaines
lignes de codes sont assez vicieuses pour ne marcher que
sur certaines versions d'xl?
merci et à +
Avatar
gilles
merci à michel et pierre
je me jette la dessus

-----Message d'origine-----
Bonjour Gilles,

Une erreur de type 424 signifie que l'objet est manquant
et dans ton code l'objet est la feuille de calcul : nSht


Essaie ceci pour voir si nSt représente réellement un
objet "Worksheet"

Juste avant la ligne à problème insère ceci, Est-ce que
la boîte

de message te renvoie "Worksheet" ?

As-tu vérifié si tu avais une autre feuille dans ton
classeur portant déjà ce nom "Sommaire" ?


MsgBox TypeName( nSht)

nSht.Name = "Sommaire"


Salutations!


"gilles" a écrit
dans le message de

news:2180601c45ac3$dc05d9b0$
bonjour à tous
une macro conçue sur xl 03 qui supprime des onglets , en
ajoute, insère une feuille recap ,avec des liens
hypertexte, à partir de codes trouvés sur ce site
Elle fonctionne bien sur xl03 mais sur xl 97 erreur 424
portant surla 1ère ligne ci-dessous (extrait de la macro)
nSht.Name = "Sommaire"
[A1] = "Liste des onglets du classeur"
y-a t-y un dieu du vb qui saurait me dire si certaines
lignes de codes sont assez vicieuses pour ne marcher que
sur certaines versions d'xl?
merci et à +


.