InstantForum.NET v4.1.4Релибhttp://www.relib.com/forums/robot@relib.comWed, 03 Dec 2008 22:06:46 GMT20http://www.relib.com/forums/Topic915405-11-1.aspxНе... Это понятно, без этого не работает... Попробовал дома на XP - модули удаляет без вопросов, строки удаляет, но ругается.... Я так понимаю это виндовые глюки :))) И ничем не спастись :))Mon, 20 Aug 2007 10:27:44 GMTTigerskinhttp://www.relib.com/forums/Topic915405-11-1.aspxТочно не знаю, но начиная с MS Excel XP - <STRONG>Серсис/Макрос/Безопасность/Надежные источники/ </STRONG>установить флажок <STRONG>Доверять доступ к Visual Basic Project</STRONG>Fri, 17 Aug 2007 22:17:06 GMTPavel55http://www.relib.com/forums/Topic915405-11-1.aspxТакой вод код:<br>Sub gh()<br>d = ActiveWorkbook.VBProject.VBComponents.Item("Module2").CodeModule.Lines(2, 1) - читает строку модуля 2 нормально<br>ActiveWorkbook.VBProject.VBComponents.Item("Module2").CodeModule.DeleteLines 2, 1 - нчего не происходит<br>ActiveWorkbook.VBProject.VBComponents.Item("Module2").CodeModule.ReplaceLine 2, "новая" - ничего не происходит<br>ActiveWorkbook.VBProject.VBComponents.Item("Module2").CodeModule.InsertLines 1, "yjdfz" - ничего не происходит<br>End Sub<br>Почему так? Может подключить чего надо?Fri, 17 Aug 2007 20:01:19 GMTTigerskin