見出し画像

【マクロ入門#5】Excel VBAでのワークシート操作の基本:追加・削除・名前変更・移動

クロス｜Excel VBA

　このブログでは、エクセルのマクロについて、ゼロからコードを書くのではなく、すでに存在するコードを読み、理解し、そして自分の業務に応じて組み合わせる方法を学んでいきます。
　プログラミングの知識がなくても、コードの意味を読み取ることで、業務効率を劇的に向上させることができます。
　目標は、コードを書けるようになることではなく、必要なコードを見つけ、それを自分の目的に合わせて使いこなせるようになることです。
　日々の業務で役立つマクロの活用方法を、一緒に学んでいきましょう。


はじめに

　Excel VBAを使用することで、ワークシートの操作を自動化し、効率的にデータ管理を行うことが可能です。
　この記事では、ワークシートを追加、削除、名前の変更、移動など、基本的な操作をプログラムから行う方法を解説します。


1. ワークシートの追加

　新しいワークシートを追加するには、Worksheets.Addメソッドを使用します。このメソッドは新しく追加されたワークシートをアクティブにします。

  • ワークシート追加の例:

Sub ワークシート追加()

    Dim ws As Worksheet
    Set ws = Worksheets.Add
    ws.Name = "新しいシート"

End Sub

　このスクリプトは新しいワークシートを追加し、その名前を「新しいシート」と設定します。


2. ワークシートの削除

　ワークシートを削除するには、Deleteメソッドを使用します。

  • ワークシート削除の例:

Sub ワークシート削除()

    Worksheets("新しいシート").Delete

End Sub

　このコードは、【1.ワークシートの追加】で追加した、「新しいシート」という名前のワークシートを削除します。

　ちなみに、上記のコードでは、シートを削除する際に、ユーザーに確認ダイアログが表示されますが、必要に応じて確認ダイアログを無視する設定も可能です。

  • ワークシート削除（確認ダイアログなし）の例:

Sub ワークシート削除()

    Application.DisplayAlerts = False  ' 確認ダイアログを表示しない
    Worksheets("新しいシート").Delete
    Application.DisplayAlerts = True  ' 設定を元に戻す

End Sub

　このコードは、「削除するシート」という名前のワークシートを確認なしで削除します。


3. ワークシートの名前変更

　ワークシートの名前を変更するには、ワークシートオブジェクトのNameプロパティを設定します。

  • 名前変更の例:

Sub ワークシート名変更()

    Worksheets("Sheet1").Name = "新しい名前"

End Sub

　このスクリプトは「Sheet1」のワークシートを「新しい名前」に変更します。


4. ワークシートの移動

　ワークシートをワークブック内で移動するには、Moveメソッドを使用します。このメソッドを使って、ワークシートを特定の位置に移動させることができます。

  • ワークシート移動の例:

Sub ワークシートの移動()

    Worksheets("Sheet1").Move After:=Worksheets(Worksheets.Count)

End Sub

　このコードは、「Sheet1」をワークブックの最後に移動します。


まとめ

　Excel VBAを利用することで、ワークシートの追加、削除、名前の変更、移動などの操作をプログラムから容易に実行することができます。これらの操作を自動化することで、日々の作業を大幅に効率化し、エラーのリスクを減少させることができます。

　次回は、デスクトップ上のファイルの操作について解説していきます。ぜひ、チェックしてみてください。

次回予告
・【マクロ入門#6】デスクトップ操作

いいなと思ったら応援しよう！