Discussion :

[formabox]

Hello le forum,

J'ai développé toute une application avec Excel 2007 et maintenant que je la teste sur 2010, j'ai certaines macros qui plantent... Le VBA ne s'affiche même pas pour indiquer la ligne qui pose problème mais la macro tourne en rond et plante Excel.

En testant ma macro pas-à-pas, j'ai remarqué qu'il plante lorsque j'insère une ligne dans mon code

Code :

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

Selection.EntireRow.Insert

Est-ce un problème connu ? Le code a-t-il changé sur 2010 ? Est-ce peut-être un problème de macros complémentaires entre 2007 et 2010 ?

Si quelqu'un me m'aiguiller, je l'en remercie d'avance

[Philippe Tulliez]

Bonjour,
Je ne vois pas de problème avec cette ligne de code en version 2010 sauf si la sélection est une colonne (clic sur une lettre de colonne)

[formabox]

Il me semble aussi que cette ligne est tout-à-fait standard...

Je n'y connais rien aux librairies mais si je regarde dans mon VBA Excel 2007 sous le menu Outils > Références, les librairies Microsot Office Excel 12.0 Objects sont utilisées.

Alors que si je regarde dans mon Excel 2010, les librairies 14.0 sont activées...

Est-ce que ça pourrait provenir de ces librairies ?

D'autant plus, que j'ai pas l'impression que la plante mais qu'elle s'éxécute mais en prenant un tout de fou donc où bon d'un moment, je ferme la tâche en cours. Alors qu'Avec 2007, le temps d'exécution est super rapide...

[formabox]

Ce problème comment à me prendre la tête...

Si j'exécute mon code pas-à-pas, je vois bien qu'il est super lent chaque fois qu'il tombe sur une ligne de code qui insère une ligne...

En lisant plusieurs forums, j'ai pu constater que certaines personnes disent que la commande Selection ralentit souvent le processus...

J'ai essayé avec un

Code :

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

ActiveCell.EntireRow.Insert

mais le problème est toujours le même...

[Philippe Tulliez]

Bonjour,
Je ne constate pas de lenteur particulière mais je n'ai pas vu le reste de ton code.
Il est clair que si tu dois faire une centaine d'insertion et qu'à chaque fois tu fais un Select et un Selection ce sera très lent.
Si l'insertion est dans une boucle, tu peux aussi travailler avec l'index de la ligne
Exemple

Code :

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

1
2
3
4
 Dim r As Long
 For r = 50 To 2 Step -2
  Rows(r).Insert
 Next

Tu peux aussi faire précéder ton code de l'instruction

Code :

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

 application.ScreenUpdating = False

[formabox]

L'Application.Screenupdating est déjà utilsée mais rien ne change...

Et si je comprends bien ton code, il permet d'ajouter plusieurs lignes au même endroit ?

J'ai dans mon code, à 1 un endroit l'insertion d'une ligne. Ce bout de code fait partie d'une boucle pour qu'il s'exécute sur toutes les feuilles mensuelles, donc il utilise 12 x l'insertion de lignes mais pas en continu.

Je vais essayer de trouver une de mes versions qui n'a pas de données confidentielles et éventuellement te l'envoyer pour que tu puisses tester le fichier ?