| |
テンプレートのSheet(1)に作成したものを
別の特定のブックに、次々に"BN"という変数の
名前を付けて保存していきたいと思っています。
"BN"の取得は作成中のSheet(1)内の特定のセルから取得します。
その名前が重複する場合、同じシート名では保存ができません。
同じシート名だと、保存できませんよ。というメッセージが出たら
"BN"その１
"BN"その２
"BN"その３
・・・のように、対応を変えていく方法はありますでしょうか？
エラーハンドリング？ってそれでしょうか？
For L = Start_cell To end_cell Step 1
counter = counter + 1
Windows(register).Activate
Sheets(sheet_thismonth).Select
Range("C" & L).Select
BN = ActiveCell.Value
Windows(template).Activate
Worksheets(sheet_payment_temp).Range("B11").Value = BN
'シートに名前を付ける
Windows("テンプレート.xls").Activate
Sheets(sheet_1).Select
Sheets(sheet_1).Copy Before:=Workbooks(save_name).Sheets(1)
Sheets(sheet_1).Select
Sheets(sheet_1).Name = BN ※ここで、同じ値が入るとエラーがでます。
BN = 0
Next L
すみません、わかりにくい説明かもしれません。
情報がたりなければ、言ってください。
よろしくお願いします。
|
|
![[未読]](./data/excel/image/read_icon.gif){kind=icon}
