|
>Dim s As Byte, g As Byte, a As Byte
Byteは数値用としては普通は使いません。Integer型が良いです。
>x(13000, 5, 3) As Variant, y(13000, 5, 3) As Variant,
>xy(13000, 5, 3) As Variant
>xmax(50, 5, 3) As Variant, ymax(50, 5, 3) As Variant,
>xymax(50, 5, 3) As Variant
↑の中には数値以外のデータが入る事があるのですか?
数値だけならSingleとかDoubleとかの数値型で宣言した方が良いです。
>セル範囲を取り込む方法で、個々のセルの値を選択して計算することは出来るんですか?
>>Dim vntCell As Variant
>>vntCell = Worksheets("Sheet1").Range("A1:C50005").Value
これで取り込んでおけば
> y(n, g, a) = 〜 + b21 * Cells(n + 4, a).Value + b22 * Cells(n + 5, a).Value)
↓
y(n, g, a) = 〜 + b21 * vntCell(n + 4, a).Value + b22 * vntCell(n + 5, a).Value)
|
|