Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Показать листы надстройки, для внесения данных - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_, DrMini  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Показать листы надстройки, для внесения данных (Иное/Other)
Показать листы надстройки, для внесения данных
vlasssov71 Дата: Четверг, 30.10.2014, 14:56 | Сообщение № 1
Группа: Заблокированные
Ранг: Новичок
Сообщений: 16
Репутация: -5 ±
Замечаний: 40% ±

Excel 2007
Есть надстройка xlam, которая загружается из папки Addin. В ней есть три листа (Worksheet)
Как можно отобразить эти листы, для ввода в них информации. Тут подойдет способ и с помощью макроса и вручную.
 
Ответить
СообщениеЕсть надстройка xlam, которая загружается из папки Addin. В ней есть три листа (Worksheet)
Как можно отобразить эти листы, для ввода в них информации. Тут подойдет способ и с помощью макроса и вручную.
Автор - vlasssov71
Дата добавления - 30.10.2014 в 14:56
Alex_ST Дата: Четверг, 30.10.2014, 15:43 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3219
Репутация: 622 ±
Замечаний: 0% ±

2003
Пока файл - надстройка его листы видимыми сделать нельзя.
Но обращаться к ячейкам его листов с использованием VBA никто не запрещает.
Выполните в модуле любого из листов надстройки по очереди:[vba]
Код
Sub test_Write()
     [A1] = "test"
End Sub

Sub test_Read()
     MsgBox [A1]
End Sub
[/vba]и убедитесь в этом сами


С уважением,
Алексей
MS Excel 2003 - the best!!!

Сообщение отредактировал Alex_ST - Четверг, 30.10.2014, 15:46
 
Ответить
СообщениеПока файл - надстройка его листы видимыми сделать нельзя.
Но обращаться к ячейкам его листов с использованием VBA никто не запрещает.
Выполните в модуле любого из листов надстройки по очереди:[vba]
Код
Sub test_Write()
     [A1] = "test"
End Sub

Sub test_Read()
     MsgBox [A1]
End Sub
[/vba]и убедитесь в этом сами
Автор - Alex_ST
Дата добавления - 30.10.2014 в 15:43
vlasssov71 Дата: Пятница, 31.10.2014, 09:40 | Сообщение № 3
Группа: Заблокированные
Ранг: Новичок
Сообщений: 16
Репутация: -5 ±
Замечаний: 40% ±

Excel 2007
Хреново...
 
Ответить
СообщениеХреново...
Автор - vlasssov71
Дата добавления - 31.10.2014 в 09:40
Саня Дата: Пятница, 31.10.2014, 10:40 | Сообщение № 4
Группа: Друзья
Ранг: Ветеран
Сообщений: 1068
Репутация: 560 ±
Замечаний: 0% ±

XL 2016
заходим в VBE (Alt+F11)

находим эту надстройку в Project Explorer (Ctrl+R, если его нет)

выделяем в ее проекте модуль "ЭтаКнига"

F4

св-во IsAddin = True -> False

после этого листы надстройки отобразятся

не забудь потом вернуть св-во назад
 
Ответить
Сообщениезаходим в VBE (Alt+F11)

находим эту надстройку в Project Explorer (Ctrl+R, если его нет)

выделяем в ее проекте модуль "ЭтаКнига"

F4

св-во IsAddin = True -> False

после этого листы надстройки отобразятся

не забудь потом вернуть св-во назад
Автор - Саня
Дата добавления - 31.10.2014 в 10:40
Hugo Дата: Пятница, 31.10.2014, 14:43 | Сообщение № 5
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3854
Репутация: 814 ±
Замечаний: 0% ±

365
У меня вот так в форме этой надстройки написано:
[vba]
Код
Private Sub CheckBox1_Click()
On Error Resume Next
ThisWorkbook.IsAddin = Not CheckBox1
On Error GoTo 0
End Sub
[/vba]

webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD
 
Ответить
СообщениеУ меня вот так в форме этой надстройки написано:
[vba]
Код
Private Sub CheckBox1_Click()
On Error Resume Next
ThisWorkbook.IsAddin = Not CheckBox1
On Error GoTo 0
End Sub
[/vba]
Автор - Hugo
Дата добавления - 31.10.2014 в 14:43
Alex_ST Дата: Пятница, 31.10.2014, 22:00 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 3219
Репутация: 622 ±
Замечаний: 0% ±

2003
Честно говоря, даже в голову не пришло попробовать, а не откроются ли листы надстройки, если у неё только установить IsAddin = False и после этого не сохранять и не переоткрывать… :(
Позор на мою седую бороду...
И ведь чуть было не начал процедуру лепить, которая с листа обычной книги UsedRange на лист надстройки копирует и обратно...
А ларчик просто открывался! specool


С уважением,
Алексей
MS Excel 2003 - the best!!!
 
Ответить
СообщениеЧестно говоря, даже в голову не пришло попробовать, а не откроются ли листы надстройки, если у неё только установить IsAddin = False и после этого не сохранять и не переоткрывать… :(
Позор на мою седую бороду...
И ведь чуть было не начал процедуру лепить, которая с листа обычной книги UsedRange на лист надстройки копирует и обратно...
А ларчик просто открывался! specool
Автор - Alex_ST
Дата добавления - 31.10.2014 в 22:00
vlasssov71 Дата: Среда, 05.11.2014, 09:36 | Сообщение № 7
Группа: Заблокированные
Ранг: Новичок
Сообщений: 16
Репутация: -5 ±
Замечаний: 40% ±

Excel 2007
Цитата Alex_ST, 31.10.2014 в 22:00, в сообщении № 6
И ведь чуть было не начал процедуру лепить, которая с листа обычной книги UsedRange на лист надстройки копирует и обратно...

Мысль была такая же :D
 
Ответить
Сообщение
Цитата Alex_ST, 31.10.2014 в 22:00, в сообщении № 6
И ведь чуть было не начал процедуру лепить, которая с листа обычной книги UsedRange на лист надстройки копирует и обратно...

Мысль была такая же :D
Автор - vlasssov71
Дата добавления - 05.11.2014 в 09:36
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Показать листы надстройки, для внесения данных (Иное/Other)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2025 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!