Как с помощью макроса менять местами выделенные ячейки вместе с форматированием

[Бали]

Здравствуйте!
Стоит задача с помощью макроса поменять местами выделенные ячейки вместе с форматированием. Есть справочник поставщиков на основании которого формируется заявка. Возникает необходимость менять приоритеты поставщиков. Приоритеты выделены цветом заливки (что бы не забыть кто основной, а кто альтернативный). Хотелось бы реализовать кнопку с макросом "поменять поставщика" местами и еще одну кнопку "поставщики по умолчанию" возвращающую все в исходное положение. Позиций в справочнике более 1000, запомнить где что поменял невозможно.

[kuklp]

Ячейки меняются по двойному клику на них. По поводу "поставщики по умолчанию" - скопируйте весь лист. Можете его скрыть, можете записать это рекордером. Самый простой и надежный способ. "Позиций в справочнике более 1000" и все равно ведь надо запомнить где что.

[Бали]

кнопка цитирования не для ответа

Спасибо большое за помощь. Этот код работает на первом листе в справочнике, а если я его применяю на втором листе в заявке, он работает, но убивает формулы при первой замене прописывая в ячейках значения. Есть возможность чтоб формулы сохранялись и была возможность поменять поставщика в заявке? В графе количество вводим цифру, формулы подтягивают из справочника наименование поставщика и вариант его замены, если у основного эта позиция в стопе. Чтобы не лезть в справочник, искать эту позицию, менять там поставщика, потом менять обратно, было бы неплохо иметь такой инструмент в заявке. Я понимаю, что это уже новая задача, но она пришла в голову по мере работы.

[kuklp]

Нет. В ячейке одновременно может быть либо формула, либо значение.

[Бали]

Ок. В любом случае спасибо.