Excel VBA質問箱 IV

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

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


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

32740 / 76734

←次へ　｜　前へ→


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

ichinose - 07/5/28(月) 7:45 -


	引用なし

	パスワード

おはようございます。

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

>Function ok(myindex As Long, Optional myaddress As String = "sheet3!L3") As Variant
>　　Application.Volatile
>　　'
>　　ok = Application.Range(myaddress).Offset(0, myindex - 1).Value
>End Function

りんさん、フォローありがとうございます。
にしても、早起きですねえ。私も普段は、同じくらい（いや、もっと早いかも）に
起きるのですが、昨日は、球技大会もあったし、寝るの遅かったし・・・。

ユニフさん、私の方法でも修正できますが、りんさんのコードで確認してください。

それとすいぶん関数や数式が多いとの事、数式の設定が沢山であれば、
Volatileを使用した例は問題があります。

これは、私とyuu1さんのやり取りでお分かりだかと思います。

まずは、問題のシートで十分に確認してみてください。
その上で、運用を決断してください。

15 hits

▼

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