Discussion :

[wkrystof1]

Bonjour à tous,

J'ai une macro qui fonctionnait très bien, vendredi soir changement de PC, mais toujours les mêmes login (j'ai vérifié).
Ce matin, je lance ma cro et d'un seul coup le débogeur qui apparait et me notifie un soucis sur la dernière ligne de la macro, workbooks ().close
Je ne comprends pas trop car elle fonctionnait bien mais avant.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Dim wb As Workbook
Dim ws As Worksheet
Set wb = Workbooks.Open("C:\Users\xxxxxxxxxxxxxx\Desktop\Consultation_clt.xls")
Set ws = wb.Worksheets(1)
    Range("A2").Select
....
....
....
 
Workbooks("Consultation_clt").Close SaveChanges:=False

Merci d'avance pour votre aide

[unparia]

Bonjour

et me notifie un soucis sur la dernière ligne

et nous ne connaîtrons ce message d'erreur ou d'alerte qu'en ayant besoin de te le demander ? Juste pour faire un message de plus dans cette discussion ?

[wkrystof1]

Oups dsl,

Erreur d'éxecution '9':
L'indice n'appartient pas à la sélection

Merci d'avance

[Marc-L]

Bonjour, bonjour !

Merci d'avance pour votre aide

Aucune aide possible sans respecter au moins les règles de ce forum !     A savoir la règle III-C et la règle III-E …

N'étant pas sur un forum de divination, nous ne perdons pas de temps en conjectures diverses
alors qu'il est pourtant si simple pour le demandeur de poster clairement le code et le message d'erreur
ainsi qu'indiquer le numéro de la ligne fautive dans le code balisé comme il se doit !

Auquel cas on aurait pu répondre :
« Avec un peu de jugeote il suffit pourtant de comparer la ligne n°x avec la ligne de code n°y ! »

Et toujours en chauffant une paire de neurones, le dernier classeur ouvert est le classeur actif par défaut !

Avec une autre paire de neurones - cela sent le bête Copier / Coller - à quoi cela sert-il donc de
définir une variable objet sur le classeur à son ouverture pour ne pas l'utiliser ensuite ?‼
Idem pour la variable objet sur la feuille de calculs ‼
Qui plus est dans un tel cas il faut libérer ces variables objet avant la fin de la procédure …

Au passage avec un bloc With … End With (voir l'aide VBA interne) souvent ces variables objet sont inutiles !

Voilà, voilà !

___________________________________________________________________________________________________________
Je suis Paris, Egypte, Stockholm, London, Istanbul, Berlin, Nice, Bruxelles, Charlie, …

[wkrystof1]

Marc L,

Je me débrouille avant de me lancer sur le forum,
Pas de copier - coller car comme je l'explique, la macro fonctionnait très bien avant le changement du Pc au bureau.
Nouveau Pc mais avec le même chemin et nom

Maintenant, je comprends que vous êtes un forum très "Selectif" uniquement que pour des pros et que vous n'avez pas de temps à perdre avec des débutants.
Je ne vous souhaite pas de débuter sur quelques choses que vous ne maitrisez pas ou ne connaissez et de vous faire traiter de la même manière.

Enfin, ce n'est pas très grave, ici les débutant on tord pour pleins de raisons et règles que vous avez mis en place.

Je vais me débrouiller

[Marc-L]

Déjà être débutant n'est en aucun cas une excuse pour ne pas se conformer aux règles de ce forum !
Et je confirme le bête Copier / Coller vu les incohérences du maigre code présenté initialement !

En lisant bien ma réponse, j'ai pourtant donné trois quatre solutions …  

[wkrystof1]

J'ai trouvé mais rien à voir avec ce que l'on a pu essayé de me faire comprendre.
Pour tout ceux qui pourrait avoir le même soucis, il fallait que je rajoute l'extension.xls derrière le nom. Je ne comprends pas pourquoi avant cela fonctionnait bien et depuis le changement de mon pc plus rien.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Workbooks("encoursTRP").Close SaveChanges:=False

[Marc-L]

Ce que tu as « trouvé »   correspond pourtant à ma première solution !
Comparer la ligne ouvrant le classeur avec celle le fermant, c'est tellement évident !
Et du reste tu n'aurais jamais rencontré ce souci en utilisant une variable pour le nom du classeur à ouvrir !

La cause de ce problème est exposée dans la présentation elle-même : changement d'ordinateur
donc configuration différente de l'Explorateur Windows comme c'est déjà indiqué dans des discussions de ce forum …

Ensuite pour les autres solutions, il suffit de bien lire ma première intervention
car on constate dans ce code l'inutilité de définir des variables objet pour ne pas les utiliser
et gâchant inutilement du temps d'exécution et des ressources mémoires !

Et pour rappel un bon code n'a pas besoin de Select …

___________________________________________________________________________________________________________

L'avenir n'appartient pas qu'à ceux se levant tôt mais surtout à ceux se donnant la peine de lire …

[wkrystof1]

Marc L,

Honnêtement, je n'ai pas compris vos instructions

La solutions est partiellement trouvée, car le pc est changé mais avec un ghost de l'ancien donc je ne suis pas censé avoir de mauvaise surprise.

Merci pour votre intervention

[Marc-L]

Un ghost n'assurant en rien les mauvaises surprises, la preuve !

La qualité des réponses dépendant donc de celle de la présentation initiale,
nous attendons donc de voir le code balisé comme c'est pourtant indiqué dans les règles de ce forum
(lien pourtant déjà donné plus haut, à quoi cela sert donc que Ducros il se décarcasse ?!)
et afin d'apporter une aide si possible sans erreur mieux vaut poster la procédure complète qu'un mauvais ersatz …