VBAの一つのプログラムから何かの計算のために別のプログラムを呼び出す場合、計算する値が一つだけなら単にFunctionを呼び出せば良いです。しかし計算結果が複数の値の場合、Functionでは一つしか返せませんので、配列に値を入れて返して貰う必要があります。
Sub 呼ぶ側()
Dim a(2)
Call 配列(a)
Cells(1, 1) = a(1)
Cells(2, 1) = a(2)
End Sub
Sub 呼ばれる側(b)
b(1) = 1
b(2) = 10
End Sub
呼ぶ側でまず配列を用意してその名前を渡します。C流に言えばアドレスを渡しています。
呼ばれた側で計算した結果をその配列に代入すると、呼んだ側が用意した配列に値が入っています。
短期解約対策の期間拘束に関する各社の主張、ドコモは30カ月で楽天モバイルは最長1年
-
総務省は、「利用者視点を踏まえたモバイル市場の検証に関する専門委員会(第6回)」を開催した。
利用者視点を踏まえたモバイル市場の検証に関する専門委員会(第6回)配布資料・議事録 会議の議題には、通信事業者が新規契約者に対...

0 件のコメント:
コメントを投稿