XL 2016 Désélection Sharpe dans un classeur

KTM

XLDnaute Impliqué
Bonsoir chers tous
Dans mon classeur il existe des boutons ActiveX et des Sharpe (Formes) .
Je voudrais un code qui puisse les sélectionner tous ou les désélectionner
Merci...
 

KTM

XLDnaute Impliqué
Bonsoir KTM, le forum

Pour sélectionner tous tes éléments (Shapes & Contrôles ActiveX) de la feuille1, dans un module :
VB:
Public Sub Affiche_Shapes()
Sheets("Feuil1").Shapes.SelectAll
End Sub

@+ Eric c
..
Bonsoir KTM, le forum

Pour sélectionner tous tes éléments (Shapes & Contrôles ActiveX) de la feuille1, dans un module :
VB:
Public Sub Affiche_Shapes()
Sheets("Feuil1").Shapes.SelectAll
End Sub

@+ Eric c
Merci!
Et pour désélectionner ?
 

Membres actuellement en ligne

Statistiques des forums

Discussions
312 871
Messages
2 093 102
Membres
105 627
dernier inscrit
jean-marc.brillant