Return an array of worksheet names

This formula returns an array of worksheet names in the active workbook "=RIGHT(GET>WORKBOOK(1),LEN(GET.WORKBOOK(1))-FIND("1",GETWORKBOOK(1)))).