FC2ブログ

まったり開発日誌

embossの工具箱(J2EE Java2 Linux Zaurus C++)

VBA-画像、図形を全消去

画像及び図形などを全てのシートから除去するVBAマクロ。

Sub deleteAllElement()
    Dim element As Shape
    Dim sps As Shapes
    Dim sheet_name As Worksheet
    For Each sheet_name In Worksheets

        Set sps = sheet_name.Shapes
       
        For Each element In sps
            element.Delete
        Next
    Next
End Sub
スポンサーサイト



  1. 2007/10/17(水) 10:42:35|
  2. 便利なツール類
  3. | トラックバック:0
  4. | コメント:0
<<C#での安全な型変換 | ホーム | A href="#">>

コメント

コメントの投稿


管理者にだけ表示を許可する

トラックバック

トラックバックURLはこちら
http://emboss.blog28.fc2.com/tb.php/76-61a7f4c6
この記事にトラックバックする(FC2ブログユーザー)

RSSフィード

カレンダー

12 | 2020/01 | 02
- - - 1 2 3 4
5 6 7 8 9 10 11
12 13 14 15 16 17 18
19 20 21 22 23 24 25
26 27 28 29 30 31 -

カテゴリー

最近の記事

最近のコメント

最近のトラックバック

月別アーカイブ

ブロとも申請フォーム

この人とブロともになる

ブログ内検索

リンク

このブログをリンクに追加する

メールフォーム

名前:
メール:
件名:
本文: