Comment supprimer les boutons (SHAPES) sur une feuille exel - VB/VBA/VBS - Programmation
Marsh Posté le 23-06-2005 à 18:31:28
dim xlwks as excel.worksheet 
dim i, iCompt as integer 
 
set xlwks = activesheet 
iCompt = 0 
for i = 1 to xlwks.shapes.count 
    xlwks.shapes(i - iCompt).delete 
    iCompt = iCompt + 1 
next i 
 
  
Marsh Posté le 23-06-2005 à 18:53:08
Euh, c'est pas plus simple comme ça? 
Dim vSh As Variant   | 
Marsh Posté le 23-06-2005 à 08:48:02
Salut !!
JE voudrais savoir comment on peut supprimer tous les boutons (shapes) dans une feuille exel
genre:
ActiveSheet.shapes.select
Selection.delete
@+ sur le net