.... or more simply
Dim myArray
myArray = Range("A1:A100")
--
HTH
Bob Phillips
... looking out across Poole Harbour to the Purbecks
(remove nothere from the email address if mailing direct)
"TonyM" wrote in message
...
Try this:-
**********************
Option Explicit
Option Base 1
Sub fillArray()
Dim arrayToFill(100) As Variant
Dim i As Long
For i = 1 To 100
arrayToFill(i) = Me.Range("A" & i)
Next
End Sub
******************
hth, TonyM
-----Original Message-----
hello,
I want to assign about 100 variables, i want to do this
in an array.
These varables are found in cells a1 to a100. Not all
cells are full.
Does anybody has some sample code?
Regards,
Niek
---
Message posted from http://www.ExcelForum.com/
.