set worksheet error

I am trying to set a worksheet to a cell value for various looping purposes but it is giving me an error everytime I try to run it. Have I written this line incorrectly?






Set RatesWorksheet = (RatesWorkbook.Sheets("Doc").Range("RateRetrievalTasks")(RatesIndex, 3).Value)


Thanks

I don't understand what your code is supposed to do. Are you trying to refer to a worksheet using a name stored in a cell?

try

Code:

---

Set RatesWorksheet = Worksheets(RatesWorkbook.Sheets("Doc").Range("RateRetrievalTasks")(RatesIndex, 3).Value)

---

I can never keep too many parens straight

So I find it easier to debug if I use intermediate variables:

Code:

---

    Dim RatesWorksheetName As String
    RatesWorksheetName = RatesWorkbook.Sheets("Doc").Range("RateRetrievalTasks").Cells(RatesIndex, 3).Value
    Set RatesWorksheet = RatesWorkbook.Sheets(RatesWorksheetName)

---

I think that was what were trying to do

Paul