VBA Excel Selection.Rows.Ungroup

Résolu
Salut
J'ai un petit problème dans un programme VBA Excel.
Je veux dégrouper des lignes grouper mais ca ne marche pas. Voici le code :
Range("A1:IV65536").Select
Selection.Rows.Ungroup

Je suis obligé de tout selectionner car je ne connais pas les numéros des lignes groupées.
J'ai exécuter le programme pas à pas, quand il arrive à cette instruction, les lignes se dégroupent normalement, puis un message d'erreur apparaît :
Erreur d'exécution '1004':
La méthode Ungroup de la classe Range a échouée

Une idée pour corriger ce problème ?

Merci :)
--
Les cons peuvent avoir l'air intelligent à première vue... Heureusement pour eux que la vitesse de la lumière est supérieure à celle du son.

2 réponses

  1. Merci Pilas31, mais ca ne marche pas non plus :(
    Une autre idée?
    A+
    0
    1. Contributeur
      Bonjour,

      Je pense que cette erreur se produit lorsque les lignes ne sont pas groupées. Il faut essayer d'utiliser plutôt l'instruction d'effacement de plan qui ne provoque pas l'erreur :

      Range("A1:IV65536").Select
      Selection.ClearOutline


      A+
      1