[[20091130105020]]　『シートの名前について』（まー）　ページの最後に飛ぶ

『シートの名前について』（まー）
お世話になっています。
マスターシートをシートを追加して名前をコンボボックスの値にしていきたいのですが、コンボボックスの値は１月～１２月となっています。
この表は月に何回か作成することも考えられるので、例えば１２月でしたらはじめに作成したもののシートＮＡＭＥが１２月、次が１２月（２）・・・となるようにしたいのです。

全てのシートの名前を検索？して新しいシートの名前が存在する場合には・・・
という構文になるのでしょうか？
同じ名前がある場合のエラー処理を教えてください。

Sheets("マスタ").Copy After:=Sheets(1)

   Sheets(1).Name = Me.ComboBox2.Value

 なかなか回答がつかないですね
 もうすこしプロシージャ内のコードの全体像が見えると回答しやすいのだと思いますが
 ヒントを。
 既存のワークシートをループしてコンボボックスの名前と一致するものがあった場合に
 最後に「(?)」がなければ(2)を追加、｢(?)｣があれば？を＋１するようにすれば
 出来ると思います。
 （ｍｏｍｏ）

コメント返信：

[ 一覧(最新更新順) ]

[[20091130105020]] 『シートの名前について』（まー） ページの最後に飛ぶ

[[20091130105020]]　『シートの名前について』（まー）　ページの最後に飛ぶ