Галактика в вопросах и ответах

Semi-bit писал(а):Ну, SLK позволяет изменить параметр названия генератора этого самого слк, отсюда можно плясать...
Например,
ID;PWXL;N;E
можно заменить на
ID;PSLKMEGATOOL;N;E
а шаблон или надстройка будет сначала читать поступившие slk в сыром режиме, и в зависимости от наличия метки делать свою "грязную" работу
C RTF ещё проще такое сделать, благо он поддерживает переменные Ворда.

spark писал(а):Ничего не понял, но чувствую что очень нужная мне весчЪ! =)

RAJAH писал(а):

spark писал(а):Ничего не понял, но чувствую что очень нужная мне весчЪ! =)

http://www.youtube.com/watch?v=lavMXK7AuXA

Semi-bit писал(а):Хм, не знаю, каким боком сюда затесался Семён Фарада, дома ссылку посмотрю (на работе нормального инета нету, а тот что есть, тает с неимоверной скоростью)...

spark, надо ваш документик открыть, и заменить в нём самую первую строку вышеописанным способом. Потом можно этот файл скомпилировать випом. Затем сделайте шаблон xlt (или xltm, если у вас Excel 2007) . В шаблоне сделайте макрос и настройте его так, чтобы он запускался при открытии рабочей книги. В макросе уже можно сделать проверку на наличие вашей пометки.
Я вместо шаблонов предпочитаю делать общие надстройки Office средствами VSTO, потому что её достаточно просто установить на произвольный компьютер, и не надо заморачиваться со способом отлова события открытия документа.

1. Создать общую надстройку;
2. Выбрать Excel на вкладке "Приложения" мастера создания надстройки;
3. Добавить ссылки на сборки Microsoft.Office.Interop.Excel, System.Windows.Forms;
4. Поместить такой код в обработчик Connect:

   Код: Выделить всё

   using XL = Microsoft.Office.Interop.Excel;
   using System.Windows.Forms;
   using System.IO;
   
   public Connect()
   {
       XL.Application app = new XL.Application();
       app.WorkbookOpen += new XL.AppEvents_WorkbookOpenEventHandler(app_WorkbookOpen);
   }

void app_WorkbookOpen(XL.Workbook Wb)
{
    if (Wb.FileFormat == XL.XlFileFormat.xlSYLK)
    {
        StreamReader sr = new StreamReader(Wb.FullName);
        string header = sr.ReadLine();
        sr.Close();
        if (header.Contains("SLKMEGATOOL"))
        {
            MessageBox.Show("Открыта нужная книга!");
            XL.Worksheet activeSheet = Wb.ActiveSheet;
            activeSheet.PageSetup.LeftMargin = Wb.Application.InchesToPoints(0.25);
            activeSheet.PageSetup.RightMargin = Wb.Application.InchesToPoints(0.25);
            activeSheet.PageSetup.TopMargin = Wb.Application.InchesToPoints(0.75);
            activeSheet.PageSetup.BottomMargin = Wb.Application.InchesToPoints(0.75);
            activeSheet.PageSetup.HeaderMargin = Wb.Application.InchesToPoints(0.3);
            activeSheet.PageSetup.FooterMargin = Wb.Application.InchesToPoints(0.3);
        }
    }
}