VBA find - Cells.Find(What =

På faneblad "forside" i B2 har jeg et nummer.
På faneblad "data" skal jeg finde den række dette nummer står i.

Den vil ikke helt godtage dette:
What = Sheets("forside").Range("B2")
Hvad gør jeg fejl?
Fx What = "2345" virker fint, så der er noget galt med min reference til "forside"


Private Sub cmdDato1_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("data")

iRow = ws.Cells.Find(What = Sheets("forside").Range("B2"), SearchOrder:=xlRows, _
    SearchDirection:=xlPrevious, LookIn:=xlValues).Row