Убрать все бордюры, меню и линейки в EXCEL

Программирование на Visual Basic for Applications
DOMI-NIK
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 01.09.2005 (Чт) 11:51

Убрать все бордюры, меню и линейки в EXCEL

Сообщение DOMI-NIK » 09.09.2005 (Пт) 8:44

Здравствуйте !
Появилась необходимость вывести таблицу EXCEL на весь экран, но при этом что-бы небыло кроме таблицы ничего видно больше.
Тоесть на весь экран сетка с данными и все, никаких меню, ленеек, трея винды и тд !
На весь экран только сетка!
Знающие люди подскажите, есть ли такая возможность ?

uhm
Продвинутый гуру
Продвинутый гуру
Аватара пользователя
 
Сообщения: 1597
Зарегистрирован: 02.12.2004 (Чт) 15:21

Сообщение uhm » 09.09.2005 (Пт) 8:46

Application.DisplayFullScreen = True

По-моему, это максимум того, что можно сделать :)
Быть... или не быть. Вот. В чём вопрос?

Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Сообщение Vitaly1 » 09.09.2005 (Пт) 14:29

Код: Выделить всё
With ActiveWindow
        .DisplayHeadings = False
        .DisplayHorizontalScrollBar = False
        .DisplayVerticalScrollBar = False
        .DisplayWorkbookTabs = False
    End With

Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Сообщение Vitaly1 » 09.09.2005 (Пт) 15:23

Так можно заблокировать контекстное меню на листе из модуля листа:
Код: Выделить всё
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Cancel = True
End Sub


Так можно заблокировать контекстное меню на всех листах книги из модуля книги:
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
Cancel = True
End Sub


Для блокировки главного меню, читай мою статью на www.vbstreets.ru

DOMI-NIK
Начинающий
Начинающий
 
Сообщения: 24
Зарегистрирован: 01.09.2005 (Чт) 11:51

Сообщение DOMI-NIK » 10.09.2005 (Сб) 11:07

спасиб за ответы
буду мучить :)


Вернуться в VBA

Кто сейчас на конференции

Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 13

    TopList