Копирование формул, макросов, заголовков .. но не данных

Question

Я создал бухгалтерские таблицы на 2013 год. Я хочу, чтобы все копировалось для работы в 2014 году, но мне не нужны данные.

Я полагаю, я мог бы пройти все и убедиться, что это Защищено, затем скопировать, затем удалить все?

Если я сохраню файл 2013 года в качестве шаблона, он также сохранит введенные данные? Если я создаю новую книгу из существующей книги, копирует ли она все? или просто защищенный материал.

Answer 1

Если вы сделаете копию рабочей книги и запустите этот небольшой макрос:

Sub DataCleaner()
For Each s In Sheets
    s.Activate
    For Each r In ActiveSheet.UsedRange
        v = r.Value
        If (Not r.HasFormula) And IsNumeric(r) Then
            r.ClearContents
        End If
    Next r
Next s
End Sub

все числовые данные в рабочих таблицах будут удалены.