You aren't using Aaron's Function correctly
![]()
Find_Range("Yes", Range("W13:W100")).EntireRow.Select Selection.Copy Worksheets("Journal").Cells(Rows.Count, 1).End(xlUp)
You aren't using Aaron's Function correctly
![]()
Find_Range("Yes", Range("W13:W100")).EntireRow.Select Selection.Copy Worksheets("Journal").Cells(Rows.Count, 1).End(xlUp)
Hope that helps.
RoyUK
--------
For Excel Tips & Solutions, free examples and tutorials why not check out my web site
Free DataBaseForm example
There are currently 1 users browsing this thread. (0 members and 1 guests)
Bookmarks