[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2006/01/10(Tue) 15:25
投稿者名:VBAひよこ級
Eメール:
URL :
タイトル:
シートとデリートについて
初歩的な質問ですいません。仕事中です。(><)
シートのデリートで削除しますか?とゆうのを出さないようにするにはどうすればよいでしょうか?

もう一つ、コピーして、そのコピーした場所以外全てを消したいのですが、そのようなことはできま
すでしょ
うか?お願いします。

投稿時間:2006/01/10(Tue) 15:39
投稿者名:
Eメール:
URL :
タイトル:
Re: シートとデリートについて
ExcelVBAは私も分かりませんが…

> 初歩的な質問ですいません。仕事中です。(><)
> シートのデリートで削除しますか?とゆうのを出さないようにするにはどうすればよいでしょうか

Application.DisplayAlertsプロパティかなぁ…

> もう一つ、コピーして、そのコピーした場所以外全てを消したいのですが、そのようなことはでき

> すでしょ
> うか?お願いします。
"消す"ことは出来ますか?
 (できる)→"コピーした場所"を一意に特定できますか?
      (できる)→力技で、一つ一つ、"コピーした場所"以外を"消し"てい
ってください
      (できない)→必要な情報まで消してしまうことになります。何か打開策があるかもしれま

ん。
 (できない)→消すことが出来ないなら、知らない何か特別なメソッドがある"かも"しれま
せん

投稿時間:2006/01/10(Tue) 16:41
投稿者名:VBAひよこ級
Eメール:
URL :
タイトル:
Re^2: シートとデリートについて
お早いお返事有難うございます

> ExcelVBAは私も分かりませんが…
>
> > 初歩的な質問ですいません。仕事中です。(><)
> > シートのデリートで削除しますか?とゆうのを出さないようにするにはどうすればよいでし
ょうか
> ?
> Application.DisplayAlertsプロパティかなぁ…
有難うございますやってみます♪大変助かりました。

> > もう一つ、コピーして、そのコピーした場所以外全てを消したいのですが、そのようなこと
はでき
> ま
> > すでしょ
> > うか?お願いします。
> "消す"ことは出来ますか?
>  (できる)→"コピーした場所"を一意に特定できますか?
>       (できる)→力技で、一つ一つ、"コピーした場所"以外を"消し"
てい
> ってください
>       (できない)→必要な情報まで消してしまうことになります。何か打開策があるかもし
れま
> せ
> ん。
>  (できない)→消すことが出来ないなら、知らない何か特別なメソッドがある"かも"し
れま
> せん
なかなか難しいですね・・・力技で消すしかないですかねぇ・・・
他の方法少し考えて見ます。ありがとうございました♪

投稿時間:2006/01/10(Tue) 18:12
投稿者名:ダンボ
URL :
タイトル:
Re^3: シートとデリートについて
> > > シートのデリートで削除しますか?とゆうのを出さないようにするにはどうすればよいでしょうか

も さんのおっしゃるとうり、Application.DisplayAlerts = False ですね。

> > > もう一つ、コピーして、そのコピーした場所以外全てを消したいのですが、そのようなことはで
きますでしょうか?

コピーと削除の対象はシートですか?

も さんと同じ答えですが、コピー後のシート名を決めれば、シートのコレクションを全部なめて
そのシート名以外のシートをDeleteすれば良いだけ。
コピー後のシート名を決めたくなければ、一番前または一番後ろにコピーして、それ以降/それまでの
シートをインデックス値でなめてDeleteすれば良いだけ。

投稿時間:2006/01/10(Tue) 23:49
投稿者名:VBAひよこ級
Eメール:
URL :
タイトル:
すいませんがもうひとつ
> > > > もう一つ、コピーして、そのコピーした場所以外全てを消したいのですが、そのよ
うなことはで
> きますでしょうか?
>
> コピーと削除の対象はシートですか?
>
> も さんと同じ答えですが、コピー後のシート名を決めれば、シートのコレクションを全部なめて
> そのシート名以外のシートをDeleteすれば良いだけ。
> コピー後のシート名を決めたくなければ、一番前または一番後ろにコピーして、それ以降/それま
での
> シートをインデックス値でなめてDeleteすれば良いだけ。

ありがとうございます。
もうひとつ最後にシートの有無を取得するにはどうすればよいでしょうか?
if分でシートがあるならば削除とか。

投稿時間:2006/01/11(Wed) 00:33
投稿者名:Blue
Eメール:
URL :
タイトル:
Re: すいませんがもうひとつ
For Each で全てのシート名を確認するようなことをします。

参考にどうぞ
■ シートが存在するか調べる
hhttp://www.officetanaka.net/excel/vba/tips/tips10.htm

投稿時間:2006/01/11(Wed) 11:46
投稿者名:VBAひよこ級
Eメール:
URL :
タイトル:
Re^2: すいませんがもうひとつ
> For Each で全てのシート名を確認するようなことをします。
>
> 参考にどうぞ
> ■ シートが存在するか調べる
> hhttp://www.officetanaka.net/excel/vba/tips/tips10.htm

とても参考になりました。ありがとうございます。

投稿時間:2006/01/11(Wed) 10:33
投稿者名:ダンボ
Eメール:
URL :
タイトル:
Re^4: シートとデリートについて(そもそも)
>もう一つ、コピーして、そのコピーした場所以外全てを消したいのですが、そのようなことはできます
でしょうか?

コピー元のシートも削除するのでしょ?
それだったら、そもそもコピーしなくても(リネームして)自分以外のシートを削除すればよいだけ。。

投稿時間:2006/01/11(Wed) 11:48
投稿者名:VBAひよこ級
Eメール:
URL :
タイトル:
Re^5: シートとデリートについて(そもそも)
> >もう一つ、コピーして、そのコピーした場所以外全てを消したいのですが、そのようなことは
できます
> でしょうか?
>
> コピー元のシートも削除するのでしょ?
> それだったら、そもそもコピーしなくても(リネームして)自分以外のシートを削除すればよいだけ
。。
そうですよね・・・(汗。。。ありがとうございます(笑