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 :
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 :
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.
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
-
ContributeurBonjour,
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+ -
Merci Pilas31, mais ca ne marche pas non plus :(
Une autre idée?
A+
