PDA

View Full Version : set worksheet error



rlsublime
11-22-2013, 02:22 PM
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

Aflatoon
11-22-2013, 04:14 PM
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?

mancubus
11-22-2013, 04:17 PM
try


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

Paul_Hossler
11-22-2013, 05:46 PM
I can never keep too many parens straight

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



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