Excel دىكى بېسىش كۇنۇپكىسىنىڭ VBA كودى (5 مىسال)

  • ھەمبەھىرلەڭ
Hugh West

ئەگەر بىز Excel خىزمەت جەدۋىلىمىزگە خاس بېسىش كۇنۇپكىسىنى تەڭشىيەلەيدىغان بولساق ، ئۇ جەدۋەلنى بېسىپ چىقىرىش ئۈچۈن ئىشلەتكۈچىلەرگە قۇلايلىق ۋە ۋاقىت تېجەيدۇ. VBA Macros نى ئىشلىتىش ئارقىلىق ئاسانلا قىلالايمىز. شۇڭا بۇ ماقالە Excel دىكى بېسىش كۇنۇپكىسى ئۈچۈن VBA كودىنى ئىشلىتىش ئۈچۈن 5 ئاددىي ماكرو بىلەن تەمىنلەيدۇ.

ئەمەلىي مەشغۇلات دەپتىرىنى چۈشۈرۈش ھەقسىز Excel قېلىپىنى بۇ يەردىن چۈشۈرۈڭ ۋە ئۆزىڭىز مەشىق قىلىڭ. VBA كودى بېسىش كۇنۇپكىسىنى قۇرۇش. Excel دىكى بېسىش كۇنۇپكىسىنىڭ كودى

ئالدى بىلەن بىزنىڭ سانلىق مەلۇمات ئامبىرىمىزغا تونۇشتۇرۇپ ئۆتەيلى ، بۇ بىر قىسىم ساتقۇچىلارنىڭ ئوخشىمىغان رايونلاردىكى سېتىلىشىغا ۋەكىللىك قىلىدۇ.

1. Excel

دىكى دىئالوگ رامكىسىغا بېسىش كۇنۇپكىسىنى بېسىش ئۈچۈن VBA كودىنى ئىشلىتىڭ ، ئالدى بىلەن بىز بېسىش كۇنۇپكىسى قۇرىمىز ، ئاندىن ئۇنىڭغا كود يازىمىز.

قەدەم باسقۇچلار:

  • تۆۋەندىكىدەك نى چېكىڭ: ئاچقۇچى & gt; & gt; كۇنۇپكا ساندۇقى. <> ئىسىملىك ​​سۆزلىشىش رامكىسى ماكرونى تەقسىملەش ئېچىلىدۇ.

  • ئىسىم قويۇڭ ۋە يېڭى نى بېسىڭ.

A VBA كۆزنەك چىقىدۇ.

    ئۇنىڭدىكى تۆۋەندىكى كودلار-
3818
  • ھازىر گە قايتىڭ جەدۋەل .

، مەن تارماق تەرتىپ ، DialogBox نى قۇردىم. سۆزلىشىش رامكىسىنى بېسىش .

كۇنۇپكا قۇرۇلدى.

  • > ۋە مەزمۇن تىزىملىكى دىن تېكىست تەھرىرلەش نى تاللاڭ ، كۇنۇپكا نامىنى ئۆزگەرتىڭ.

  • كېيىن ، پەقەت ئىسمى ۋە نى بېسىڭ كۇنۇپكىڭىزنىڭ سىرتىدىكى مائۇس نى چېكىڭ.

ئاندىن كۇنۇپكىسى نى بېسىڭ.

ئاندىن بېسىش سۆزلىشىش رامكىسى غا ئېرىشىسىز. ئەگەر خالىسىڭىز بېسىش نى ھازىرلا بېسىڭ. 1> PDF . تېخىمۇ كۆپ ئىشلىتىش ئۈچۈن ياكى كېيىن بېسىش.

  • ھازىر بولىدۇ نى بېسىڭ.

  • بۇ ۋاقىتتا پەقەت ئىسىم بېرىڭ ۋە ساقلاش نى بېسىڭ.

مانا بۇ بېسىلغان PDF .

تېخىمۇ كۆپ ئوقۇڭ:>

2. ئاكتىپ جەدۋەل ئۈچۈن بېسىش كۇنۇپكىسىنى ياساش ئۈچۈن VBA كودىنى ئىشلىتىڭ

بۇ يەردە ، بىز VBA دىن بېسىش an ئاكتىپ جەدۋەل .

قەدەم باسقۇچلار: > كۇنۇپكا

