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

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

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

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

@Capi · 10.10.2017, 17:19

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

нужно, чтобы каждая запись выводилась в отдельное поле

Это как технически должно выглядеть?
Не понимаю.
Выразитесь яснее, пожалуйста.
Желательно в общепринятых терминах.

@ODVAIR · 10.10.2017, 17:20 **[ТС]**

я могу не правильно говорить терминологией, за это прошу прощение. сейчас сделаю скрин, того, что хотелось бы видеть в форме в конечном итоге.

@ODVAIR · 10.10.2017, 17:40 **[ТС]**

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

@Capi · 10.10.2017, 17:47

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

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

Смотрите CreateControl.

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

Может, Вас устроит форма в режиме таблицы?
И подчиненные будут выводиться по "плюсику слева".

@ODVAIR · 10.10.2017, 18:00 **[ТС]**

К сожалению нет, это тоже пробовал)

Добавлено через 8 минут
по поводу CreateControl, то тут я уже не знаю как делать! тут нужна помощь.

@Capi · 10.10.2017, 18:21

ODVAIR,

Я правильно понимаю, что в области "таблица раздел" находятся строки,
сформированные из нескольких записей этой таблицы, относящихся к определенному виду продукции ?

@ODVAIR · 10.10.2017, 18:45 **[ТС]**

То что голубым это Таблица РАЗДЕЛ. Поля таблицы: КОД_РАЗДЕЛА (счетчик), РАЗДЕЛ
Белые строки, это Таблица ТОВАР. Поля таблицы: КОД_ТОВАРА (счетчик), КОД_РАЗДЕЛА (для подстановки), ТОВАР, ЦЕНА.
Таблицы связаны: РАЗДЕЛ.КОД_РАЗДЕЛА (счетчик) - ТОВАР.КОД_РАЗДЕЛА.

Если создать ленточную форму таблицы РАЗДЕЛ, будет выведено в следующем виде.

ЭСПРЕССО-СМЕСИ
МОНОСОРТА ДЛЯ ЭСПРЕССО
МИКРОЛОТЫ ДЛЯ ЭСПРЕССО

Теперь задача, вывести так же, только между этими полями вывести соответствующие поля из таблицы ТОВАР. Так, как это показано на скрине.

Добавлено через 4 минуты
Панург все правильно реализовал, только все выводится в один элемент управления, а нужно в как в ленточной форме, каждая запись в своем поле, потому что поля товара будут открывать диалоговое окно с другими параметрами. И это все уже реализовано, все уперлось только в сам вывод как на скрине. И нужен именно такой вариант, для работы это критично важно, реализовывал разными способами, и полями со списками тоже. Но это не удобно и появляется много ошибок в работе.

@Панург · 11.10.2017, 07:54

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

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

Что мешает выводить со списка? В приложенном примере определяется по какой "ячейке" (колонка+строка) пользователь кликнул и выводится в заголовок формы значение этой "ячейки".
А дорисовать то что на скрине тоже можно. Вот пожалуй с цветностью...

@Панург · 11.10.2017, 07:54

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

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

Что мешает выводить со списка? В приложенном примере определяется по какой "ячейке" (колонка+строка) пользователь кликнул и выводится в заголовок формы значение этой "ячейки".
А дорисовать то что на скрине тоже можно. Вот пожалуй с цветностью...

@ODVAIR · 11.10.2017, 16:08 **[ТС]**

Это лишь кусок БД, этот вариант не подходит. Я же писал, что все это я перепробовал, устроит только один вариант, вывод по типу ленточной формы! Вот как ленточная форма выводит строки с полями, так и мне надо, только чередовать их! Если это сделать невозможно, то буду переделывать всю БД. Но читал, что кодом можно сделать абсолютно всю. Поэтому и обратился за помощью.

Добавлено через 2 минуты
Честно сказать совсем не понимаю, почему бы не сделать этот вариант формы базовым вместе с простой формой, ленточной и т.д., такой способ вывода информации очень распространён.

mobile · 11.10.2017, 16:25

ODVAIR, посмотрите вариант - Делимся наработками. Может быть подойдет с переделками

@Панург · 12.10.2017, 04:15

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

