Код в шаблоне

[Trimbl]

Здравствуйте форумчане!
В книге Excel-2007 есть листы- шаблоны «ШМЧ» и«ШПОР», , макросом используя шаблоны, создаются листы «МЧ» и «ПОР» .
При пересчете формулы на листе МЧ([i27]) должен срабатывать цикл копирования и последующей вставки диапазона ячеек на листе «ПОР» с количеством проходов равном значению
Ячейки [i27] листа «МЧ» округленное (ОКРВВЕРХ).
Если нижеприведенный код поместить в модуль листа МЧ то – как-бы все работает, а вот через шаблон, ругается на строки Sheets("ПОР").Select и gЦикл = Sheets("МЧ").[i27]
Код:
Private Sub Worksheet_Calculate()
If [i27] > 1 Then
Dim i As Long
Sheets("ПОР").Select
gЦикл = Sheets("МЧ").[i27]
For g = 1 To gЦикл
i = Cells(Rows.Count, 1).End(xlUp).Row
Range(Cells(i - 3, 1), Cells(i, 5)).Copy Cells(i + 1, 1)
Next
End If
End Sub

Спасибо за внимание.

[Trimbl]

Уважаемые профи!
В моем вопросе ошибка всплывает в результате того,что листов "ЧМ" и "ПОР" на момент выполнения кода не существует в книге?
Использовать код рабочего листа полученного посредством шаблона, это недопустимо? Где можно подсмотреть что-то подобное?