selection, paste и изменение свойств interior - вопрос

[esmo]

Здравствуйте. Excel+VBA, вот с чем столкнулся:
1. открываю текстовый файл с разделителями

Workbooks.OpenText filename:=sTextFilename, ConsecutiveDelimiter:=True, Space:=True

и т.д.
2. выделяю и копирую оттуда диапазон

Range("C2", Range("M2").End(xlDown)).Select
Selection.Copy

3. перевожу фокус в окно рабочей книги и вставляю диапазон подряд в цикле в несколько ячеек:

For Each cell In Range("A2:L2").Cells
 cell.Select
 ActiveSheet.Paste
 Next

Так вот: если я после вставки пытаюсь изменить фон

Selection.Interior.ColorIndex = vbGreen

выдается ошибка, что Метод Paste из класса Worksheet завершен неверно.
Проверил такую операцию с помощью макрорекордера - и правда буфер опустошается после изменения свойств выделения. Как бы обойти?

[EducatedFool]

Вообще, при копировании можно (и даже нужно) обойтись без использования объекта Selection.

Я бы привёл пример кода, но не совсем понял, что должно получиться в результате.
Судя по коду, вы копируете некий диапазон ячеек, и несколько раз подряд вставляете его на лист - каждый раз начиная вставку на одну ячейку правее.
Таким образом, в результате вставки получается диапазон, в котором первый столбец повторяется много раз, а все остальные столбцы остаются в единственном экземпляре.
Я правильно понял суть макроса?
Покажите пример того, что должно получится в результате копирования, и пример импортируемого файла sTextFilename - тогда получите более простой вариант кода.

[SAS888]

Скопированный диапазон можно вставлять несколько раз подряд. Но если между операциями вставки выполнить какую-либо процедуру (например, Selection.Interior.ColorIndex = vbGreen), то дальнейшая вставка будет невозможна, т.к. Excel выйдет из режима CutCopyMode. Т.е. исходный диапазон потребуется копировать вновь.
Есть два пути: либо сначала вставлять, затем окрашивать ячейки, либо в цикле копировать - вставлять - окрашивать.
EducatedFool абсолютно прав. Приведите пример того, что Вы хотите получить. Требуемый код будет более рациональный.