Распечатка отчета сразу из формы

@NeilEla · Регистрация: 19.03.2016

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

Доброго времени суток!

Помогите, пожалуйста! В приложенном файле пример, в котором нужно при проставлении "галочки" производить распечатку заданного отчета. Я честно просмотрел описывающие схожие ситуации на форуме, но УВЫ не понял, как я могу это сделать. В моем примере отчет открывается, а мне нужно, чтобы он без открытия сразу шел на печать. Открытие не требуется по условиям работы. "Галочка" тоже нужна

На кнопку заменить нельзя.
Заранее благодарю!

@alvk · 23.11.2017, 09:46

А форма точно открыта в это время?

@NeilEla · 23.11.2017, 15:52 **[ТС]**

да, я на них смотрю и переключаюсь между ними

@alvk · 24.11.2017, 07:03

Нужен последний пример с ошибкой.

@NeilEla · 30.11.2017, 09:10 **[ТС]**

не получается

(( Я уже воспроизвел в точности как в примере. И не работает

( А есть где-то справочник по командам?
Ну как словарь что ли ... Команда и информация о том, что она делает..с примерами

@alvk · 30.11.2017, 09:46

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

Ни фига не получается

Где файл?

@NeilEla · 30.11.2017, 10:03 **[ТС]**

какой файл?

Добавлено через 2 минуты
Я так понимаю что все из-за этого подстановочного поля. Почитал здесь и понял что эту проблему часто обсуждают и однозначного решения нет

У меня и правда в этой форме поле из таблицы в которой это поле подставляется из другой таблицы

((

@alvk · 30.11.2017, 10:18

Избавляйтесь от них и переделывайте все запросы, где они участвуют. Это единственное однозначное и правильное решение.

@NeilEla · 30.11.2017, 10:19 **[ТС]**

Вот как мне изменить эту строчку чтобы вместо кода подставлялось значение?

=DLookUp("[СОТРУДНИК]";"МСК";"[Код]=[Формы]![МСК оформление]![Код]")

СОТРУДНИК и есть поле с подстановкой в таблице МСК

Добавлено через 44 секунды
от кого "от них"?

@alvk · 30.11.2017, 10:39

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

от кого "от них"?

От полей подстановок в таблицах. Вы же про них пишете.

Без примера БД я не смогу вам помочь исправить формулу, я же не вижу схему данных. И название МСК оформление никак не ассоциируется у меня с кодом сотрудника.

@NeilEla · 30.11.2017, 10:49 **[ТС]**

Спасибо Вам огромное!!!! Я наконец дотумкал как это осуществить!))) Сделал правда несколько иначе, чем вы советовали

Но без Ваших идей не натолкнулся бы на решение!))) Кстати, а есть в команда чтобы выводила на экран надпись с кнопкой "ОК"? Как в макросах "ОкноСообщения"

@alvk · 30.11.2017, 10:58

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

чтобы выводила на экран надпись

Visual Basic
1
msgbox "Моя надпись!"

Поздравляю с решением проблемы

@NeilEla · 06.12.2017, 10:48 **[ТС]**

Огромное очередное спасибо!!!!!
Скажите, Гуру Акс

Вот есть такая строка

DoCmd.OpenReport "АСГУФ МСК" ', acViewReport

Она приводит к распечатки отчета. А что нужно изменить, чтобы распечатывалось две или три копии отчета?

@Agapov_stas · 06.12.2017, 10:56

Visual Basic
1
DoCmd.PrintOut printrange, pagefrom, pageto, printquality, copies, collatecopies

Ваш, - пятый аргумент.

@NeilEla · 06.12.2017, 11:01 **[ТС]**

Вот чтобы не мучить обитателей здешних своими наивными вопросами, не можете мне подсказать ГДЕ можно отыскать справочник по командам? Например, MsgBox "Текст записи на экране" - команда выводит на экран окно с любым текстом и кнопкой ОК

Добавлено через 2 минуты
То что copies это я и сам понимаю

а вот куда его вставить в моем варианте?

@Agapov_stas · 06.12.2017, 11:08

Здесь ответ на оба Ваши вопроса.
Но обычно: https://msdn.microsoft.com/ru-... -reference

@NeilEla · 06.12.2017, 11:23 **[ТС]**

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

Здесь ответ на оба Ваши вопроса.

Эээ..спасибо. Но я не силен в аглицком

Можно просто в мою строку вы вставите правильный вариант чтобы две копии отчета печатались?

@Agapov_stas · 06.12.2017, 11:43

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

Можно просто в мою строку вы вставите правильный вариант чтобы две копии отчета печатались?

Можно, но это не научит Вас учиться.

Visual Basic
1
2
DoCmd.OpenReport "АСГУФ МСК", acViewReport
DoCmd.PrintOut , , , , 2

@Eugene-LS · 06.12.2017, 12:42

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

Кстати, а есть в команда чтобы выводила на экран надпись с кнопкой "ОК"? Как в макросах "ОкноСообщения"

Смотрите функцию MsgBox

Visual Basic
1
MsgBox "Файл исходных данных не обнаружен!", vbCritical, "Нет файла!"

@NeilEla · 06.12.2017, 14:16 **[ТС]**

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

Можно, но это не научит Вас учиться.

Учиться я не против. Уже спрашивал где можно найти что-то вроде справочника по командам... Пока никто не ответил

