Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

29971 / 76738

←次へ　｜　前へ→


	【52040】Re:インデックスが有効範囲にありません。

Jaka - 07/10/17(水) 13:35 -


	引用なし

	パスワード

sheet1　sheet2　 sheet3　 sheet4　 sheet5

sheet1を削除すると、
sheet2　 sheet3　 sheet4　 sheet5
こうなります。

最初のシート数が５枚ですから、提示されたコードだと、
５枚目が無いのにシート名を比較してます。
５枚目のシートが無いのにシート名なんて解るはず無いですよね。
それが原因です。
で対策、セルの削除と同じく後ろから行う。

他、
For Each Ws In Worksheets
　 If Ws.Name Like "あああ*" Then
　　　Ws.Delete
　 End If
Next

0 hits

▼

【52039】インデックスが有効範囲にありません。 osanpo 07/10/17(水) 13:21