OVH Cloud OVH Cloud

Long et fastidieux! Au secours!

2 réponses
Avatar
Ralipsi
Bonjour!

J'ai créé un document Excel dans lequel j'ai inséré au moins 300 contrôles
(bouton d'option) qui sont en rang d'oignon sur une même feuille sur plus de
200 lignes consécutives.

Je modifie en profondeur le contenu de ce document en détruisant au moins
200 lignes. Ce qui me fait royalement chier c'est le fait que je doive
MANUELLEMENT enlever chacun des boutons d'option des lignes disparues et qui
sont superposés un par dessus l'autre sur une même ligne! C'est long et
fastidieux! Y a-t-il moyen de les enlever d'un seul coup ou plus
rapidement?

Merci

2 réponses

Avatar
padbra
Salut,
dans la boite a outils dessin, selectionne l'outil fleche.
Tu peux alors le cliquer/glisser en faisant un rectangle de selection autour
de tes objets

padbra

"Ralipsi" a écrit dans le message de
news: A00zb.98908$
Bonjour!

J'ai créé un document Excel dans lequel j'ai inséré au moins 300 contrôles
(bouton d'option) qui sont en rang d'oignon sur une même feuille sur plus
de

200 lignes consécutives.

Je modifie en profondeur le contenu de ce document en détruisant au moins
200 lignes. Ce qui me fait royalement chier c'est le fait que je doive
MANUELLEMENT enlever chacun des boutons d'option des lignes disparues et
qui

sont superposés un par dessus l'autre sur une même ligne! C'est long et
fastidieux! Y a-t-il moyen de les enlever d'un seul coup ou plus
rapidement?

Merci




Avatar
Denis Michon
Bonjour Ralipsi,


Essaie ceci en copiant ce qui suit dans un module standard et en adaptant le nom de la feuille à celle de ton projet. Ceci ne
replace pas les objets de la feuille mais empêche qu'ils soient déplacés ou redimensionnés lorsque tu supprimes des lignes.

'----------------------------
Sub PasBouger()

Dim Sh As Shape

For Each Sh In Worksheets("Feuil1").Shapes
Sh.Placement = xlFreeFloating
Next
Set Sh = Nothing

End Sub
'----------------------------



Salutations!



"Ralipsi" a écrit dans le message de
news:A00zb.98908$
Bonjour!

J'ai créé un document Excel dans lequel j'ai inséré au moins 300 contrôles
(bouton d'option) qui sont en rang d'oignon sur une même feuille sur plus de
200 lignes consécutives.

Je modifie en profondeur le contenu de ce document en détruisant au moins
200 lignes. Ce qui me fait royalement chier c'est le fait que je doive
MANUELLEMENT enlever chacun des boutons d'option des lignes disparues et qui
sont superposés un par dessus l'autre sur une même ligne! C'est long et
fastidieux! Y a-t-il moyen de les enlever d'un seul coup ou plus
rapidement?

Merci