VBA Програмно фиксировать ячейки Опции

[White]

Добрый вечер. Пишу небольшую программу на VBA Excel 2007. Как програмно создавать фиксированные ячейки и области? То есть, у меня есть шапка и я хочу её переносит на другой лист при нажатии на кнопку ...

Set List = Sheets.Add
On Error GoTo errh
tryagain:
sheetname = TextBox1
List.Name = sheetname
Exit Sub
errh:
If Err.Number = 1004 Then Resume tryagain

Worksheets(sheetname).Range("A1").Value = TextBox2

[White]

Спасибо. Работает

[White]

Только вот в чем проблема. В случаи если лист удалят то шапки на новом не будит. То есть. у меня есть тип материалов (ввожу с формы название и формирую листы приходная накладная (2 вида шапок из ComboBox выбирается пользователем), расходная накладная (3 вида шапок из ComboBox выбирается пользователем ), журнал и счета ). Типов материалов может быть очень много и данных в журнале тоже. По этому нужно фиксировать область с шапкой программно....