Excel VBA質問箱 IV

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

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


31394 / 76738 ←次へ | 前へ→

【50595】Re:function()の扱い方
お礼  ken  - 07/8/3(金) 15:39 -

引用なし
パスワード
   ▼ichinose さん:
ありがとうございます。本当に助かりました。
ご丁寧にプログラムのソースまでありがとうございます。
>▼ken さん:
>こんにちは。
>>sub()からfunction()にaとb引数を渡します。
>>例 a=10 とb=100
>>そしてfunction()で
>>c=a+b と d=a*bの処理を行います。
>>そしてfunction()からsub()に値を返すのですが、
>>一つの変数しか返すことができません。
>>
>>配列などを使うことでfunction()で処理した数値の値をsub()に
>>返すことはできないでしょうか?
>
>この事例だと配列で返す方法がよいですね。
>
>例
>'================================================
>Sub main()
>  Dim a As Variant
>  Dim b As Variant
>  Dim ans As Variant
>  a = 10
>  b = 100
>  ans = func_samp(a, b)
>  MsgBox "和  " & ans(1) & vbCrLf & "積  " & ans(2)
>End Sub
>'======================================================================
>Function func_samp(ByVal a As Variant, ByVal b As Variant) As Variant
>  Dim calc(1 To 2) As Variant
>  calc(1) = a + b
>  calc(2) = a * b
>  func_samp = calc()
>  Erase calc()
>End Function
>
>
>呼び出し先から、値を返す方法は他にもありますから、
>ケースバイケースですよ!!

0 hits

【50591】function()の扱い方 ken 07/8/3(金) 12:17 質問
【50592】Re:function()の扱い方 ichinose 07/8/3(金) 12:34 発言
【50595】Re:function()の扱い方 ken 07/8/3(金) 15:39 お礼
【50594】Re:function()の扱い方 ひげくま 07/8/3(金) 14:30 回答
【50596】Re:function()の扱い方 ken 07/8/3(金) 15:41 お礼

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