Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

30073 / 76732

←次へ　｜　前へ→


	【51929】Re:ユーザー定義関数のエラー？(調査依頼)

ichinose - 07/10/12(金) 9:49 -


	引用なし

	パスワード

おはようございます。

>新たに、発見
>セルに　=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")

等として運用する

検討してみてください。

0 hits

▼

【51822】ユーザー定義関数のエラー？(調査依頼) G-Luck 07/10/6(土) 14:08