Excel2010実務では、ワークシートの名前を、ブック名(ファイル名)と同じにしたいということがあります。ワークシート名をブック名と同じにすることがよくあるのなら、マクロを作成しておくと便利です。Applications)で、アクティブなシートの名前を、ブックと同じ名前にするマクロを作成しましたので、ご紹介しておきます。"ブック名と同じ名前のシートが既に存在しているので、シート名を変更できません。"』のエラーが発生しました。Sub「ActiveWorkbook.Name」で、アクティブなブックの名前を取得できます。ActiveWorkbookのNameプロパティで取得できるブック名は、拡張子の含まれたものになります。ブック名をシート名にしたいという場合、拡張子は不要というケースのほうが多いと思いますので、拡張子を削除する処理が必要です。".")「.」の1つ左の文字までの文字列をアクティブシートの名前にしています。ActiveWorkbook.Name」とすればいいでしょう。ERR_HANDL」して「ERR_HANDL:」でエラー処理を行っています。ありがちな、既に同じ名前のシートが存在している場合には「ブック名と同じ名前のシートが既に存在しているので、シート名を変更できません。」というメッセージを表示します。その他のエラーについては「エラー番号『Err.Number』のエラーが発生しました。」というメッセージを表示させていますので、必要であれば「Err.Number」とエラーの内容を調べてCase文を追加していただくといいでしょう。シート名をブック名と同じにするマクロNewer:独学で学んだマクロの知識が整理された。Officeの使い方などを紹介し続け(2012年頃からはVBA関連記事が多め)、毎日5万人の方にご覧いただいています。