Макрос получился немного сложноват из-за того ,что автоматически определяется количество цифр (1-7) .если задавать длину номера ,то можно сделать проше.