Hello guru's,
Currently I have something to this sort:
I would like to modify this to loop through the spreadsheet and keep finding myCell and then in turn set my range / copy / paste until nothing else is found in the sheet.
Can someone provide me with an example to do so???
Thanks in advance!
Currently I have something to this sort:
Code:
Set FoundCell = Cells.Find(what:=myCell, After:=ActiveCell, LookIn:=xlFormulas _
, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=True)
If FoundCell Is Nothing Then
'move on, do more stuff
End If
If Not FoundCell Is Nothing Then
'set my range copy and paste
Can someone provide me with an example to do so???
Thanks in advance!