2012-04-21 10 views
2

で2つの数値を追加:私は手動で入力値xとyは結果を得るためにする必要があるため私は2つの数値を追加するために、VBAコードを書いています機能

Option Explicit 

Dim x As Integer, y As Integer 
Function addtwo(x, y) 
addtwo = x + y  
End Function 

は、これは良い機能ではありません。整数や小数点のある数字に関係なく、2つの数字を扱えるように、コードを変更するにはどうすればよいですか?

+0

提供されているソリューションはあなたのために機能しますか? –

答えて

2

2つの数値を使用する限り、Integerの代わりにVariantデータ型を試してください。手動で値を入力することによって何を意味するかわからない - ワークシートからそれらを取得することについて話していますか?

+0

+1私は変種に賛成ではありませんが、この場合変種は道のりです。 :) –

3

入力変数は、FUNCTION宣言行には定義されていません。私は整数と小数点のためにvartype DOUBLEを推奨します。今、この関数としてセルに使用することができる

Function ADDTWO(ByVal x As Double,ByVal y As Double) As Double 
    ADDTWO = x + y 
End Function 

= ADDTWO(3,6)
又は
= ADDTWO(A2、B7)

それVBAでも使用できます。

もちろん、SUM()関数はこれと同じことです。だから私はこれが学習の練習であると推測します。

+0

+ 1 :)はい、理想的には、これを行うには良い方法です。しかし、それ自体の欠点があります:( –

+0

@Siddharth - 私はいつも学びます...ダブルは何の欠点を導入しますか? –

+0

このコメントボックスは十分ではありませんので、私は答えを投稿しなければなりません。それはあなたとロブと大丈夫でしょうか?:) –

関連する問題