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")

等として運用する

検討してみてください。
3 hits

【51822】ユーザー定義関数のエラー?(調査依頼) G-Luck 07/10/6(土) 14:08 発言
【51834】Re:ユーザー定義関数のエラー?(調査依頼) ichinose 07/10/6(土) 19:55 発言
【51912】Re:ユーザー定義関数のエラー?(調査依頼) G-Luck 07/10/10(水) 23:14 発言
【51929】Re:ユーザー定義関数のエラー?(調査依頼) ichinose 07/10/12(金) 9:49 発言
【52007】Re:ユーザー定義関数のエラー?(調査依頼) G-Luck 07/10/16(火) 8:15 発言
【52008】Re:ユーザー定義関数のエラー?(調査依頼) ichinose 07/10/16(火) 8:38 発言
【52010】Re:ユーザー定義関数のエラー?(調査依頼) ichinose 07/10/16(火) 9:20 発言
【52012】Re:ユーザー定義関数のエラー?(調査依頼) G-Luck 07/10/16(火) 10:15 お礼

30073 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free