Forum Discussion

Sue's avatar
Sue
Copper Contributor
Dec 05, 2021
Solved

Transferring selected data to a new sheet and checking it is not already transferred

Hi wonderful people! I am selecting lines from a worksheet - these are lines involving donations.  I use: With Worksheets("Sheet1").Range("CPData")       Set MyEdit = .Find("k", , xlValues, xlWhol...
  • HansVogelaar's avatar
    Dec 05, 2021

    Sue 

    FindNext gets confused if you execute another Find in between the original Find and FindNext.

    Change

    Set MyEdit = .FindNext(MyEdit)
    to

    Set MyEdit = .Find("k", MyEdit, xlValues, xlWhole, xlByColumns, , True)

Resources