Страницы: 1
RSS
Автоматическая вставка колонтитулов в Excel при создании файлов
 
Подскажите, пожалуйста, как сделать чтобы при создании новой книги (любой) автоматически вставлялся колонтитул, например, путь к папке, в которой сохранен файл. Вставлять ручками через Параметры страницы каждый раз не хочется, а вот если бы это делалось по-умолчанию? Нужен макрос?
 
Возьмите за образец код личной книги макросов от ZVI:  
http://www.planetaexcel.ru/docs/forum_upload/post_37721.rar  
 
Сделайте запуск макроса безусловным, т.е. уберите в модуле ЭтаКнига две строки:  
If UCase(Wb.Name) = UCase("MyFile.xls") Then  
и  
End If  
 
Используйте такой код макроса MyMacro, вместо примера:  
 
Sub MyMacro()  
Dim sh As Worksheet  
 For Each sh In ActiveWorkbook.Sheets  
   sh.PageSetup.CenterFooter = "&Z&F"  
 Next  
End Sub
 
{quote}{login=katja.t}{date=26.02.2009 11:21}{thema=Автоматическая вставка колонтитулов в Excel при создании файлов}{post}Подскажите, пожалуйста, как сделать чтобы при создании новой книги (любой) автоматически вставлялся колонтитул, например, путь к папке, в которой сохранен файл. Вставлять ручками через Параметры страницы каждый раз не хочется, а вот если бы это делалось по-умолчанию? Нужен макрос?{/post}{/quote}  
 
создайте такой шаблон и пользуйтесь
Живи и дай жить..
Страницы: 1
Читают тему
Наверх