SUB 138
x
Gizport

SUB 138 For Each mySP In ActiveSheet.Shapesの解決方法

  • Q&A

  • 取扱説明書・マニュアル (文書検索対応分のみ)

 
"For Each mySP In ActiveSheet.Shapes"1 件の検索結果
全般
 
質問者が納得名前に"Line"を含むものを削除するのが手っ取り早いかと思います。 Sub 線を消す() Dim mySP As Shape For Each mySP In ActiveSheet.Shapes If InStr(mySP.Name, "Line") > 0 Then mySP.Delete Next End Sub どうでしょう?
5609日前view60
  1. 1

この製品について質問する