устроит только один вариант, вывод по типу ленточной формы

Почему по типу ленточной формы? Что в ней такого? Просто один из гридов. Обоснуй. Что такое поля в твоей интерпретации?
Если ты уж так упёрся в ленточную форму - собирай свой источник данных для неё вручную.

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

этот вариант не подходит.

Это про мой пример? Что не устраивает?

@ODVAIR · 12.10.2017, 18:27 **[ТС]**

Полями я называю элемент управление (ПОЛЕ). Я по-моему много раз уже объяснял, что я хочу в итоге получить, и по-моему это предельно ясно. Как выводится ленточная форма? Это поля с данными из таблицы в одну строку, и строки по вертикали повторяются до тех пор пока не выведены все данные из таблицы. Вот именно такой вид мне и нужен, только есть ОДНО НО. Строки должны чередоваться, пример в скрине. Я в начале темы спрашивал - это можно сделать, еще никто не сказал, что это сделать нельзя. Везде пишут, что кодом можно сделать абсолютно все, я этого сделать не могу, не хватает знаний в этой области, поэтому прошу помощи. Приведенные выше примеры не подходят, если буду объяснят почему, это еще демагогии на неделю, а то и две. Просто кто понимает то, что я хочу получить и знает как это сделать, скиньте хотя бы простой пример, как чередовать строки по ленточному типу из двух таблиц. Все остальное я сделаю и встрою в свою базу самостоятельно!

Добавлено через 53 секунды
Ты сделал в том виде в каком требуется, только это надо сделать строками, а не в одном элементе управления!

@Панург · 12.10.2017, 20:08

ODVAIR, надеюсь тебе кто-нибудь окажет помощь в создании ленточных форм или CustomControl похожего на ленточную форму. Творческих успехов.

@ODVAIR · 13.10.2017, 07:44 **[ТС]**

Благодарю!

@alvk · 14.10.2017, 15:30

Изобретаем велосипед. Замечательно.

@ODVAIR · 14.10.2017, 15:34 **[ТС]**

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

Добавлено через 44 секунды
остальное сам додумаю! а то одни сообщения типа: "можно, но не нужно", "изобретаем велосипед" и т.д.

mobile · 14.10.2017, 15:48

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

а то одни сообщения типа: "можно, но не нужно", "изобретаем велосипед" и т.д.

Я думаю это из-за того, что никто не понимает, что Вы хотите сделать. Возможно Вы и сами неточно представляете себе что должно получиться и как с этим работать.
Кроме того, Вы избирательно читаете предложенное. Я дал Вам вариант, но Вы даже не захотели его просмотреть. А если и смотрели, то никак не откомментировали. Ну и разумеется, у меня во всяком случае, пропало желание работать с Вами.

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

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

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

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

остальное сам додумаю!

CreateControl Method

Новые блоги и статьи Все статьи Все блоги /
Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" 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. Показов 7175. Ответов 82 Метки нет (Все метки) Поделитесь кодом VBA. Скажем в таблице 10 записей, нужен код, который будет выводить все записи в отдельных полях, до тех пор пока записи в таблице есть. Чтобы это работало как ленточная форма. 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	10.10.2017, 17:20 [ТС]
	я могу не правильно говорить терминологией, за это прошу прощение. сейчас сделаю скрин, того, что хотелось бы видеть в форме в конечном итоге. 0

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

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	10.10.2017, 18:00 [ТС]
	К сожалению нет, это тоже пробовал) Добавлено через 8 минут по поводу CreateControl, то тут я уже не знаю как делать! тут нужна помощь. 0

