Skip to content

Instantly share code, notes, and snippets.

@DataSolveProblems
Created May 11, 2019 02:22
Show Gist options
  • Select an option

  • Save DataSolveProblems/62d5ce055ba79749cd1bb840188c9a70 to your computer and use it in GitHub Desktop.

Select an option

Save DataSolveProblems/62d5ce055ba79749cd1bb840188c9a70 to your computer and use it in GitHub Desktop.
Sub Find_Previous_Demo()
Dim fc As Range
Set fc = Columns("C").Find("red")
Debug.Print fc.Address
Set fc = Columns("C").FindNext(fc)
Debug.Print fc.Address
Set fc = Columns("C").FindPrevious(fc)
Debug.Print fc.Address
End Sub
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment