Can anyone help me define a variable as a worksheet function? It's been a while and I forget the syntax. This is along the lines but with incorrect syntax on the Random_Number variable

Sub I_Dont_Know_How()

dim Random_Number as Long
dim Rowsend as Long

rowsend = range("A" & rows.count).end(xlup).row
Random_Number = worksheetfunction(Randnumber(1, rowsend))

cells(1,Random_Number).select

End Sub