Hi,

I've made the following search script to search for the job no you input but atm it just selects the cell but i want to be able to select the entire row that the number is in and copy it to another sheet.

Sub FindTheNo()
Dim JobNoToFind


JobNoToFind = InputBox("Please enter the value to search for")
If JobNoToFind = "" Then Exit Sub
Sheets("Core").Select
Cells.find(What:=JobNoToFind, After:=ActiveCell, LookIn:=xlFormulas, LookAt _
:=xlWhole, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
False).Activate

' I don't know how to make it select the row the cell is in from column A to G'
ActiveRow.Copy




Sheets("CM").Select
Cells(13, 2).Select
ActiveSheet.Paste

End Sub