0976名無しさん@そうだ選挙にいこう垢版 | 大砲2019/07/28(日) 19:49:22.01 >>975 具体的には activesheet.Shapes.range("Button 1").delete か For Each eShape In ActiveSheet.Shapes eShape.Delete Next を入れとく