Создание цикла в VBA по примеру ленточной формы

@ODVAIR · Регистрация: 06.10.2017

Студворк — интернет-сервис помощи студентам

Поделитесь кодом VBA. Скажем в таблице 10 записей, нужен код, который будет выводить все записи в отдельных полях, до тех пор пока записи в таблице есть. Чтобы это работало как ленточная форма.

@ODVAIR · 14.10.2017, 16:26 **[ТС]**

вот как раз с утра сижу изучаю именно это, но пока не совсем получается. если не сложно скиньте пример, я по образованию не программист, мне тяжело сразу со всем разобраться!

@Панург · 14.10.2017, 16:34

там есть пример

@Capi · 14.10.2017, 16:39

Смешно...

<Сегодня, 15:34>

Сообщение от ODVAIR

напишите подробно как создать элемент управления "поле" не с помощью конструктора, а кодом в VBA.
..........
остальное сам додумаю!

Четыре дня назад:
<10.10.2017, 17:47>

Сообщение от Capi

Сообщение от ODVAIR

узнать только как создавать поле кодом

Смотрите CreateControl

Даже спасибо не было....))))

Добавлено через 1 минуту
ODVAIR,

Желаемый Вами вид можно легко реализовать в отчете, но не в форме.
Может, Вам отчет нужен?

@Панург · 14.10.2017, 16:42

Сообщение от Capi

Может, Вам отчет нужен?

поле же нужно...

@ODVAIR · 14.10.2017, 16:55 **[ТС]**

я вот тоже сижу и смеюсь, я понимаю я могу не правильно называть какие-то вещи, но вы то должны понимать что такое ленточная форма? возьмите простую таблицу и на основе нее сделайте ленточную форму! ВОТ ЭТО МНЕ И НУЖНО И ТОЛЬКО, В ТАКОМ ВИДЕ. Только проблема заключается в том, что мне нужно чтобы это выводилось не из одной таблицы а из двух, трех, четырех и так далее, и они чередовались, так как они связаны. Первая таблица РАЗДЕЛ, вторая ГРУППА, вот чтобы они и чередовались РАЗДЕЛ, потом все из таблицы группа которые относятся к этому разделу, потом снова РАЗДЕЛ, снова из таблицы группа относящееся к этому разделу и так далее. И мне не надо Панург это делать в одном поле, а надо как в ленточной ПОНИМАЕШЬ? А все остальное, над чем вы смеетесь CreateControl и т.д. это уже мои додумки как это можно сделать, возможно это и проще реализуется! Вот я и ищу ответ на свой вопрос.

@Capi · 14.10.2017, 17:01

Сообщение от ODVAIR

возможно это и проще реализуется!

Ага. Было.
Только не читалось, видимо.

Сообщение от Capi

Желаемый Вами вид можно легко реализовать в отчете, но не в форме.
Может, Вам отчет нужен?

А почему, кстати, такой приказной тон на протяжении всех трех страниц?

@Jamaica · 14.10.2017, 17:18

Так можно:

@Jamaica · 14.10.2017, 17:20

Но лучше так:

@ODVAIR · 14.10.2017, 17:26 **[ТС]**

На счет отчета, сейчас попробую.

По поводу приказного тона - его нет. Если кого-то обидел, то не хотел - прошу прощения. Может быть от того, что не могу донести свой вопрос правильно и непонимания мой вопрос из русла помощи перешел в русло требования, но я этого не хотел!

Добавлено через 55 секунд
Да, если вот так будет выводиться информация в форму, будет отлично!

Добавлено через 1 минуту
Да, если вот так будет выводиться информация в форму, будет отлично!

@tkrainyk · 14.10.2017, 17:27

Сообщение от Jamaica

Так можно:

Очень заинтересовало ваше решение. А можно конкретнее, как вы это делаете.

@Jamaica · 14.10.2017, 17:31

