ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Откурыть подчиненную из основной с помощью VBA
37 сообщений из 37, показаны все 2 страниц
  все  
Откурыть подчиненную из основной с помощью VBA
    #32239348
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Помогите, как открыть подчиненную форму из основной с помощью VBA
...
Рейтинг: 0 / 0
18.08.2003, 17:10
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239355
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Что значит открыть подчиненную???
Она загружается вместе с основной...

Открытие "формы из формы":
Docmd.openForm "FormName"
...
Рейтинг: 0 / 0
18.08.2003, 17:13
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239356
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Что значит подчиненную? Сабформу, которая сидит внутри основной? Или просто другую форму?
...
Рейтинг: 0 / 0
18.08.2003, 17:13
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239360
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
Всеволод оказался внятнее...
...
Рейтинг: 0 / 0
18.08.2003, 17:14
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239368
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Есть форма заказы , в ней поле тип_заказа и набор параметров одинаковых для всех типов, но есть еще уникальные параметры, которые хотелось бы разместить в разных подчиненках для каждого типа заказов. Открываешь форму ставишь тип заказа, а она тебе к основным параметрам еще добавляет параметры уникальные для этого типа заказов. Короче, есть ли какой либо способ из VBA в дырку для подчиненной формы вставлять подчиненку на выбор?
...
Рейтинг: 0 / 0
18.08.2003, 17:17
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239371
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
"В дырку дл подчиненной" Это супер!!!

Спешу обрадовать: ДА ДА ДА VBA предоставляет нам такую возможность
Используй SourceObject подчиненной формы
...
Рейтинг: 0 / 0
18.08.2003, 17:19
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239372
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Знаю, что загружается вместе с основной. Нельзя ли ее подменить или сменить параметр и перезагрузить форму так сказать в новом виде?
...
Рейтинг: 0 / 0
18.08.2003, 17:20
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239381
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
А как ентот SourceObject просмотреть и изменить, то, что касается подчиненной формы?
А по поводу "в дырку для подчиненной" не созла, сам посмеялся как прочитал.
...
Рейтинг: 0 / 0
18.08.2003, 17:23
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239387
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
SourceObject - это одно из свойств дырки.
...
Рейтинг: 0 / 0
18.08.2003, 17:24
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239390
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
2Владимир Саныч
...
Рейтинг: 0 / 0
18.08.2003, 17:25
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239391
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
To: Владимир Саныч
открыть другую форму легко, кстати пока так и работает, но не очень удобно данные на один заказ на двух окнах смотреть
...
Рейтинг: 0 / 0
18.08.2003, 17:25
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239395
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Короче вот простой пример:
На форме Main есть дырка SubForm:

На клик к\л кнопки вешаем типовой код

Me!SubForm.Form.SourceObject = "Любая форма, которую ты хочешь отобразить в дырке"
...
Рейтинг: 0 / 0
18.08.2003, 17:27
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239396
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
То-бишь, если я заменю SourceObject и перезагружу форму будет все Ок?
Это бы устроило.
А без перезагрузки не как?
...
Рейтинг: 0 / 0
18.08.2003, 17:28
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239398
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Sorry, а разве subform уже не названа именем подчиненки, которую пришлось впихнуть в конструкторе, это уже не подмена параметра, а подмена объекта
...
Рейтинг: 0 / 0
18.08.2003, 17:30
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239399
Фотография Владимир Саныч
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Владимир СанычПривилегированный пользователь
Модератор форума
> открыть другую форму легко, кстати пока так и работает

Я не собирался советовать, что лучше, я только хотел понять, в чем вопрос.

> если я заменю SourceObject и перезагружу форму будет все Ок?

Перезагружать не нужно.
...
Рейтинг: 0 / 0
18.08.2003, 17:30
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239403
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
>Sorry, а разве subform уже не названа именем подчиненки, которую пришлось впихнуть в конструкторе, это уже не подмена параметра, а подмена объекта

