VB Code:
  1. oWorkSheet = oWorkBook.Worksheets.Items(3)