- 151 名前：デフォルトの名無しさん mailto:sage [2011/12/11(日) 11:31:08.05 ]
- >>147
>という例を見かけますが、この場合 ActiveSheet が Sheet1 という保証はあるのでしょうか。
当然そんな保証はない。
「シート名は可変です。」と書いてあるが、ではソノシート名はいつどこで指定するのか？
あらかじめ指定しておくと言うなら、
Dim SheetName As String
Private Sub Setup( )
SheetName = "Sheet1"
End Sub
Private Sub Worksheet_Calculate( )
Worksheeets(SheetName).操作( )
End Sub
でいい。
Sheet1 がないケースなどがあるなら、適切なエラー処理が必要。
