Есть таблица с кучей вычислений и формул, созданная для получения итогового результата-предложения для клиента в виде единственого числового значения.
Вручную итоговую табличку получаем вот таким способом:
-выделяется весь лист разом
- делаем копирование (alt+c)
- вставляем назад только цифры (alt+v)
- правой клавишей мышки выбираем режим "параметры вставки "значения" и вставляем
- выделяем все лишние столбцы и удалем.
Решил автоматизировать процесс и рекордером записал вот такой макрос:
[vba]Код
Cells.Select
Selection.Copy
ActiveSheet.Paste
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
Columns("E:AU").Select
Application.CutCopyMode = False
Selection.Delete Shift:=xlToLeft
Columns("H:J").Select
Selection.Delete Shift:=xlToLeft
End Sub
[/vba]
При выполнении макрос ругается:
"run time eror "1004":
метод Paste из класса Worksheet завершен неверно"
Чего ему не нравится то и где ошибка?!
Я если честно в этом пока ничего не понимаю, поэтому прошу местных спецов подсказать как решить эту проблему.