本記事には広告が含まれています

F0000049_指定した文字列をブック内で重複しないワークシート名称へ変換する

指定した文字列をブック内で重複しないワークシート名称へ変換する

この関数について

ExcelVBA(マクロ)でシート名を変更することは簡単です。シートオブジェクトを作成し、Nameプロパティを書き換えます。しかし、手動で実施するシート名の変更と同じく、すでに存在しているシート名を指定するとVBAはエラーを吐きます。この関数は文字列をブック内で重複しないシート名へ変換します。

関数コピペ ~コードをクリックするだけでコピー完了!~



使い方 ①引数

引数名参照省略内容
target_wbWorkbookByVal不可シート名の重複を判定するブックを指定する
sheet_nameStringByval不可変換するシート名

使い方 ②戻り値

状態内容
正常String指定したブック内で重複しないシート名
例外Stringもともと重複していないシート名が指定された場合、そのまま返します
エラーStringエラー処理は行いません

サンプルコード(クリックでコピー)






【結果】重複しないシート名を取得することができました

サンプルコードを実行するとイミディエイトウィンドウに重複しないシート名を出力します。例)Sheet1 ⇒ Sheet1 (1)

Comment