"Compile error: Method or data member not found", code needs fix
Code:
it says the part of code causing the error is the end of the 'cell.offset' part, as highlighed:
If Sheet6.Range("O8").Value = 4 Then For Each cell In Sheet10.Range("B5", "B369") If (cell.Value = Sheet6.Range("L24").Value) Then cell.Offset(0, Sheet6.Range("L21").Value).Value = Sheet1.ActiveCell.Value End If Next cell End If
Sheet1.ActiveCell.Value
i tried replacing it with '.Selection', still get the same error.
any one got the magic solution?
Last edited by cheeky; 03-29-2007 at 07:35 PM.
Hello Cheeky,
ActiveCell is not a Worksheet object, but a global Application object. As such it doesn't require you to qualify it with a parent object, i.e. Worksheet name. Excel will take the ActiveCell from the ActiveSheet. If you need "Sheet1" active then you need to place that in the code. I have done so for you and made it comment. You can remove the single quote if you need "Sheet1" active.
Sincerely,If Sheet6.Range("O8").Value = 4 Then For Each cell In Sheet10.Range("B5", "B369") If (cell.Value = Sheet6.Range("L24").Value) Then 'Sheet1.Activate cell.Offset(0, Sheet6.Range("L21").Value).Value = ActiveCell.Value End If Next cell End If
Leith Ross
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks