|
|
ActiveSheet.PageSetup.Zoom=False
Ø |
☑ |
|
0
vhl
01.03.05
✎
11:38
|
кто нибудь решил траблу с ActiveSheet.PageSetup.Zoom=False без макросов?
|
|
|
1
Natalia
01.03.05
✎
11:49
|
Сомневаюсь, что без макросов это вообще возможно из 1С...
|
|
|
2
vhl
01.03.05
✎
12:09
|
тогда как добавить програмно макрос?
|
|
|
3
Natalia
01.03.05
✎
12:17
|
Кусочек модуля, "посвященный" той же проблеме ))
Зн =1+ОкноЕхс.VBE.ActiveVBProject.VBComponents.Count();
ОкноЕхс.VBE.ActiveVBProject.VBComponents.Add(1);
ОкноЕхс.VBE.ActiveVBProject.VBComponents(Зн).CodeModule.InsertLines (1, "Sub Zoom(S)");
ОкноЕхс.VBE.ActiveVBProject.VBComponents(Зн).CodeModule.InsertLines (2, "Worksheets(S).PageSetup.Zoom= False");
ОкноЕхс.VBE.ActiveVBProject.VBComponents(Зн).CodeModule.InsertLines (3, "End Sub");
ОкноЕхс.Application.Run ("Zoom(1)");
Module=ОкноЕхс.VBE.ActiveVBProject.VBComponents(Зн);
ОкноЕхс.VBE.ActiveVBProject.VBComponents.Remove(Module);
|
|
|
4
vhl
01.03.05
✎
13:08
|
Такую вот фигню пишет: "Microsoft Excel: Программный доступ к проекту Visual Basic не является доверенным".
Права - администратора.В безопасности Excel стоит флажок "доверять доступ к Visual Basic Project", в чем проблема?
|
|
|
5
Natalia
01.03.05
✎
14:18
|
Сервис-Макрос-Безопасность - на закладке "Надежные издатели" - поставить флажок "Доверять доступ к Visual Basic Project", и еще выключить флажок "Notify before state loss" в меню Tools|Options|General редактора VBA
|
|
|
6
vhl
02.03.05
✎
05:21
|
Все у меня стояло - не работает :(
|
|
|
7
Natalia
02.03.05
✎
10:28
|
Тогда не знаю (( А мне эти два флажка помогли...
|
|