@Capi Модератор 6231 / 2909 / 708 Регистрация: 12.06.2016 Сообщений: 7,839
	10.10.2017, 18:21
	ODVAIR, Я правильно понимаю, что в области "таблица раздел" находятся строки, сформированные из нескольких записей этой таблицы, относящихся к определенному виду продукции ? 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	10.10.2017, 18:45 [ТС]
	То что голубым это Таблица РАЗДЕЛ. Поля таблицы: КОД_РАЗДЕЛА (счетчик), РАЗДЕЛ Белые строки, это Таблица ТОВАР. Поля таблицы: КОД_ТОВАРА (счетчик), КОД_РАЗДЕЛА (для подстановки), ТОВАР, ЦЕНА. Таблицы связаны: РАЗДЕЛ.КОД_РАЗДЕЛА (счетчик) - ТОВАР.КОД_РАЗДЕЛА. Если создать ленточную форму таблицы РАЗДЕЛ, будет выведено в следующем виде. ЭСПРЕССО-СМЕСИ МОНОСОРТА ДЛЯ ЭСПРЕССО МИКРОЛОТЫ ДЛЯ ЭСПРЕССО Теперь задача, вывести так же, только между этими полями вывести соответствующие поля из таблицы ТОВАР. Так, как это показано на скрине. Добавлено через 4 минуты Панург все правильно реализовал, только все выводится в один элемент управления, а нужно в как в ленточной форме, каждая запись в своем поле, потому что поля товара будут открывать диалоговое окно с другими параметрами. И это все уже реализовано, все уперлось только в сам вывод как на скрине. И нужен именно такой вариант, для работы это критично важно, реализовывал разными способами, и полями со списками тоже. Но это не удобно и появляется много ошибок в работе. 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	11.10.2017, 16:08 [ТС]
	Это лишь кусок БД, этот вариант не подходит. Я же писал, что все это я перепробовал, устроит только один вариант, вывод по типу ленточной формы! Вот как ленточная форма выводит строки с полями, так и мне надо, только чередовать их! Если это сделать невозможно, то буду переделывать всю БД. Но читал, что кодом можно сделать абсолютно всю. Поэтому и обратился за помощью. Добавлено через 2 минуты Честно сказать совсем не понимаю, почему бы не сделать этот вариант формы базовым вместе с простой формой, ленточной и т.д., такой способ вывода информации очень распространён. 0

mobile 26828 / 14509 / 3192 Регистрация: 28.04.2012 Сообщений: 15,782
	11.10.2017, 16:25
	ODVAIR, посмотрите вариант - Делимся наработками. Может быть подойдет с переделками 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	12.10.2017, 18:27 [ТС]
	Полями я называю элемент управление (ПОЛЕ). Я по-моему много раз уже объяснял, что я хочу в итоге получить, и по-моему это предельно ясно. Как выводится ленточная форма? Это поля с данными из таблицы в одну строку, и строки по вертикали повторяются до тех пор пока не выведены все данные из таблицы. Вот именно такой вид мне и нужен, только есть ОДНО НО. Строки должны чередоваться, пример в скрине. Я в начале темы спрашивал - это можно сделать, еще никто не сказал, что это сделать нельзя. Везде пишут, что кодом можно сделать абсолютно все, я этого сделать не могу, не хватает знаний в этой области, поэтому прошу помощи. Приведенные выше примеры не подходят, если буду объяснят почему, это еще демагогии на неделю, а то и две. Просто кто понимает то, что я хочу получить и знает как это сделать, скиньте хотя бы простой пример, как чередовать строки по ленточному типу из двух таблиц. Все остальное я сделаю и встрою в свою базу самостоятельно! Добавлено через 53 секунды Ты сделал в том виде в каком требуется, только это надо сделать строками, а не в одном элементе управления! 0

@Панург Мы один, давай на "ты" 3858 / 1400 / 348 Регистрация: 16.06.2016 Сообщений: 3,300
	12.10.2017, 20:08
	ODVAIR, надеюсь тебе кто-нибудь окажет помощь в создании ленточных форм или CustomControl похожего на ленточную форму. Творческих успехов. 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,383
	14.10.2017, 15:30
	Изобретаем велосипед. Замечательно. 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	13.10.2017, 07:44 [ТС]
	Благодарю! 0

@ODVAIR 0 / 0 / 0 Регистрация: 06.10.2017 Сообщений: 37
	14.10.2017, 15:34 [ТС]
	очень полезное сообщение, лучше бы помогли если знаете, а не знаете, что толку от этого. просто кто-нибудь напишите подробно как создать элемент управления "поле" не с помощью конструктора, а кодом в VBA. Добавлено через 44 секунды остальное сам додумаю! а то одни сообщения типа: "можно, но не нужно", "изобретаем велосипед" и т.д. 0

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