Отмяна на отпечатването на отчет, ако не съдържа записи

Важно : Тази статия е преведена машинно – вижте отказа от отговорност. Английската версия на тази статия за справка можете да намерите тук .

По подразбиране е възможно да се отпечатват отчети, които не съдържат записи. За да решите този проблем, можете да използвате или макрос, или код на Microsoft Visual Basic for Applications (VBA), за да откриете липсата на записи в отчета и след това да отмените операцията за печат. Стъпките в тази статия обясняват как можете да използвате двата метода.

Какво искате да направите?

Използване на макрос за отпечатване на брошура

Използвайте VBA код, за да откажете печата

Вероятно ще искате да отмените отпечатването на отчет, когато той не съдържа записи. Ако например започвате продажба на нов продукт, вероятно ще има период от време, през който няма да регистрирате никакви продажби. Следователно трябва да предвидите, че някои от вашите отчети няма да съдържат записи с подробности и че агрегатните функции, например функцията Count, може да няма какво да изчисляват. За да обработвате без проблеми такива ситуации, можете да създадете макрос, който отменя заданието за печат. Можете също да добавите няколко реда с внимателно съставен код на VBA, за да направите същото. VBA е езикът за програмиране, който Microsoft Office Access 2007 използва.

Добавите към отчета На № Data процедура за събитие или макроса или VBA кода. Office Access 2007 предизвиква събитие В няма данни всеки път, когато стартирате отчет, който няма записи. Макроси и VBA код, описани в тази статия показва подходящо съобщение и отмяна на отпечатването на отчета, когато този отчет не съдържа данни. Когато добавите макроси или VBA код към процедурата на събитие В няма данни , макроси или VBA кода се изпълнява всеки път, когато отворите отчет, който съдържа записи. Когато щракнете върху OK , за да затворите или предупредително съобщение, макроса също се затваря празен отчет. Когато добавите към отчета или макроса или VBA кода, празен отчет няма да се отвори, когато се опитате да се показва в изглед на отчет или изглед на оформление, но можете да отворите отчета в изглед за проектиране.

Използване на макрос за отмяна на отпечатването

Макросът, описан в този раздел, показва предупредително съобщение, когато се опитате да отпечатате празен отчет. Когато щракнете върху OK, за да затворите прозореца за съобщение, макросът автоматично отменя операцията за печат. Ако не включите предупредително съобщение, ще изглежда, че нищо не се е случило, когато се опитате да отпечатате отчета – което вероятно ще обърка потребителите на отчета.

Създаване на макроса

  1. В навигационния екран щракнете с десния бутон върху отчета, която искате да промените, и щракнете върху Режим на проектиране.

  2. В раздела Структура, в групата Показване/скриване щракнете върху Списък на свойствата.

    -или-

    Щракнете двукратно върху полето в горния ляв или десен ъгъл на отчета в зависимост от вашите регионални и езикови настройки.

  3. Щракнете върху раздела събитие и в полето на свойството В няма данни Бутон на конструктор .

    Показва се диалоговият прозорец Избор на конструктор.

  4. Щракнете върху Конструктор на макроси и след това щракнете върху OK.

    Конструкторът на макроси стартира и показва празен макрос.

  5. В първия ред на макроса щракнете върху полето в колоната Действие и изберете MsgBox от списъка.

  6. Под Аргументи на действия в долната секция на конструктора на макроси, в полето Съобщение въведете текста на вашето предупредително съобщение.

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

  7. Ако искате, можете да промените стойностите на аргументите в полето Звуков сигнал от Да на Не и в списъка Тип да изберете типа на иконата, която искате да се появи в предупредителното съобщение.

  8. В полето Заглавие въведете заглавие за съобщението.

    Например можете да въведете Без записи.

    Промените се появяват в горната част на конструктора на макроси – в колоната Аргумент до действието MsgBox.

  9. В горната част на конструктора на макроси щракнете върху следващата клетка в колоната Действие (клетката непосредствено под MsgBox) и след това изберете CancelEvent

    Вашият макрос трябва да изглежда както е показано по-долу, въпреки че можете да използвате друг текст в аргументите:

    Пример на макрос, който отменя операция за печат

  10. В раздела проектиране , в групата затваряне щракнете върху Запиши катои след това използвайте диалоговия прозорец Запиши като, за да дадете име на макроса.

  11. Затворете макроса. Ако се покаже предупредително съобщение, което пита дали искате да запишете промените в макроса и свойството на отчета, щракнете върху Да и продължете със следващите стъпки, за да го тествате.

