Es geht auch so:

Dim Address As Word
Dim H_Address As Byte At Address Overlay
Dim L_Address As Byte At Address+1 Overlay