VB Code:
  1. Dim vTarget As range
  2. Private Sub Workbook_Open()
  3.     Set vTarget = Range(ThisWorkbook.Names("Volume"))
  4. End Sub
It wasn't that difficult after all.