Excel бағдарламасындағы басып шығару түймешігіне арналған VBA коды (5 мысал)

Hugh West

16-10-2023 Макростар & Excel VBA
  • Мұны Бөлісіңіз
Hugh West

Егер Excel жұмыс парағында теңшелетін Басып шығару түймешігін орната алатын болсақ, ол пайдаланушыға өте ыңғайлы және парақтарды басып шығару үшін уақытты үнемдеуі мүмкін. VBA макростары пайдалану арқылы біз мұны оңай жасай аламыз. Сонымен, бұл мақала сізге Excel бағдарламасындағы басып шығару түймесі үшін VBA кодын пайдалану үшін 5 қарапайым макроспен қамтамасыз етеді.

Тәжірибелік жұмыс кітабын жүктеп алу

Сіз мүмкін тегін Excel үлгісін осы жерден жүктеп алыңыз және өз бетіңізше жаттығу жасаңыз.

Басып шығару Button.xlsm жасау үшін VBA коды

VBA пайдаланудың 5 мысалы Excel бағдарламасындағы басып шығару түймешігінің коды

Әуелі кейбір сатушының әртүрлі аймақтардағы сатылымдарын көрсететін деректер жиынтығымен танысайық.

1. Excel бағдарламасында басып шығару тілқатысу терезесіне арналған басып шығару түймешігін жасау үшін VBA кодын пайдаланыңыз

Алдымен Басып шығару түймешігін жасаймыз, содан кейін оған кодтар жазамыз.

Қадамдар:

  • Төмендегідей басыңыз: Әзірлеуші ​​ >> Кірістіру >> Түйме жолағы.

Көп ұзамай сіз курсорда қосу белгісін (+) аласыз.

  • Сол курсорды қалаған түйме өлшеміне сәйкес сүйреп, біраз уақыттан кейін Макросты тағайындау деп аталатын диалогтық терезе ашылады.

  • атын және < Жаңа түймесін басыңыз.

VBA терезесі пайда болады.

  • Одан кейін мынаны теріңіз ондағы келесі кодтар- 
3932
  • Енді қайта оралыңыз парақ .

Кодты бөлу

  • Осында , мен Sub процедурасын, DialogBox жасадым.
  • Содан кейін ашу үшін Диалогтарды (xlDialogPrint).Show пайдаландым. Басып шығару диалогтық терезесі .

Түйме жасалды.

  • Тінтуірдің оң жақ түймешігімен түймесінде және түйме атын өзгерту үшін Мәтінмәндік мәзірден Мәтінді өңдеу тармағын таңдаңыз.

  • Кейінірек, жай атын теріңіз және тінтуіріңіздің кез келген Түйменің сыртындағы жерін басыңыз.

Одан кейін жай ғана Түймешік түймесін басыңыз.

Одан кейін сіз Басып шығару диалогтық терезесін аласыз . Қаласаңыз, оны қазір Басып шығаруға болады.

Егер сізде қазір Принтер болмаса, оны <ретінде Сақтауға болады. 1>PDF . әрі қарай пайдалану үшін немесе кейінірек Басып шығару үшін.

  • Енді OK түймесін басыңыз.

  • Осы кезде жай ғана атын беріп, Сақтау түймесін басыңыз.

Міне, басылған PDF .

Толығырақ оқу: Excel бағдарламасында басып шығару параметрлерін реттеу (8 қолайлы амал)

2. Белсенді парақ үшін басып шығару түймешігін жасау үшін VBA кодын пайдаланыңыз

Мұнда біз VBA белсенді басып шығару үшін қолданамыз>Парақ .

Қадамдар:

  • парақшасын жасау үшін бірінші бөлімнен бірінші екі қадамды орындаңыз>түймелері және Макросты тағайындау .
  • Макрос атауы жазыңыз және түймесін басыңыз. Жаңа .

Көп ұзамай VBA терезесі ашылады.

  • Содан кейін келесі кодтарды оған- 
