Excel VBA質問箱 IV

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

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


32729 / 76734 ←次へ | 前へ→

【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)
と記述します。


14 hits

【49202】独自関数作成 ユニフ 07/5/27(日) 16:08 質問
【49204】Re:独自関数作成 かみちゃん 07/5/27(日) 16:35 回答
【49206】Re:独自関数作成 yuu1 07/5/27(日) 16:45 回答
【49213】Re:独自関数作成 ichinose 07/5/27(日) 22:41 発言
【49216】Re:独自関数作成 yuu1 07/5/27(日) 23:20 回答
【49217】Re:独自関数作成 ichinose 07/5/27(日) 23:26 発言
【49218】Re:独自関数作成 yuu1 07/5/27(日) 23:44 回答
【49219】Re:独自関数作成 ichinose 07/5/28(月) 0:34 発言
【49221】Re:独自関数作成 ユニフ 07/5/28(月) 2:30 発言
【49222】試してみました ユニフ 07/5/28(月) 3:30 発言
【49223】Re:試してみました りん 07/5/28(月) 5:43 回答
【49228】Re:試してみました ichinose 07/5/28(月) 7:45 発言
【49239】Re:試してみました yuu1 07/5/28(月) 13:25 回答
【49240】再度 試してみました ユニフ 07/5/28(月) 15:46 発言
【49241】Re:再度 試してみました yuu1 07/5/28(月) 16:55 回答
【49243】うまくいってないです。 ユニフ 07/5/28(月) 18:00 発言
【49244】Re:うまくいってないです。 yuu1 07/5/28(月) 18:06 回答
【49245】うまくいきました。 ユニフ 07/5/28(月) 18:25 お礼
【49251】Re:試してみました ichinose 07/5/29(火) 8:00 発言
【49266】Re:試してみました ユニフ 07/5/29(火) 23:30 発言
【49351】xlsheetVeryHidden ユニフ 07/6/1(金) 0:25 お礼

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