Excel VBA質問箱 IV

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

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


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

32802 / 76807

←次へ　｜　前へ→


	【49239】Re:試してみました

yuu1 - 07/5/28(月) 13:25 -


	引用なし

	パスワード

こんにちは。

>=ok(1)は順調です。例で言うとsheet3!l3の内容が出てきます。
>が=ok(2)は0が返りました。すいません私の例示が間違っていました。
>この場合=OK(2)にするとsheet3!M3、=OK(3)にするとsheet3!N3、の値を引っ張って欲しいです。自分でoffsetをいじってみましたが、駄目でした。

隠しシートを使っている事をわからないようにして
且つ、Volatileメソッドを用いない方法を考えてみました。

名前を使います。
一例として、Sheet3の L3:N3 に lmn と名前を付けます。
名前を見られたくなければ非表示にします。

マクロでは以下。
　ActiveWorkbook.Names.Add(Name:="lmn", RefersTo:="=Sheet3!$L$3:$N$3").Visible = False

ユーザー関数は以下。
Function koi(xx As Long, rg As Range)
　koi = rg(xx)
End Function

セルに、
=koi(1,lmn)
=koi(2,lmn)
=koi(3,lmn)
と記述します。

0 hits

▼

【49202】独自関数作成 ユニフ 07/5/27(日) 16:08