Whenever I run this macro, I'm told that the select method of the range class failed. I know I'm missing something obvious. What I'm really trying to do is select the range just below this cell, like this:
Thank you in advance.
Jason
Code
Sub pastedata()
Dim timecell, exchcell, productcell, MMMYYcell, BScell, AvgPricecell, FilledQtycell As Range
Dim sheetname As String
Dim wsnum As Integer
Dim cell As Range
Dim cell2 As Range
Dim cell3 As Range
wsnum = Worksheets.Count - 1
With Worksheets(wsnum).Range("a9:az9")
Set cell = .Find(what:="Ord Time")
End With
cell.Offset(-1, 0).Select
End Sub
Display More