最終更新日:2013-02-18第22回.シートの移動コピーシートの移動、コピーをやってみましょう。ブックはBook1.xls、シートは、Sheet1、Sheet2、Sheet3、があり、Sheet1が選択状態から。Subこれは読んだ通りです。Before:=Sheets(1)Sheet3を、Sheets(1)、1番目のシートの前に移動します。After:=Sheets(3)Sheet3を、Sheets(3)、3番目のシートの後ろにコピーします。After:=Sheets(Sheets.Count)シートを追加します。Sheets.Countは、シートの数です。Sheets(Sheets.Count)は、最後のシートになります。最後のシートの後ろに新規シートを追加します。Sheets("Sheet5").Moveシートを新規ブックに移動します。新規ブックにコピーする場合は、.Copyとします。CopyMoveAddAfterBeforeこの組み合わせで自由な位置に、移動、コピー、追加が可能になります。シートを元の状態に戻してください。Sheet1、Sheet2、Sheet3の順にして、他のシートは削除します。上のマクロを再度実行して下さい。「インデックスが有効範囲にありません」エクセルが黄色い顔をして起こっていますね。マクロは停止して下さい。ブックにシートを追加した場合は、そのシート名は、自動でカウントアップされます。従って、実行する度に、シート名が変化してしまうので、"Sheet5"のような指定はエラーとなります。Copy、Move、Addの直後は、そのシートが選択されているので、Activesheetと記述すればよいです。Sheets("Sheet5").SelectSheets("Sheet5").Moveは、単に、Activasheet.Moveだけで良いです。Sub前回と似たような使い方です。Next)|VBA入門5.ひらがな⇔カタカナの変換|エクセル基本操作6.セルのコピー&値の貼り付け(PasteSpecial)|VBA入門7.マクロって何?VBAって何?|VBA入門8.Excelショートカットキー一覧|Excelリファレンス9.並べ替え(Sort)|VBA入門10.エクセルVBAでのシート指定方法|VBA技術解説ホームマクロVBA入門編マクロの記録でVBAシートの移動コピーこのサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。間違いやご指摘がありましたら、「お問い合わせ」からお知らせいただけると幸いです。掲載のVBAコードは動作を保証するものではなく、あくまでVBA学習のサンプルとして掲載しています。掲載のVBAコードは自己責任でご使用ください。万一データ破損等の損害が発生しても責任は負いません。アクセスランキングサイトマップ事業案内お問い合わせホームマクロVBA入門編マクロの記録でVBAシートの移動コピーこのサイトがお役に立ちましたら「シェア」「Bookmark」をお願いいたします。