Would you like to give me any idea of VBA code to read out properties of active sheet object