redspanna
Well-known Member
- Joined
- Jul 27, 2005
- Messages
- 1,604
- Office Version
- 365
- Platform
- Windows
Hi all
This code looks for a string value in certain column, copies the values then clears cells
can someone advise how to change the code slightly so that the
part, actually clears the values in both column A and B once required data found and copied
thanks in advance
This code looks for a string value in certain column, copies the values then clears cells
Code:
Set Mycell = Sheets("Sorted Data").Range("A:A").Find(What:="*ASDASTORESPLC*") 'salary
While Not Mycell Is Nothing
Mycell.Offset(0, 1).Copy Range("C65536").End(xlUp)(2)
Mycell.Clear
Set Mycell = Range("A:A").FindNext
Wend
can someone advise how to change the code slightly so that the
Code:
Mycell.Clear
part, actually clears the values in both column A and B once required data found and copied
thanks in advance