Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


38985 / 76732 ←次へ | 前へ→

【42868】Re:後者の場合
お礼  てるてる  - 06/9/23(土) 16:36 -

引用なし
パスワード
   ▼Kein さん:
アドバイスありがとうございます。

>Sub Del_Object()
>  Dim Obj As Object
>
>  For Each Obj In ActiveSheet.DrawingObjects
>   If TypeName(Obj) <> "Spinner" Then Obj.Delete
>  Next
>End Sub

かなりスッキリするやり方なんですね(汗
スピンボタンが”Spinner”で認識されていることは分かったので
自分なりに応用を使えるようにしてみたいと思います。

ありがとうございました。
2 hits

【42859】削除の方法 てるてる 06/9/23(土) 14:48 質問
【42861】Re:削除の方法 りん 06/9/23(土) 15:30 回答
【42864】後者の場合 てるてる 06/9/23(土) 16:04 発言
【42865】Re:後者の場合 Kein 06/9/23(土) 16:17 回答
【42868】Re:後者の場合 てるてる 06/9/23(土) 16:36 お礼
【42866】Re:後者の場合 りん 06/9/23(土) 16:21 回答
【42869】Re:後者の場合 てるてる 06/9/23(土) 16:38 お礼

38985 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free