Problème avec thisworkbook

Bonjour je rencontre un problème avec cette ligne

Code:

---

DerLignEchecs = ThisWorkbook.Sheets("Echecs").Range("A" & Rows.Count).End(xlUp).Row

---

elle me renvoie une erreur. Pour mieux comprendre. Je jongle entre deux documents excel. Avec les versions précédentes la commande me permettait de pointer vers le document avec le code. Mais depuis la mise à jour j'ai une erreur dans le code alors que quand je lance la commande manuellement elle fonctionne. J'ai l'impression qu'il y a un problème avec la désignation des documents. Quand je mets

Code:

---

DerLignEchecs = Range("A" & Rows.Count).End(xlUp).Row

---

seulement alors j'ai un résultat mais de la feuille que j'ai ouverte dans le code.

Merci d'avance pour votre aide,

Xavier

Citation:

---

Envoyé par xavion

elle me renvoie une erreur.

---

Quel est le message d'erreur ?

Citation:

---

depuis la mise à jour j'ai une erreur

---

Quelles ont été les modifications ?

Est-ce que la feuille "Echecs" se trouve dans le même classeur que la macro qui contient cette ligne de code ?

Bonjour a tous!
Avez vous essayé de remplacer

Code:

---

DerLignEchecs = ThisWorkbook.Sheets("Echecs").Range("A" & Rows.Count).End(xlUp).Row

---

par: ("classeur1" étant à remplacer par le nom du classeur sur lequel se trouve la feuille Echecs)

Code:

---

DerlignEchecs = Workbooks("classeur1").Sheets("Echecs").Range("A" & Rows.Count).End(xlUp).Row

---

Cordialement 8-)

Bonjour,

Outre la remarque de Menhir :salut:.

Comment est déclarée la variable

Code:

---

DerLignEchecs

---

?

Citation:

---

seulement alors j'ai un résultat mais de la feuille que j'ai ouverte dans le code.

---

Tu en déduiras l'importance d'un bon rattachement des objets Worksheet et Range.

(Je le répète presque tous les jours)

Bonsoir et merci pour votre message,

Citation:

---

Envoyé par Menhir

---

J'ai mis cette macro dans le "this workbook" et pas dans un module. ça marchait jusqu'à présent et oui elle est dans le même classeur que la macro. J'ouvre un autre fichier par le biais de la macro et je compare les deux pour traiter des données.

Citation:

---

Envoyé par Transitoire

---

Bonsoir et merci pour votre réponse. Votre proposition me retourne une erreur 9.

Citation:

---

Envoyé par MarcelG

---

Hello et merci,

As integer pour la variable. Oui je remarque bien qu'il y a un problème. C'est quand même fou que tout marche sous office 2011 et que ça plante pour 2016 et plus.

Citation:

---

Envoyé par xavion

Quel est le message d'erreur ?
Erreur 400

---

Quel est le MESSAGE d'erreur ?

Bonjour,
j'ai juste une fenêtre qui s'ouvre avec "Microsoft visual basic erreur 400".

Citation:

---

Envoyé par Menhir

Quel est le MESSAGE d'erreur ?

---

Si une macro fonctionnait et que, sans que RIEN ne soit modifié, elle se mets à ne plus fonctionner, la seule solution est d'appeler un marabout pour faire désenvouter le PC. :mrgreen:

Plus sérieusement, il n'est pas possible de savoir pourquoi cette ligne ne fonctionne pas avec un code aussi simple.
Le problème peut venir d'une modification dont tu ne parles pas (sans doute parce qu'elle te semble insignifiante).
Jette aussi un coup d'oeil dans les bibliothèques chargées (Outils > Références) pour voir s'il n'y en a pas une marquée "MANQUANTE", ce qui aurait pu être provoqué par la migration que tu évoques.
Ca peut venir aussi d'une ligne précédente dans le code ou de la nature de l'évènement qui déclenche la macro ou de nombreux autres éléments.

Sans plus d'info, impossible de savoir.

Bonsoir Menhir,

elle marchait sous office 2011 pour mac. J'ai rien changé. Avec Catalina j'ai été obligé de changer d'office et patratra.
Merci pour l'aide. J'ai regardé les références et rien de manquant malheureusement.

Citation:

---

Envoyé par Menhir

Si une macro fonctionnait et que, sans que RIEN ne soit modifié, elle se mets à ne plus fonctionner, la seule solution est d'appeler un marabout pour faire désenvouter le PC. :mrgreen:

Plus sérieusement, il n'est pas possible de savoir pourquoi cette ligne ne fonctionne pas avec un code aussi simple.
Le problème peut venir d'une modification dont tu ne parles pas (sans doute parce qu'elle te semble insignifiante).
Jette aussi un coup d'oeil dans les bibliothèques chargées (Outils > Références) pour voir s'il n'y en a pas une marquée "MANQUANTE", ce qui aurait pu être provoqué par la migration que tu évoques.
Ca peut venir aussi d'une ligne précédente dans le code ou de la nature de l'évènement qui déclenche la macro ou de nombreux autres éléments.

Sans plus d'info, impossible de savoir.

---

Bonjour à tous,

une grosse différence entre 2011 et 2016 c'est la gestion des fenêtres passée de MDI en SDI.
Entre autres bugs, en SDI il lui arrive de perdre les pédales lorsqu'on joue à faire des .Activate ou des .Visible= sur les feuilles.
Est-ce le cas ?
On croit qu'une feuille est active mais lui reste à cheval entre les deux. il l'affiche mais se sert de l'ancienne, avec donc des effets bizarres.
Si ça lui arrive sur les feuilles, pourquoi pas sur les classeurs aussi...

Dans certains cas, après un .Activate, un :

Code:

---

1 2 3

Set win = Application.ActiveWindow win.Visible = False win.Visible = True

---

rétabli la situation.
eric

Bonsoir, d'où la nécessité d'éviter pour des raisons de rapidité d'utiliser les principes par défaut qui fonctionne sous une version et plus forcément sous la nouvelle.
exemple: il vaut mieux me semble-t-il

Code:

---

Workbooks("Classeur1").Worksheets("Feuil1").Range("A1").Value = 4

---

Que d'écrire en se disant que le classeur actif est classeur1 et value est le fonctionnement par défaut.

Code:

---

Worksheets("Feuil1").Range("A1") = 4

---

Enfin, moi ce que j'en dit. :aie:

Cordialement 8-)

Hello all,

bon j'ai tout renommé avec les chemins entiers et sans utiliser thisworkbook et ça marche!
Je trouve ça quand même fou que Microsoft ne communique pas sur les différences aussi importantes entre deux versions de VBA.
J'ai pas trop compris les histoires de changement SDI en MDI mais ça doit dépasser mon niveau de compétences.

Merci à tous,
Xav