Create RGN.vba

Initial.