Read only workbook unless specific user opens book

[Lion_Heart]

Is there a VBA way of setting a workbook to be read only when opened unless a specific user opens the workbook? i.e. the code checks who has opened the workbook and based on the user sets the workbook to either Read only or Full Access.

Thanks,

LH