4135
  • Кейінірек артқа
    • <-ке оралыңыз. 14>

    Кодты бөлу

    • Осында мен Қосымша процедураны жасадым , ActiveSheet .
    • Содан кейін PrintOut қолданылып, белсенді парақты таңдау және басып шығару .
    • Енді Түймені басыңыз.

    A диалогтық терезе деп аталатын Басып шығару нәтижесін Басқаша сақтау ашылады.

    • атын деп Сақтау түймесін басыңыз. .

    Сосын басып шығарылған PDF аласыз.

    Сіз қажет болса, принтерді оңай өзгертіңіз.

    • Басты беттің жанындағы Файл түймесін басыңыз

    • Одан кейін Басып шығару опциясын таңдап, таңдау үшін ашылмалы тізімнен басыңыз. a Принтер .

    Толығырақ оқу: Excel бағдарламасында барлық парақтарды басып шығару жолы (3 әдіс)

    3. Excel бағдарламасында таңдалған парақтарды басып шығару түймешігін жасау үшін VBA кодын қолданыңыз

    Егер сіз Басып шығару арнайы таңдалған парақтарды қаласаңыз, арқылы да мүмкін болады. VBA .

    Қадамдар:

    • жасау үшін бірінші бөлімнен алғашқы екі қадамды орындаңыз. түймесі және тағайындау макрос .
    • Одан кейін Макрос атауы жазып, Жаңа түймесін басыңыз.

    Көп ұзамай, VBA терезесі ашылады.

    • Кейінірек, келесі кодтарды онда- 
    1420
    теріңіз.

    Одан кейін параққа артқа оралыңыз.

    Кодтың бөлінуі

    • Мұнда мен Қосымша процедураны, Таңдалған парақтар жасадым.
    • Содан кейін ActiveWindow <1-ге дейін қолдандым> белсенді Excel терезесінен парақты таңдаңыз.
    • Кейін, бірнеше таңдалғанды ​​басып шығару үшін PrintOut пайдаланылады. парақтар .
    • Енді парақтарды таңдап және Басып шығару түймешігін басыңыз. Мен екі парақты таңдадым.

    • PDF үшін атын беріңіз және Сақтау түймесін басыңыз. .

    PDF файлында екі парақ<2 үшін t екі бет бар>.

    Толығырақ оқу: Excel бағдарламасында VBA макросын пайдаланып арнайы парақтарды басып шығару жолы (4 әдіс)

    Ұқсас көрсеткіштер:

    • A4 өлшеміндегі Excel парағын басып шығару жолы (4 әдіс)
    • Қалай сақтау керек Басып шығару кезінде Excel бағдарламасындағы тақырып (3 жол)
    • Excel VBA: басып шығару аймағын динамикалық түрде орнату (7 әдіс)
    • Excel бағдарламасын басып шығару жолы Сызықтары бар парақ (3 оңай әдіс)
    • Excel бағдарламасында графикті басып шығару жолы (5 әдіс)

    4. Таңдалған ауқымы бар арнайы парақ үшін басып шығару түймешігін жасау үшін Excel VBA ендіру

    Мұнда біз Басып шығару түймешігін басып шығару үшін таңдалған етіп жасаймыз диапазон арнайы парақтан .

    Қадамдар:

    • Бірінші орындаңыз түймесін жасау және макрос тағайындау үшін бірінші бөлімнен екі қадамды орындаңыз.
    • Макрос атауы жазыңыз және Жаңа түймесін басыңыз. .

    Көп ұзамай VBA терезесі ашылады.

    • Содан кейін жазыңыз келесі кодтар – 
    9827
    • Кейінірек парағыңызға оралыңыз.

    Кодты бөлу

    • Мұнда мен Ішкі процедураны, SpecificSheetnRange жасадым.
    • Содан кейін мәлімдемемен таңдау үшін a арнайы
    • Келесі, PrintArea = “B2:D11”.PrintOut<2 пайдаланылады> арнайы парақтан диапазонды таңдайды және басып шығарады.
    • Енді Басып шығару түймешігін басыңыз.

    • үшін атын орнату PDF және Сақтау түймесін басыңыз.

    Бұл басылған арнайы парақ.

    Толығырақ оқу: Excel VBA: Бірнеше ауқым үшін басып шығару аймағын орнату (5 мысал)

    5. Таңдалған ауқымы бар белсенді парақ үшін басып шығару түймешігін жасау үшін Excel VBA ендіру

    Сонымен қатар, белсенді парақта ауқымды таңдауға және Басып шығару түймесі VBA арқылы басып шығару үшін.

    Қадамдар:

    • бірінші бөлімнен алғашқы екі қадам түйме жасау және макрос тағайындау.
    • Кейінірек макрос атауын жазыңыз. және Жаңа түймесін басыңыз.

    Көп ұзамай VBA терезе ашылады.

    • VBA терезесіне келесі кодтарды –
      • <14 жазыңыз> 
      2787
      • Содан кейін оралыңыз параққа .

      Кодты бөлу

      • Мұнда мен Sub процедураны, ActiveSheetnRange жасадым.
      • Содан кейін <1 пайдаланылды>Ауқым («B2:D11»).PrintOut - таңдаңыз a ауқым және басып шығару.
      • Басып шығару түймешігін басыңыз.

      • атын беріңіз және Сақтау<2 түймесін басыңыз>.

      Одан кейін сіз басылған диапазонды аласыз.

      Толығырақ: Арнайы парақтарды басып шығаруға арналған Excel түймесі (оңай қадамдармен)

      Қорытынды

      Жоғарыда сипатталған процедуралар деп үміттенемін Excel бағдарламасындағы басып шығару түймесі үшін VBA кодын пайдалану жеткілікті болады. Түсініктеме бөлімінде кез келген сұрақ қойып, маған пікір қалдырыңыз.

Алдыңғы пост Excel бағдарламасында тренд сызығының теңдеуін қалай табуға болады (3 қолайлы жол)
Келесі пост Егер ұяшықта Excel бағдарламасындағы мәтін ішіндегі сөз болса, VLOOKUP пайдалану жолы

Хью Уэст – салада 10 жылдан астам тәжірибесі бар жоғары тәжірибелі Excel тренері және талдаушысы. «Бухгалтерлік есеп және қаржы» мамандығы бойынша бакалавр дәрежесі және іскерлік әкімшілендіру магистрі дәрежесі бар. Хью оқытуға құмар және ұстануға және түсінуге оңай бірегей оқыту әдісін әзірледі. Оның Excel бағдарламасындағы сараптамалық білімі бүкіл әлем бойынша мыңдаған студенттер мен мамандарға біліктіліктерін арттыруға және мансаптық жетістіктерге жетуге көмектесті. Блогы арқылы Хью өз білімін әлеммен бөліседі, жеке адамдар мен бизнеске толық әлеуетін ашуға көмектесу үшін тегін Excel оқулықтары мен онлайн тренингтерін ұсынады.