Секрет наверное

Ссылка на сайт МS не в счет - там на английском. И примеры для тех, кто уже хоть что-то программирует

@Eugene-LS · 06.12.2017, 14:21

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

не в счет - там на английском.

Ну вот по русски:
Функции MS Access (по категориям)

Новые блоги и статьи Все статьи Все блоги /
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого 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 и пр. Работая с форумом и нейросетями в браузере часто хочется что-то подкорректировать или добавить какого-то функционала. Ниже прикреплён. . .
Программа опроса у.з. расходомера SLS-720F Argus19 02.09.2026 Программа опроса у. з. расходомера SLS-720F Программа опрашивает один раз в минуту три ультразвуковых расходомера SLS-720F через интерфейс RS-485 по протоколу Modbus RTU. Опрашиваются регистры. . .	Hyper-V: Компьютер должен поддерживать доверенный платформенный модуль 2.0. Maks 31.08.2026 При установке Windows 11 на виртуальную машину Hyper-V 2-го поколения вылезла такая ошибка: Решение: в параметрах виртуальной машины, в разделе "Безопасность" (Security) активировать флаг. . .	Архитектура биовида Стива в Майнкрафте: Зачем бонобо кубический каннибализм anaschu 30.08.2026 Кубический Вагинокапитализм в Minecraft: Математический инвариант ОДУ и рок Стивов-бонобо Главная задача разработанной «Модели Всего» — наглядно продемонстрировать наличие системной «судьбы». . .	Оттачиваю умение писать js программы. russiannick 30.08.2026 Проектом выходного дня стало написание Книги шифров Виженера. Итогом стала версия 200, синий туман. Синий туман назван так, потому что замораживает текст под собой. Нажатие синих кнопок управляют. . .

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,383
	23.11.2017, 09:46
	А форма точно открыта в это время? 0

@NeilEla 0 / 0 / 0 Регистрация: 19.03.2016 Сообщений: 113
	23.11.2017, 15:52 [ТС]
	да, я на них смотрю и переключаюсь между ними 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,383
	24.11.2017, 07:03
	Нужен последний пример с ошибкой. 0

@NeilEla 0 / 0 / 0 Регистрация: 19.03.2016 Сообщений: 113
	30.11.2017, 09:10 [ТС]
	не получается (( Я уже воспроизвел в точности как в примере. И не работает( А есть где-то справочник по командам? Ну как словарь что ли ... Команда и информация о том, что она делает..с примерами 0

@NeilEla 0 / 0 / 0 Регистрация: 19.03.2016 Сообщений: 113
	30.11.2017, 10:03 [ТС]
	какой файл? Добавлено через 2 минуты Я так понимаю что все из-за этого подстановочного поля. Почитал здесь и понял что эту проблему часто обсуждают и однозначного решения нет У меня и правда в этой форме поле из таблицы в которой это поле подставляется из другой таблицы(( 0

@alvk 7459 / 4592 / 302 Регистрация: 12.08.2011 Сообщений: 14,383
	30.11.2017, 10:18
	Избавляйтесь от них и переделывайте все запросы, где они участвуют. Это единственное однозначное и правильное решение. 0

@NeilEla 0 / 0 / 0 Регистрация: 19.03.2016 Сообщений: 113
	30.11.2017, 10:19 [ТС]
	Вот как мне изменить эту строчку чтобы вместо кода подставлялось значение? =DLookUp("[СОТРУДНИК]";"МСК";"[Код]=[Формы]![МСК оформление]![Код]") СОТРУДНИК и есть поле с подстановкой в таблице МСК Добавлено через 44 секунды от кого "от них"? 0

@NeilEla 0 / 0 / 0 Регистрация: 19.03.2016 Сообщений: 113
	30.11.2017, 10:49 [ТС]
	Спасибо Вам огромное!!!! Я наконец дотумкал как это осуществить!))) Сделал правда несколько иначе, чем вы советовали Но без Ваших идей не натолкнулся бы на решение!))) Кстати, а есть в команда чтобы выводила на экран надпись с кнопкой "ОК"? Как в макросах "ОкноСообщения" 0

@NeilEla 0 / 0 / 0 Регистрация: 19.03.2016 Сообщений: 113
	06.12.2017, 10:48 [ТС]
	Огромное очередное спасибо!!!!! Скажите, Гуру Акс Вот есть такая строка DoCmd.OpenReport "АСГУФ МСК" ', acViewReport Она приводит к распечатки отчета. А что нужно изменить, чтобы распечатывалось две или три копии отчета? 0

@NeilEla 0 / 0 / 0 Регистрация: 19.03.2016 Сообщений: 113
	06.12.2017, 11:01 [ТС]
	Вот чтобы не мучить обитателей здешних своими наивными вопросами, не можете мне подсказать ГДЕ можно отыскать справочник по командам? Например, MsgBox "Текст записи на экране" - команда выводит на экран окно с любым текстом и кнопкой ОК Добавлено через 2 минуты То что copies это я и сам понимаю а вот куда его вставить в моем варианте? 0

@Agapov_stas 3357 / 1776 / 83 Регистрация: 05.08.2010 Сообщений: 4,471
	06.12.2017, 11:08
	Здесь ответ на оба Ваши вопроса. Но обычно: https://msdn.microsoft.com/ru-... -reference 2