sarkocreme
New Member
- Joined
- Dec 14, 2009
- Messages
- 9
Code:
Range("A10").Select
dateselect = Selection.Text
Range("A10:B30").Select
Selection.Copy
Windows("Products.xlsx").Activate
Sheets("Year").Select
Cells.Find(What:=dateselect, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
I'm getting a "run-time error '91': Object variable or With block variable not set" and the Cells.Find part is being highlighted. What's the issue?