ۋە ماكرونى بەلگىلەڭ.
  • ماكرو نامىنى يېزىڭ ۋە بېسىڭ يېڭى .
  • ئۇزۇن ئۆتمەي ، VBA كۆزنىكى ئېچىلىدۇ> ئاندىن تۆۋەندىكى كودلارنى يېزىڭ-

    7692
    • كېيىن ، گە قايتىپ

    كود پارچىلىنىش

    • بۇ يەردە ، مەن تارماق تەرتىپنى قۇردىم ، ActiveSheet . .
    • ھازىر پەقەت كۇنۇپكىسى نى بېسىڭ. سۆزلىشىش رامكىسى دەپ ئاتالغان بېسىش نەتىجىسىنى ساقلاش ئېچىلغاندا
    .

    ئاندىن سىز بېسىلغان PDF غا ئېرىشىسىز. ئەگەر لازىم بولسا پرىنتېر نى ئاسانلا ئۆزگەرتىڭ.

    • ھۆججەت دىكى نى چېكىڭ>

    • ئاندىن بېسىش تاللانمىسىنى تاللاڭ ۋە چېكىش دىكى نى چېكىپ تاللاڭ. پرىنتېر .

    تېخىمۇ كۆپ ئوقۇڭ:

    3. Excel

    دىكى تاللانغان ۋاراقلارغا بېسىش كۇنۇپكىسىنى قۇرۇش ئۈچۈن VBA كودىنى ئىشلىتىڭ VBA .

    قەدەم باسقۇچلار: كۇنۇپكا ۋە a ماكرو نى تەقسىملەيدۇ.

  • ئاندىن ماكرو ئىسمى نى يېزىپ ، يېڭى نى بېسىڭ>
  • ئۇزۇن ئۆتمەي ، VBA كۆزنىكى ئېچىلىدۇ.

    ئاندىن جەدۋىلىڭىزگە گە قايتىڭ.

    كود بۇزۇلۇش

    • بۇ يەردە مەن تارماق تەرتىپ ، تاللانغان جەدۋەل نى قۇردىم.
    • ئاندىن ActiveWindow دىن ئاكتىپ Excel كۆزنەك دىن جەدۋەلنى تاللاڭ. ۋاراقلار . مەن ئىككى ۋاراقنى تاللىدىم. >.

    تەپسىلاتىنى ئوقۇڭ: 0> مۇشۇنىڭغا ئوخشاش ئوقۇشلۇقلار:

    • Excel جەدۋىلىنى A4 چوڭلۇقىدا قانداق بېسىپ چىقىرىش (4 خىل ئۇسۇل) بېسىپ چىقارغاندا Excel دىكى ماۋزۇ (3 خىل ئۇسۇل)
    • Excel VBA: باسما رايونىنى ھەرىكەتچان قانداق تەڭشەش (7 خىل ئۇسۇل) جەدۋەل بىلەن جەدۋەل (3 ئاسان ئۇسۇل)
    • Excel دا گرافىكنى قانداق بېسىپ چىقىرىش (5 خىل ئۇسۇل)

    4. Excel VBA قىستۇرما تاللانغان دائىرە بىلەن ئالاھىدە جەدۋەل ئۈچۈن بېسىش كۇنۇپكىسى قۇرۇش

    بۇ يەردە ، بىز بېسىش كۇنۇپكىسى دىن بېسىش نى تاللايمىز. دائىرە ئالاھىدە جەدۋەلدىن .

    قەدەم باسقۇچلار:

      بىرىنچى بۆلەك دىن ئىككى قەدەم كۇنۇپكىسى نى قۇرۇپ ماكرو تەقسىملەيدۇ.
  • ماكرو نامىنى يېزىڭ ۋە يېڭى نى بېسىڭ. .
  • ئۇزۇن ئۆتمەي ، VBA كۆزنىكى ئېچىلىدۇ.

      2> تۆۋەندىكى كودلار -
    6060
    • كېيىن ، ۋاراققا قايتىڭ.

    كودلارنىڭ پارچىلىنىشى 12> ئاندىن نى ئىشلىتىپ جۈملىسى بىلەن نى تاللاڭ a ئالاھىدە

  • كېيىنكى ، PrintArea = "B2: D11" .PrintOut ئالاھىدە جەدۋەل دىن دائىرىسى نى تاللايدۇ ھەمدە بېسىپ چىقىرىدۇ.
    • ھازىر پەقەت بېسىش كۇنۇپكىسى نى بېسىڭ.

    • ئۈچۈن ئىسىم قويۇڭ PDF ۋە ساقلاش نى بېسىڭ.

    بۇ بېسىلغان ئالاھىدە جەدۋەل>

    تېخىمۇ كۆپ ئوقۇڭ: Excel VBA: بېسىش رايونىنى كۆپ دائىرىگە بەلگىلەڭ (5 مىسال) 5. Excel VBA قىستۇرما تاللانغان دائىرە ئارقىلىق ئاكتىپ جەدۋەل ئۈچۈن بېسىش كۇنۇپكىسىنى قۇرالايسىز

    ئۇنىڭدىن باشقا ، سىز ئاكتىپ جەدۋەل دىن دائىرىسىنى تاللىيالايسىز ۋە <قىلالايسىز. 1> بېسىش كۇنۇپكىسى دىن بېسىش VBA ئارقىلىق بېسىش.

    قەدەم باسقۇچلار:

    • بىرىنچى بۆلەكتىن دەسلەپكى ئىككى باسقۇچ كۇنۇپكىسىنى قۇرۇش ۋە ماكرو نى تەقسىملەش.
    • كېيىن ، ماكرو نامىنى يېزىڭ. ۋە يېڭى نى بېسىڭ.

    ئۇزۇن ئۆتمەي ، VBA كۆزنەك ئېچىلىدۇ.

    • VBA كۆزنىكىدە ، تۆۋەندىكى كودلار -
    2974
    • ئاندىن جەدۋىلىڭىزگە گە قايتىڭ.

    كودنى پارچىلاش

    • بۇ يەردە ، مەن تارماق تەرتىپ ، ActiveSheetnRange نى قۇردىم.
    • ئاندىن دائىرە («B2: D11»). PrintOut دىن a دائىرە ۋە بېسىشنى تاللاڭ. > بېسىش كۇنۇپكىسىنى بېسىڭ.

      <. 1> تېخىمۇ كۆپ ئوقۇڭ: Excel كۇنۇپكىسى كونكرېت جەدۋەللەرنى بېسىپ چىقىرىش (ئاسان قەدەملەر بىلەن)

    خۇلاسە

    يۇقىرىدا بايان قىلىنغان تەرتىپلەرنى ئۈمىد قىلىمەن Excel دىكى بېسىش كۇنۇپكىسى ئۈچۈن VBA كودىنى ئىشلىتىشكە يېتەرلىك بولىدۇ. ئىنكاس بۆلۈمىدە ھەرقانداق سوئالنى سوراپ بېقىڭ ، ماڭا جاۋاب قايتۇرۇڭ.

    خۇگ ۋېست بۇ ساھەدە 10 نەچچە يىللىق تەجرىبىسى بار يۇقىرى تەجرىبىلىك Excel مەشقاۋۇلى ۋە تەھلىلچىسى. ئۇ بوغالتىرلىق ۋە مالىيە كەسپىدە باكلاۋۇرلۇق ئۇنۋانى ۋە سودا باشقۇرۇش كەسپىدە ماگىستىرلىق ئۇنۋانىغا ئېرىشكەن. خۇگنىڭ ئوقۇتۇش قىزغىنلىقى بار بولۇپ ، ئەگىشىش ۋە چۈشىنىش ئاسان بولغان ئۆزگىچە ئوقۇتۇش ئۇسۇلىنى تەرەققىي قىلدۇردى. ئۇنىڭ Excel ھەققىدىكى مۇتەخەسسىس بىلىمى دۇنيادىكى مىڭلىغان ئوقۇغۇچىلار ۋە كەسپىي خادىملارنىڭ ماھارىتىنى ئۆستۈرۈشىگە ۋە كەسپىي ھاياتىدا مۇنەۋۋەر بولۇشىغا ياردەم بەردى. خۇگ بىلوگى ئارقىلىق ئۆزىنىڭ بىلىملىرىنى دۇنيا بىلەن ئورتاقلىشىدۇ ، ھەقسىز Excel دەرسلىكى ۋە توردا تەربىيىلەش ئېلىپ بېرىپ ، شەخس ۋە كارخانىلارنىڭ تولۇق يوشۇرۇن كۈچىگە يېتىشىگە ياردەم بېرىدۇ.