"Как корабль назовете, так корабль и поплывет" - тут это не работает
...
Рейтинг: 0 / 0
18.08.2003, 17:32
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239408
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Всем спасибо, пойду пробовать.
P.S. Самый скоро отвечающий форум.
...
Рейтинг: 0 / 0
18.08.2003, 17:33
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239414
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Все для народа!
...
Рейтинг: 0 / 0
18.08.2003, 17:36
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239479
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Чевойто как-то не работает.
Я вообще не могу найти ObjectSource через Object Browser
Да и у объекта Form вроде нет такого свойства.
В общем VBA матом ругается на енту строчку.
...
Рейтинг: 0 / 0
18.08.2003, 18:11
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239481
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Наводящий вопрос:
А что такое ObjectSource ???
...
Рейтинг: 0 / 0
18.08.2003, 18:12
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239484
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Sorry, енто я в форуме ошибся, в проге SourceObject.
А наводящий вопрос хороший.
...
Рейтинг: 0 / 0
18.08.2003, 18:14
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239487
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Me.SubПриход1.SourceObject
...
Рейтинг: 0 / 0
18.08.2003, 18:15
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239489
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
SourceObject нашел, но у SubForm, а не Form
...
Рейтинг: 0 / 0
18.08.2003, 18:16
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239496
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Ок, все получилось. все что мне надо было понять, что subform это поле в форме, и его имя может отличаться от имени первично вставленной подчиненки.
Спасибо за терпение.
...
Рейтинг: 0 / 0
18.08.2003, 18:20
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239512
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Простой наверное вопрос. Я сделал:
Me![SubForm1].SourceObject = Me![Тип]
и обламался поле [Тип] - поле со списком типа long
в форме я конечно вижу подстановку из таблицы типов заказов, а не цифру
так вот подчиненные я обозвал также как и типы заказов.
Вопрос: как подставить в вышеуказанное выражение подстановку из поля со списком (может сказал не правильно, но надеюсь понятно
...
Рейтинг: 0 / 0
18.08.2003, 18:29
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239517
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Me!SubForm.SourceObject = "Любая форма, которую ты хочешь отобразить в дырке"

Без комментариев
...
Рейтинг: 0 / 0
18.08.2003, 18:33
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239519
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Можно конечно написать условия типа
if Me![Код]=1 then Me![SubForm1].SourceObject = "SubForm_one"
if Me![Код]=2 then Me![SubForm1].SourceObject = "SubForm_two"
но хочеться что нибудь по изящней
...
Рейтинг: 0 / 0
18.08.2003, 18:33
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239521
incold
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
incold
Участник
Наверное имеется ввиду что-то вроде

Me![Код].Column(1)

если в источнике поля со списком вторая колонка, это необходимое название
...
Рейтинг: 0 / 0
18.08.2003, 18:34
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239525
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Уважаемый Vsevolod, вы наверное не поняли, подчиненных форм много, и для каждой писать условие - перебор!
Проще, мне кажеться использовать поле [Тип]
Можно конечно и в качестве данных для основной формы сделать запрос, в который можно включить буквенное обозначение типа заказов, а не просто код
и использовать его например так:
Me![SubForm1].SourceObject = Me![string_тип]
Но не очень хочеться создавать фиксированный запрос, поскольку форма может вызывать путем наложения различных запросов и я боюсь, что еще один ее может доконать (естественнно какой нибудь моей ошибкой, а не переполнением)
...
Рейтинг: 0 / 0
18.08.2003, 18:39
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239529
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Me![SubForm1].SourceObject = Me![string_тип]

и

Me!SubForm.SourceObject = "Любая форма, которую ты хочешь отобразить в дырке"

Несовместимы...

Значением SourceObject должен быть объект!!!
...
Рейтинг: 0 / 0
18.08.2003, 18:43
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239530
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Super!!!, incold спасибо, работает лучше некуда.
Слушай, а где можно енти знания оптом получить. В смысле нет ли какого справочника?
...
Рейтинг: 0 / 0
18.08.2003, 18:43
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239538
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Vsevolod, хочу вас огорчить, но все работает с типом string.
Причем даже переименовал все подчиненки для удобства в "п_"+SubFormName
и использовал такую-же конструкцию для выборки.
Me![SubForm1].SourceObject = "п_" + Me![Тип].Column(1)

И подчеркиваю ВСЕ РАБОТАЕТ ПРЕКРАСНО
...
Рейтинг: 0 / 0
18.08.2003, 18:47
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239540
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
Я уже не могу соображать, так что прошу прощения...
А вот насчет "хочу огрочить", так не надо было бы.
...
Рейтинг: 0 / 0
18.08.2003, 18:49
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239544
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Во блин еще вопрос.
Расположил все на вкладках (такой элемент в формах, где тыкаешь на ярлычки, а он разные странички показывает)
Так вот, а можно ли из VBA поменять наименование этих кладок, да и вообще количество там и т.д. (но кол-во это уже так для самообразования, пока наименований достаточно)
...
Рейтинг: 0 / 0
18.08.2003, 18:51
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239549
A-Lex
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
A-Lex
Гость
Vsevolod прошу прощения, это не подкол, просто неудачно пытался проявить к вам вежливость. А ваши советы были сегодня самыми дельными. Так-что еще раз извините, если обидел.
...
Рейтинг: 0 / 0
18.08.2003, 18:53
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239951
Фотография Vsevolod V
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Vsevolod V
Участник
На такие вопросы самому надобы искать ответы...
Мои действия после того, как я прочитал твой вопрос от вчера, 18:51 (изначально ответа я не знал):

1)создал форму - поместил на нее TabControl - создал кнопку на форме, щелкая на которую будет меняться имя вкладки (как это должно происходить еще не знал)

2)посомтрел в окно Properties в VBA и увидел, что эти вкладки фактически не имеют отношения к самому контролу (наверное грубо сказано), т.е вкладка - это отдельный элемент формы под названием "Page". Исходя из этого попробывал такой вариант:

Me.Вкладка1.NAME = "Vsevolod"

3)не получилось. Ошибка: это свойство можно менять только в конструкторе форм

4)ИТОГО: какого хрена тебе было не сделать тоже самое???


ЗЫ: это заняло у меня 1 мин 24 сек (без учета написания этого сабжа)
...
Рейтинг: 0 / 0
19.08.2003, 11:15
| Ответить | Цитировать | Написать  
Откурыть подчиненную из основной с помощью VBA
    #32239970
Sfagnum
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Sfagnum
Участник
попробуй через етот конец Me.TAbControl_Name.Pages.Item (Номер_Вкладки_с_0).Caption
...
Рейтинг: 0 / 0
19.08.2003, 11:23
| Ответить | Цитировать | Написать  
37 сообщений из 37, показаны все 2 страниц
  все  
Форумы / Microsoft Access [игнор отключен] [закрыт для гостей] / Откурыть подчиненную из основной с помощью VBA
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?all=1&fid=45&tid=1679851]:
 0ms
get settings:
 6ms
get forum list:
 19ms
check forum access:
 3ms
check topic access:
 3ms
track hit:
 57ms
get topic data:
 9ms
get forum data:
 3ms
get page messages:
 73ms
get tp. blocked users:
 1ms
others: 230ms
total:  404ms
созд. / загр.: 404ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]