Probleme beim Einlesen mit Get

Sub test()
Dim Dat, Satz, FF
Dat = "H:\bereich2www.xls"
FF = FreeFile
Open Dat For Binary As #FF
Satz = Space$(LOF(FF))
Get #FF, , Satz
Close #FF
End Sub

Bei "Get #FF, , Satz" kommt Laufzeitfehler 458,
Variable verwendet einen in Visual Basic nicht unterstützten Typ der Automatisierung
Wenn ich aber nach den Worten:
open binary lof get
google, sehe ich sehr ähnlichen Code öfters.
Was übersehe ich?
Danke ^ Gruß
Reinhard