Excel Microsoft VBA

シートのコピー方法を覚えよう!【VBA入門講座#15】

サブロー
こんにちは。サブローです。

『Microsoft Excel』(以下Excel、エクセル)の中の機能としてある[VBA] について基本的な説明をしていきます。

仕事の改善や個人的な知識向上に役立ててください(^o^)

第15回目の今回は

シートのコピー機能

について解説していきますので、よろしくお願いします。

前回までのVBAに関するINDEXは下記を参照してくださいね。

↓サブログ内部リンク(VBA用INDEX)↓

Excel VBA講座-目次(INDEX)

サブローExcel VBAに関する説明を今後増やして行く予定なので、各リンクに飛ぶような目次(INDEX)を作りました。 随時更新していくので、よろしくお願いします。 目次(INDEX) 講座No内容 ...

続きを見る






シートのコピー

<書式>

オブジェクト.Copy([Before],[After])

<説明>

シートをコピーします。コピー先は、引数のBefore、またはAfterで指定します。

対象:

Worksheetオブジェクト

引数:

Before:指定したシートの前に、対象のシートをコピーします。

After:指定したシートの後ろに、対象のシートをコピーします。

なし:省略すると、新しいブックにコピーします。

 

新しいブックへのコピー

<コード記入例1>

Sub シートコピー()

'worksheetのsample1のsheetを新しいブックにコピーします。
Worksheets("sample1").Copy

’マクロを終了する
End Sub

<マクロ実行結果>

特定シートの後ろにコピー

<コード記入例2>

Sub シートコピーa()

'worksheetの"sample1"のsheetを"abc"のシートの後ろにコピーします。
Worksheets("sample1").Copy After:=Worksheets("abc")

’マクロを終了する
End Sub

<マクロ実行結果>

※コピーしたら同じ名前のものが2つできるので、コピーしたシート名末尾に(2)がつく。(2)がすでにあれば(3)ができる(その繰り返し)

特定シートの前にコピー

<コード記入例3>

Sub シートコピーb()

'worksheetの"sample1"のsheetを"abc"のシートの前にコピーします。
Worksheets("sample1").Copy Before:=Worksheets("abc")

’マクロを終了する
End Sub

<マクロ実行結果>

※コピーしたら同じ名前のものが2つできるので、コピーしたシート名末尾に(2)がつく。(2)がすでにあれば(3)ができる(その繰り返し)

一番右のシートの後ろにコピー

<コード記入例3>

Sub シートコピーc()

'worksheetの"sample1"のsheetを一番右のシートの後ろにコピーします。
Worksheets("sample1").Copy Aefter:=Worksheets(Worksheets.Count)

’マクロを終了する
End Sub

<マクロ実行結果>

※コピーしたら同じ名前のものが2つできるので、コピーしたシート名末尾に(2)がつく。(2)がすでにあれば(3)ができる(その繰り返し)

 

モグゾー
それでは、今回はここまで。最後までお読みいただきありがとうございました!

2020年4月30日公開




~INDEX一覧~

エクセル関数の勉強 1

サブローエクセル/Excel関数の一覧にしています。本ブログ内で記事にしているものは、講座の列にリンク付けを随時行います(^o^) ※使用頻度のランクに関しては、個人的な主観でランク付けをしています。 ...

2

サブロー危険物取扱者試験 乙4種対策講座の目次(INDEX)を作りました。 随時更新していくので、よろしくお願いします。 【目次/INDEX】 講座ID分類内容リンク 1共通#1『危険物取扱者試験』の ...

3

サブローQC(品質管理)検定に関する説明が増やして行く予定なのでリンクに飛ぶような目次(INDEX)を作りました。 随時更新していくので、よろしくお願いします。 モグゾー対象級を記載していますが、あく ...

4

サブローExcel VBAに関する説明を今後増やして行く予定なので、各リンクに飛ぶような目次(INDEX)を作りました。 随時更新していくので、よろしくお願いします。 目次(INDEX) 講座No内容 ...

-Excel, Microsoft, VBA
-,

Copyright© サブログ , 2020 All Rights Reserved Powered by AFFINGER5.