copy cells if sheet 1 has text in cell a125, then paste another sheet next available row

[ssteed107]

This VBA not working please help

Sub SUMMURYTWO()
Sheets("BANKING").Select
if IsText("A125").Then("A125:E125").Copy
NextRow = Sheets("2018 SUMMURY").Range("A" & Rows.Count).End(X1UP).Row + 1
Sheets("2018 SUMMURY").Range("D" & NextRow).PasteSpecial Paste:=X1PASTEVALUES


End Sub

 

[Fluff]

this X1UP should be xlup (lower case L not 1)
same with X1PASTEVALUES