No.3ベストアンサー
- 回答日時:
> しかしシートに貼り付けられた時点で拡張子は存在しなくなる?
そうですよ。
> ActiveSheet.DrawingObjects.Delete
> を実行すると登録ボタンも削除されるというもので困っています。
図形だけを消して、ボタンを残せばいいのですね。 それなら
ボタンがフォームのボタンなら
ActiveSheet.Pictures.Delete
ボタンがコントロールツールボックスのボタンなら
Dim Pic As Object
For Each Pic In ActiveSheet.Pictures
If TypeName(Pic) = "Picture" Then Pic.Delete
Next
で如何でしょうか。
Pictures は、隠しオブジェクトになっていてヘルプでは、解説が表示されません。
No.2
- 回答日時:
'もとい、VBAの話ですね。
失礼失礼。'参考
'http://www.asahi-net.or.jp/~ef2o-inue/vba_o/sub0 …
'Sheet1
Option Explicit
Sub hoge()
UserForm1.Show
End Sub
'UserForm1 TextBox1とCommandButton1があるものとする
'面倒くさかったから書かなかったが,場合によってはコモンダイアログを
'利用してフォルダ名を取得しよう
Option Explicit
Private Sub CommandButton1_Click()
Kill UserForm1.TextBox1.Text & "*.txt"
End Sub
'事前にC:\fuga\に沢山txtファイルを作っておく。
'バグがないかどうか確かめるためにhoge.bmpというファイルも置いておいた
'C: テキストボックスにC:\fuga\と入力したら上手く行った。
'ただしフォルダが無かった場合とかは検証してないので自分で書くこと。
この回答への補足
申し訳ありません
ファイルではなくエクセルのシートの写真を拡張子別で削除したかった
のが現状です。
言葉足らずですみません
しかしシートに貼り付けられた時点で拡張子は存在しなくなる?
どうすればいいのやら困っています。
尚、障害となっているのは
ActiveSheet.DrawingObjects.Delete
を実行すると登録ボタンも削除されるというもので困っています。
ツールバーのボタンにしても名前を付けて保存するとうまく動きません。保存先のマクロにかわっている?
どうにかなりませんか?
No.1
- 回答日時:
コマンドプロンプトで
cd C:\hoge
のようにカレントディレクトリを変更して
del *.jpg
↓くれぐれもこういうのには注意
http://www.atmarkit.co.jp/fwin2k/itpropower/admi …
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
これ何て呼びますか Part2
あなたのお住いの地域で、これ、何て呼びますか?
-
フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
あなたが普段思っている「これまだ誰も言ってなかったけど共感されるだろうな」というあるあるを教えてください
-
映画のエンドロール観る派?観ない派?
映画が終わった後、すぐに席を立って帰る方もちらほら見かけます。皆さんはエンドロールの最後まで観ていきますか?
-
海外旅行から帰ってきたら、まず何を食べる?
帰国して1番食べたくなるもの、食べたくなるだろうなと思うもの、皆さんはありますか?
-
天使と悪魔選手権
悪魔がこんなささやきをしていたら、天使のあなたはなんと言って止めますか?
-
PowerpointVBAで指定のShapeオブジェクトを削除したい。
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・人生のプチ美学を教えてください!!
- ・10秒目をつむったら…
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・【大喜利】【投稿~9/18】 おとぎ話『桃太郎』の知られざるエピソード
- ・街中で見かけて「グッときた人」の思い出
- ・「一気に最後まで読んだ」本、教えて下さい!
- ・幼稚園時代「何組」でしたか?
- ・激凹みから立ち直る方法
- ・1つだけ過去を変えられるとしたら?
- ・【あるあるbot連動企画】あるあるbotに投稿したけど採用されなかったあるある募集
- ・【あるあるbot連動企画】フォロワー20万人のアカウントであなたのあるあるを披露してみませんか?
- ・映画のエンドロール観る派?観ない派?
- ・海外旅行から帰ってきたら、まず何を食べる?
- ・誕生日にもらった意外なもの
- ・天使と悪魔選手権
- ・ちょっと先の未来クイズ第2問
- ・【大喜利】【投稿~9/7】 ロボットの住む世界で流行ってる罰ゲームとは?
- ・推しミネラルウォーターはありますか?
- ・都道府県穴埋めゲーム
- ・この人頭いいなと思ったエピソード
- ・準・究極の選択
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
Excelシート上のマクロを登録し...
-
【Excel VBA】マクロボタンを表...
-
Excel ラジオボタンのリセット...
-
UPS警告音を止めたい
-
Accessのフォームでタブの色
-
マクロを登録しているボタンが...
-
エクセルの画面にユーザーフォ...
-
EXCELの塗りつぶしのボタ...
-
Excel vab でのボタンの使い分...
-
EXCELのマクロが 実行時エラー5...
-
フレーム内のオプションボタン...
-
Excelで、ボタンにコメントをつ...
-
コンボボックスウィザードが出...
-
トグルボタンをオプションボタ...
-
ボタンを画像で作るか、CSSでデ...
-
VBAでクリアボタンのみ残してシ...
-
VBAでオプションボタンなどそれ...
-
入力済み、選択したセルに連動...
-
エクセルで、オプションボタン...
-
Access VBAでボタンの背景色を...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
Excelシート上のマクロを登録し...
-
UPS警告音を止めたい
-
【Excel VBA】マクロボタンを表...
-
エクセルの画面にユーザーフォ...
-
Excel ラジオボタンのリセット...
-
Excelで、ボタンにコメントをつ...
-
EXCELのマクロが 実行時エラー5...
-
Accessのフォームでタブの色
-
マクロで作ったボタンのサイズ...
-
複数シートのボタンに同一の動...
-
excel スクロールしても常にボ...
-
ユーザーフォームをショートカ...
-
エクセルで、オプションボタン...
-
エクセルでグループボックスを...
-
Access VBAでボタンの背景色を...
-
オブジェクト名をVBAで指定...
-
マクロ初心者です。 msgboxのre...
-
EXCELの塗りつぶしのボタ...
-
マクロを登録しているボタンが...
-
VBAでクリアボタンのみ残してシ...
おすすめ情報