エントリーの編集
![loading...](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/common/loading@2x.gif)
エントリーの編集は全ユーザーに共通の機能です。
必ずガイドラインを一読の上ご利用ください。
記事へのコメント0件
- 注目コメント
- 新着コメント
このエントリーにコメントしてみましょう。
注目コメント算出アルゴリズムの一部にLINEヤフー株式会社の「建設的コメント順位付けモデルAPI」を使用しています
![アプリのスクリーンショット](https://b.st-hatena.com/bdefb8944296a0957e54cebcfefc25c4dcff9f5f/images/v4/public/entry/app-screenshot.png)
- バナー広告なし
- ミュート機能あり
- ダークモード搭載
関連記事
画像を削除したい(VBA)
こんにちは。 2つほどサンプルを。ご参考までに。 ' // C5セル内に画像左上角がある場合は削除 ' // 画... こんにちは。 2つほどサンプルを。ご参考までに。 ' // C5セル内に画像左上角がある場合は削除 ' // 画像右下がC5セルからはみ出しているかどうかを問わない Sub SampleProc1() Dim Pic As Picture For Each Pic In ActiveSheet.Pictures If Pic.TopLeftCell.Address = "$C$5" Then Pic.Delete End If Next End Sub ' // セルの選択範囲内に完全に含まれる画像を削除 Sub SampleProc2() Dim Pic As Picture Dim r As Range If UCase$(TypeName(Selection)) <> "RANGE" Then Exit Sub For Each Pic In ActiveSheet.Picture