Hello,
1.
make it
myVar(1) = Sheets("Shares").Range("D7") isntead of using
Array(Sheets.....

myVar(1) is a single element of an array so you need not use Array(....)
to assign the value. If you do, you will not be able to use it in
MsgBox, because MsgBox can not display arrays, it will give error Type
Mismatch.

2. It should be MsgBox myVar(k) and not MsgBox (myVar(k)). (remove
extra parantheses.)

Sharad

*** Sent via Developersdex http://www.developersdex.com ***
Don't just participate in USENET...get rewarded for it!