Excel VBA質問箱 IV

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

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


72403 / 76732 ←次へ | 前へ→

【8812】Re:windowの再取得
回答  りん E-MAIL  - 03/11/3(月) 23:20 -

引用なし
パスワード
   めぐ さん、こんばんわ。

>ただコピー、ペースト方法がちょっとわからないのですが。。。
>お時間がありましたらよろしくお願い致します。
シートのコピーということでしょうか。

  データシートが3つあるのでループは3回 
>>  For II = 1 To 3
    II番目のシートの前に、ws(II)にSetしたシートをコピーします。
>>   ws(II).Copy before:=wb2.Sheets(II)'テスト用.xlsにコピー
>>   ws(II).Copy before:=wb3.Sheets(II)'301在庫.xlsにコピー
    コピーのすんだシートを含むブック(SheetのParentはBook)を
    保存せずに閉じます
>>   With ws(II).Parent
>>     .Saved = True
>>     .Close savechanges:=False
>>   End With
    次のシートへ
>>  Next
 
 前もって配列に格納しておいたワークシートをSheetのCopyメソッドで、位置を指定してコピーするようにしています。
 テスト用.xlsを保存せずに閉じるならば、wb2にコピーする処理は省いていいです。

#前にこれを書いたときに、送信を押したらエラーでけられてしまって(泣)
 その後返事が遅くなってすみませんでした。

0 hits

【8561】windowの再取得 めぐ 03/10/24(金) 9:57 質問
【8563】Re:windowの再取得 INA 03/10/24(金) 11:08 回答
【8564】Re:windowの再取得 つん 03/10/24(金) 11:14 発言
【8565】Re:windowの再取得 INA 03/10/24(金) 11:19 回答
【8566】Re:windowの再取得 つん 03/10/24(金) 11:33 発言
【8567】Re:windowの再取得 INA 03/10/24(金) 11:43 回答
【8573】すんませーん つん 03/10/24(金) 13:06 発言
【8568】Re:windowの再取得 めぐ 03/10/24(金) 11:47 質問
【8569】Re:windowの再取得 INA 03/10/24(金) 11:55 回答
【8574】Re:windowの再取得 めぐ 03/10/24(金) 13:31 質問
【8575】Re:windowの再取得 INA 03/10/24(金) 13:38 回答
【8587】Re:windowの再取得 めぐ 03/10/24(金) 16:33 質問
【8588】Re:windowの再取得 INA 03/10/24(金) 16:36 回答
【8589】Re:windowの再取得 めぐ 03/10/24(金) 16:51 質問
【8592】Re:windowの再取得 INA 03/10/24(金) 18:39 回答
【8611】Re:windowの再取得 めぐ 03/10/27(月) 9:51 質問
【8637】Re:windowの再取得 りん 03/10/27(月) 19:41 回答
【8681】Re:windowの再取得 めぐ 03/10/29(水) 11:19 質問
【8684】Re:windowの再取得 めぐ 03/10/29(水) 11:36 お礼
【8705】Re:windowの再取得 めぐ 03/10/29(水) 16:56 質問
【8812】Re:windowの再取得 りん 03/11/3(月) 23:20 回答
【8879】Re:windowの再取得 めぐ 03/11/7(金) 10:23 質問
【8955】Re:windowの再取得 りん 03/11/11(火) 19:23 回答

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