Twin
Registered User.
- Local time
- Today, 08:44
- Joined
- May 19, 2000
- Messages
- 26
Hi
could someone tell me what does this do
by the way this question is also posted in the Excel section since it is from the spreadsheet)
Dim data2(500, 20)
count2 = 0
Sheets("volume").Select
For w = 6 To 500
If Cells(w, 4) = "" Then GoTo 30
count2 = count2 + 1
data2(count2, 1) = Cells(w, 4)
For x = 2 To 13
data2(count2, x) = Cells(w, x +4)
Next x
Next w
I know pretty much what does the first part does untill GoTo 30, but the data2 segment is confusing me. Does it copies the range of data2 into the cells of the column 4?
Thanx a lot in advance.
Twin
could someone tell me what does this do
Dim data2(500, 20)
count2 = 0
Sheets("volume").Select
For w = 6 To 500
If Cells(w, 4) = "" Then GoTo 30
count2 = count2 + 1
data2(count2, 1) = Cells(w, 4)
For x = 2 To 13
data2(count2, x) = Cells(w, x +4)
Next x
Next w
I know pretty much what does the first part does untill GoTo 30, but the data2 segment is confusing me. Does it copies the range of data2 into the cells of the column 4?
Thanx a lot in advance.
Twin
