I'm still trying to get this to work. I added a couple more test lines that
set a value into two array positions and they do show up when I look at
vaData in my for/next loops. The only thing I can think of is the variable
declarations.
Anyways, here is my test code that I added:

vaData(1, 1) = "Hello"
vaData(1, 2) = "There"

For rwData = LBound(vaData, 1) To UBound(vaData, 1)
For coData = LBound(vaData, 2) To UBound(vaData, 2)
Data = vaData(rwData, coData)
Next
Next

Through the loop vaData(1,1) and (1,2) contains the strings but after that
everything is empty again.

I've tried rebooting and starting a new workbook with this code but nothing
seems to get it to work.

Jerry