|
おはようございます。
>新たに、発見
>セルに =Sheet1!mm と入力するとに =Book.xls!mm に
>=Book1.xls!mm と入力すると =Sheet2!mm 書き変わる。
>
>>シート別の名前なら、
>>
>>Worksheets("sheet2").Names("mm").RefersToRange
>>
>>や
>>
>>ThisWorkbook.Names("Sheet2!mm").RefersToRange
>>
>>というようにシート名からの指定ではっきり指定すると言う方法では
>>いけないのですか?
>
>Book全体のmmを持ちつつ使い分けたいと考えていたのです。(あっしの思想的に)
>VBA上で ThisWorkbook.Names("Book1.xls!mm").RefersToRange
>というのもうまくいかないようですし。
>名前を変えて運用しますかね〜
独自の名前関数を作るのは? いかがですか!!
一例ですが、標準モジュールに
'===================================================
Function myname(nm As String)
myname = Names(nm).RefersToRange.Value
End Function
として、
シートでは
=myname("mm")
とか
=myname("sheet2!mm")
等として運用する
検討してみてください。
|
|