Excel VBA質問箱 IV

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

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


19058 / 76738 ←次へ | 前へ→

【63117】Re:特定の文字を含むシートだけを移動させる方法
質問  けい  - 09/10/9(金) 12:02 -

引用なし
パスワード
   ▼Yuki さん:


>こんにちは。

アドバイスありがとうございます

このままコードを記述してみたところ、動きましたが、
コピーではなく、移動させたいと思ってます

[Copy]の箇所を[Move]に変えて、動かしてみたところ、
やっぱり途中で、実行時エラー ’1004’が表示され、
Moveメソッドが失敗しました、’Worksheet'オブジェクト

とでてしまいます

なんででしょうか??
書き方に問題でもあるのでしょうか?
教えて下さい

何度も質問して申し訳ありません。


>    For Each sht In .Worksheets
>      If sht.Name Like strSht & "*" Then
>        i = i + 1
>        If i = 1 Then
>          sht.Copy  ’←ここを[sht.Move]に変えました
>          Set NewBook = ActiveWorkbook
>        Else
>          sht.Copy After:=NewBook.Worksheets (NewBook.Worksheets.Count) ’←ここを[sht.Move After:=NewBook.Worksheets (NewBook.Worksheets.Count)]と変えました


どうか、よろしくお願いします

0 hits

【63091】特定の文字を含むシートだけを移動させる方法 けい 09/10/7(水) 15:16 質問
【63092】Re:特定の文字を含むシートだけを移動させ... Jaka 09/10/7(水) 15:41 発言
【63113】Re:特定の文字を含むシートだけを移動させ... けい 09/10/9(金) 9:20 お礼
【63093】Re:特定の文字を含むシートだけを移動させ... Yuki 09/10/7(水) 15:48 発言
【63114】Re:特定の文字を含むシートだけを移動させ... けい 09/10/9(金) 9:25 質問
【63115】Re:特定の文字を含むシートだけを移動させ... けい 09/10/9(金) 10:23 質問
【63116】Re:特定の文字を含むシートだけを移動させ... Yuki 09/10/9(金) 11:20 発言
【63117】Re:特定の文字を含むシートだけを移動させ... けい 09/10/9(金) 12:02 質問
【63118】Re:特定の文字を含むシートだけを移動させ... Jaka 09/10/9(金) 13:34 発言
【63174】Re:特定の文字を含むシートだけを移動させ... けい 09/10/13(火) 8:03 質問
【63119】Re:特定の文字を含むシートだけを移動させ... Yuki 09/10/9(金) 15:27 発言
【63175】Re:特定の文字を含むシートだけを移動させ... けい 09/10/13(火) 8:05 質問
【63176】Re:特定の文字を含むシートだけを移動させ... Yuki 09/10/13(火) 8:58 発言
【63177】Re:特定の文字を含むシートだけを移動させ... けい 09/10/13(火) 10:00 発言
【63178】Re:特定の文字を含むシートだけを移動させ... seg 09/10/13(火) 12:58 発言
【63179】Re:特定の文字を含むシートだけを移動させ... けい 09/10/13(火) 15:13 発言
【63180】Re:特定の文字を含むシートだけを移動させ... seg 09/10/13(火) 15:42 発言
【63181】Re:特定の文字を含むシートだけを移動させ... Yuki 09/10/13(火) 15:48 発言
【63182】Re:特定の文字を含むシートだけを移動させ... けい 09/10/13(火) 16:35 発言
【63184】Re:特定の文字を含むシートだけを移動させ... seg 09/10/13(火) 17:27 発言
【63187】Re:特定の文字を含むシートだけを移動させ... けい 09/10/14(水) 8:26 お礼
【63188】Re:特定の文字を含むシートだけを移動させ... Yuki 09/10/14(水) 8:35 発言
【63193】Re:特定の文字を含むシートだけを移動させ... けい 09/10/15(木) 9:16 お礼

19058 / 76738 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free