Excel VBA質問箱 IV

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

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


759 / 13645 ツリー ←次へ | 前へ→

【78500】FunctionからFunctionを呼び出すには M.E 16/10/16(日) 16:02 質問[未読]
【78501】Re:FunctionからFunctionを呼び出すには β 16/10/16(日) 17:01 発言[未読]
【78502】Re:FunctionからFunctionを呼び出すには M.E 16/10/16(日) 17:33 お礼[未読]

【78500】FunctionからFunctionを呼び出すには
質問  M.E  - 16/10/16(日) 16:02 -

引用なし
パスワード
   初めて質問させていただきます。

例えば以下のようなことを行いたいとします。
(Functionを呼び出さなくても出来ることは、理解していますが、例として)

 Function結果(入力値 as single)

  Function 10倍を呼び出して、入力値を10倍にする

  結果= 入力値を10倍にした値

 End Function

 ---------------------------------------------------

 Function 10倍(入力値 as single)

  10倍 = 10*入力値

 End Function

・Fanction結果の入力値から数字を入力(数字が入力されているCellを指定)
・Function10倍に入力値を渡し、数字を10倍
・Fanction結果の戻り値としてエクセルのCellへ結果を戻す

Function結果をユーザー定義から自作関数として使用したいと考えております。
Function 10倍も単独で自作関数として使用したいと考えております。

Callなど使って、自分で組んでみたのですが、記述の仕方が間違っているらしく
上手く機能してくれません。


ご助言いただければ幸いに存じます。
よろしくお願い申し上げます。

【78501】Re:FunctionからFunctionを呼び出すには
発言  β  - 16/10/16(日) 17:01 -

引用なし
パスワード
   ▼M.E さん:

こんな感じですかね。

Function 結果(入力値 As Double) As Double
  結果 = 十倍(入力値)
End Function

Function 十倍(入力値 As Double) As Double
  十倍 = 入力値 * 10
End Function

なお、変数の名前(含むプロシジャ名)には、命名ルールがあります。
数字で始まるものはNGです。

【78502】Re:FunctionからFunctionを呼び出すには
お礼  M.E  - 16/10/16(日) 17:33 -

引用なし
パスワード
   ▼β さん:
>変数の名前(含むプロシジャ名)には、命名ルールがあります。
>数字で始まるものはNGです。

早速のご返答、ありがとうございます。


2〜3日前からVBAに興味を持ち、ネットで調べながら独学を始めましたが、
「命名ルール」があることを見付けることが出来ませんでした。

β様のコメントのおかげで、一歩前に進めます。
頂いたアドバイスを元に、自分で作っているマクロを調整してみます。
(β様に記述いただいたものをmoduleへコピーして動作も試してみました。)

何度も、何度も壁にぶつかると思います。
その際には、また、この質問箱を頼らせていただこうと思います。

今後とも、どうぞよろしくお願い申し上げます。

本当に、ありがとうございました。

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