syntax qustion

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

x taol - 21 Jan 2007 22:31 GMT

Sub Button1_Click()
Dim xVar(1 To 4, 1 To 3)
For k = 1 To 4
ax = k + 1: bx = k + 2: cx = k + 5
xVar(k) = Array(ax, bx, cx)' error
Next
[a2:c5].Value = xVar
End Sub

this code figure out error.
i want to work fast performance. and thus,
i want to run without for loop.

xVar(k,1 to 3) = Array(ax, bx, cx)
or
xVar(k,1:3) = Array(ax, bx, cx)

how can i syntax?????

Reply to this Message

Tom Ogilvy - 22 Jan 2007 00:17 GMT

you can't put your values in using that method.

Sub Button1_Click()
Dim xVar(1 To 4, 1 To 3)
For k = 1 To 4
xVar(k,1) = k + 1
xVar(k,2) = k + 2
xVar(k,3) = k + 5
Next
[a2:c5].Value = xVar
End Sub

Signature

Regards,
Tom Ogilvy

> Sub Button1_Click()
> Dim xVar(1 To 4, 1 To 3)
[quoted text clipped - 16 lines]
>
> *** Sent via Developersdex http://www.developersdex.com ***

Reply to this Message