Many thanks for this. I have manipulated the code for my purposes, but
am coming up with "cant assign to array" at the following line in the
code:

arrRegionCosts = ws.Range("DB2:DB35").Value

Have not been able to get around this one.