Тестване на макроса

  • В навигационния екран щракнете с десния бутон върху отчета, съдържащ макроса, и щракнете върху Печат. В зависимост от избраните опции трябва да се покаже предупредително съобщение, подобно на следното:

    Прозорец за съобщение, което се показва, когато отчетът не съдържа записи

    Когато щракнете върху OK, за да затворите съобщението, действието CancelEvent спира операцията за печат. Тъй като не сте задали друго събитие (например отваряне на отчета за преглеждане), отчетът се затваря.

Най-горе на страницата

Използване на код на VBA да отменяне на отпечатването

VBA кодът, описан по-долу, работи подобно на макроса, описан в предишния раздел – показва предупредително съобщение, когато отворите празен отчет, и след това отменя операцията за печат, когато затворите предупредителното съобщение.

Добавяне на код на VBA

  1. В навигационния екран щракнете с десния бутон върху отчета, който искате да промените, и щракнете върху Режим на проектиране.

    Забележка : За да завършите тази процедура Използвайте отчет, който съдържа записи.

  2. В раздела Структура, в групата Показване/скриване щракнете върху Списък на свойствата.

    -или-

    Щракнете двукратно върху полето в горния ляв или десен ъгъл на отчета в зависимост от вашите регионални и езикови настройки.

  3. Щракнете върху раздела събитие и в полето на свойството В няма данни Бутон на конструктор .

    Показва се диалоговият прозорец Избор на конструктор.

  4. Щракнете върху Конструктор на код и след това щракнете върху OK.

    Редакторът на Visual Basic стартира и показва празна процедура за обработка на събитие.

  5. Въведете следния код в редактора на Visual Basic, за да се покаже процедурата Report_NoData:

    Private Sub Report_NoData (Cancel As Integer)
    MsgBox "There are no records to report", vbExclamation, "No Records"
    Cancel = True
    End Sub
  6. Когато сте готови, щракнете върху файли след това щракнете върху Запиши.

  7. Щракнете върху файли след това щракнете върху Затвори и се върнете към Microsoft Office Access.

  8. Затворете отворения отчет и след това щракнете върху да, за да потвърдите Запиши.

  9. В навигационния екран щракнете с десния бутон върху отчета, който променихте, и щракнете върху Печат. Ще видите съобщение като следното:

Прозорец за съобщение, което се показва, когато отчетът не съдържа записи

Процедурата Report_NoData използва функцията MsgBox, за да покаже съобщението Няма записи в отчета и бутон OK. Когато щракнете върху OK, редът "Cancel=True" в процедурата инструктира Access да отмени отчета. Cancel е аргумент, който се подава автоматично към процедурата на събитието и винаги се проверява от Access, когато процедурата за събитието завърши.

Най-горе на страницата

Забележка : Отказ от отговорност за машинен превод: Тази статия е преведена от компютърна система без човешка намеса. Microsoft предлага тези машинни преводи, за да помогне на потребителите, които не говорят английски, да се възползват от съдържанието за продукти, услуги и технологии на Microsoft. Тъй като статията е преведена машинно, е възможно да съдържа грешки в речника, синтаксиса и граматиката.

Разширете уменията си
Преглед на обучението
Получавайте първи новите функции
Присъединете се към участниците в Office Insider

Беше ли полезна тази информация?

Благодарим ви за обратната връзка!

Благодарим ви за вашата обратна връзка. Изглежда, че ще бъде полезно да ви свържем с един от нашите агенти по поддръжката на Office.

×