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フィード

カレンダー

07 | 2019/08 | 09
- - - - 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

カテゴリー

最近の記事

最近のコメント

最近のトラックバック

月別アーカイブ

ブロとも申請フォーム

この人とブロともになる

ブログ内検索

リンク

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

メールフォーム

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