Это панель инструментов, доступная в версиях до Access 2003 включительно.
Делаю все кодом.

@tkrainyk · 14.10.2017, 17:37

Сообщение от Jamaica

доступная в версиях до Access 2003

У меня к сожалению Access 2010

Добавлено через 15 секунд

Сообщение от Jamaica

доступная в версиях до Access 2003

У меня к сожалению Access 2010

@ODVAIR · 14.10.2017, 17:38 **[ТС]**

А можно пример посмотреть? Пожалуйста

@Jamaica · 14.10.2017, 17:46

Попробуйте UserForm, если их тоже не кастрировали в новомодных Access.

Добавлено через 6 минут

Сообщение от ODVAIR

А можно пример посмотреть?

Нет смысла смотреть мой пример.
В нем решалась единственная задача - создать панель инструментов для показа на экран.
Она (панель) "мертвая". Работать с ней возможности нет никакой.

Решение для создания интерактивной панели инструментов будет совершенно иным.

@ODVAIR · 14.10.2017, 17:52 **[ТС]**

Да есть!

@Jamaica · 14.10.2017, 18:00

Ок.

@ODVAIR · 14.10.2017, 18:24 **[ТС]**

Спасибо за помощь! Кое что для себя открыл. Но пока не совсем понял, как мне может это помочь(((

Добавлено через 59 секунд
Отчетом все отлично выводится, как и надо, но для решения задачи тоже не годиться. Вот если бы в форму вывести все так же как в отчет, было бы все решено!

@tkrainyk · 14.10.2017, 18:35

Сообщение от Jamaica

Ок.

Ошибка на

With CommandBars.Add(GroupeName, 4, , True)

Но это не важно, обойдусь, просто очень интересно стало, как это делается.

shanemac51 · 14.10.2017, 19:29

Сообщение от ODVAIR

Я в начале темы спрашивал - это можно сделать, еще никто не сказал, что это сделать нельзя. Везде пишут, что кодом можно сделать абсолютно все, я этого сделать не могу, не хватает знаний в этой области, поэтому прошу помощи. Приведенные выше примеры не подходят, если буду объяснят почему, это еще демагогии на неделю, а то и две. Просто кто понимает то, что я хочу получить и знает как это сделать, скиньте хотя бы простой пример, как чередовать строки по ленточному типу из двух таблиц.

еще раз посмотрела тему --вы так и не выложили пример базы со связями ваших 3-4 таблиц и отчетом, в котором все получается

может надо начинать с примера
--входных таблиц
--связями между ними
--что хотите получить(можно и в екселе)

пока от вас был только рисунок в топике 22, а остальное только слова надо...надо...надо так, а не так...надо...

@ODVAIR · 14.10.2017, 20:10 **[ТС]**

здесь уже несколько человек предлагали свои варианты с верными таблицами и связями, думаю проблема поиска решения моего вопроса не в этом!

Добавлено через 39 минут
На самом деле идея Capi сделать отчетом, и решение с которым мне помог Панург в другой теме, решили мою проблему на 80%, Jamaica добавил еще 10%, над остальным немного поломаю голову. Самое главное полностью переделывать БД уже не придется! Всем спасибо за помощь, прошу прощения если кого-нибудь обидел!)

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .	Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .	Запрет дублирования строк в табличной части Maks 13.09.2026 Реализация из решения ниже выполнена на нетиповом справочнике "Нормы ТО" с табличной часть "Виды ТО", разработанного в КА2, со следующими реквизитами: - ВидТО (СправочникСсылка. ВидыТО); - ВидГСМ. . .	Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Jin X 06.09.2026 Скрипты Tampermonkey для CyberForum, ChatGPT, Claude и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37

	Создание цикла в VBA по примеру ленточной формы 08.10.2017, 16:57. Показов 7171. Ответов 82 Метки нет (Все метки) Поделитесь кодом VBA. Скажем в таблице 10 записей, нужен код, который будет выводить все записи в отдельных полях, до тех пор пока записи в таблице есть. Чтобы это работало как ленточная форма. 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	14.10.2017, 16:26 [ТС]
	вот как раз с утра сижу изучаю именно это, но пока не совсем получается. если не сложно скиньте пример, я по образованию не программист, мне тяжело сразу со всем разобраться! 0

@Панург Мы один, давай на "ты" 3858 / 1400 / 348 Регистрация: 16.06.2016 Сообщений: 3,300
	14.10.2017, 16:34
	там есть пример 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	14.10.2017, 16:55 [ТС]
	я вот тоже сижу и смеюсь, я понимаю я могу не правильно называть какие-то вещи, но вы то должны понимать что такое ленточная форма? возьмите простую таблицу и на основе нее сделайте ленточную форму! ВОТ ЭТО МНЕ И НУЖНО И ТОЛЬКО, В ТАКОМ ВИДЕ. Только проблема заключается в том, что мне нужно чтобы это выводилось не из одной таблицы а из двух, трех, четырех и так далее, и они чередовались, так как они связаны. Первая таблица РАЗДЕЛ, вторая ГРУППА, вот чтобы они и чередовались РАЗДЕЛ, потом все из таблицы группа которые относятся к этому разделу, потом снова РАЗДЕЛ, снова из таблицы группа относящееся к этому разделу и так далее. И мне не надо Панург это делать в одном поле, а надо как в ленточной ПОНИМАЕШЬ? А все остальное, над чем вы смеетесь CreateControl и т.д. это уже мои додумки как это можно сделать, возможно это и проще реализуется! Вот я и ищу ответ на свой вопрос. 0

@Jamaica 1333 / 551 / 112 Регистрация: 29.03.2016 Сообщений: 1,360
	14.10.2017, 17:18
	Так можно: Миниатюры 1

@Jamaica 1333 / 551 / 112 Регистрация: 29.03.2016 Сообщений: 1,360
	14.10.2017, 17:20
	Но лучше так: Миниатюры 1

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	14.10.2017, 17:26 [ТС]
	На счет отчета, сейчас попробую. По поводу приказного тона - его нет. Если кого-то обидел, то не хотел - прошу прощения. Может быть от того, что не могу донести свой вопрос правильно и непонимания мой вопрос из русла помощи перешел в русло требования, но я этого не хотел! Добавлено через 55 секунд Да, если вот так будет выводиться информация в форму, будет отлично! Добавлено через 1 минуту Да, если вот так будет выводиться информация в форму, будет отлично! 0

@Jamaica 1333 / 551 / 112 Регистрация: 29.03.2016 Сообщений: 1,360
	14.10.2017, 17:31
	Это панель инструментов, доступная в версиях до Access 2003 включительно. Делаю все кодом. 1

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	14.10.2017, 17:38 [ТС]
	А можно пример посмотреть? Пожалуйста 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	14.10.2017, 17:52 [ТС]
	Да есть! 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	14.10.2017, 18:24 [ТС]
	Спасибо за помощь! Кое что для себя открыл. Но пока не совсем понял, как мне может это помочь((( Добавлено через 59 секунд Отчетом все отлично выводится, как и надо, но для решения задачи тоже не годиться. Вот если бы в форму вывести все так же как в отчет, было бы все решено! 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	14.10.2017, 20:10 [ТС]
	здесь уже несколько человек предлагали свои варианты с верными таблицами и связями, думаю проблема поиска решения моего вопроса не в этом! Добавлено через 39 минут На самом деле идея Capi сделать отчетом, и решение с которым мне помог Панург в другой теме, решили мою проблему на 80%, Jamaica добавил еще 10%, над остальным немного поломаю голову. Самое главное полностью переделывать БД уже не придется! Всем спасибо за помощь, прошу прощения если кого-нибудь обидел!) 0