use vba to CtrlF from clipboard

[himperson1]

hello all. i am trying to filter out some duplicate data on my worksheet by copying a "uniqueness identifier" within the last cell of the worksheet and then pasting that into the CtrlF function of excel on a separate worksheet. here's what i've got so far but i am getting an error 424 "object required" when i reach the find function in the code. what am i missing?

    Dim DataObj As MSForms.DataObject
    Set DataObj = New MSForms.DataObject
    DataObj.GetFromClipboard


    Sheets("YTD").Select
    Range("A1").Select
    Selection.End(xlDown).Select
    Selection.End(xlToRight).Select
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1.Copy
    Sheets("Instructions For Use (2)").Select
    Range("A1").Select
    Cells.Find(What:=objData.GetText, After:=ActiveCell, LookIn:= _
        xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
        xlNext, MatchCase:=False, SearchFormat:=False).Activate
    ActiveCell.EntireRow.Select

 

[Yongle]

Try qualifying Cells with sheet

    [COLOR=#ff0000]ActiveSheet[/COLOR].Cells.Find("X").Activate

 

[Norie]

Whatever you are looking for probably isn't being found.

As well as specifying the correct sheet to search on you could use something like this to avoid errors.

Dim DataObj As MSForms.DataObject
Dim rngFnd As Range
 
    Set DataObj = New MSForms.DataObject
    DataObj.GetFromClipboard
    
    
    Sheets("YTD").Select
    Range("A1").Select
    Selection.End(xlDown).Select
    Selection.End(xlToRight).Select
    Application.CutCopyMode = False
    ActiveCell.FormulaR1C1.Copy
    
    With Sheets("Instructions For Use (2)")
        Set rngFnd = Cells.Find(What:=objData.GetText, After:=.Range("A1"), LookIn:= _
        xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
        xlNext, MatchCase:=False, SearchFormat:=False)
    End With
    
    If Not rngFnd Is Nothing Then
        Application.Goto rngFnd.EntireRow, True
    End If

By the way, why are you using the clipboard? Couldn't you put the value from the 'YTD' sheet into a variable and search for that?

 

[himperson1]

By the way, why are you using the clipboard? Couldn't you put the value from the 'YTD' sheet into a variable and search for that?

i ended up going this route and my new code works fantastically. thanks for the idea.