Copy multiple columns from one sheet to another

Good Day

I have this Asset Sheet whereby I capture all computer Assets. After some time these computers need to be written off and copied onto another sheet.

This is the code that I am using to copy from Sheet4 to Sheet7.

HTML Code: 

The above code fine a record is highlighted from the list and then copied to Sheet7. However if I search a record (ALB TAG) and then try moving the selected record to Sheet7 the above selects
the first record which is incorrect.

I have attached my sheet

When you try to open a file:
"Office File Validation detected a problem while trying to open this file. Opening it may be dangerous"
?

I have checked file and no problems with it.. Bear in mind that the file has macros in it