Excel VBA بىلەن ئۆزگىرىشچان ئىسىم بىلەن خىزمەت دەپتىرىنى قانداق ئېچىش كېرەك

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

مەزمۇن جەدۋىلى

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

مەشىق خىزمەت دەپتىرىنى چۈشۈرۈڭ

VBA.xlsm ئارقىلىق ئۆزگىرىشچان ئىسىم بىلەن خىزمەت دەپتىرىنى ئېچىڭ

Sample.xlsx

4 Excel

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

1. خىزمەت دەپتىرىنى ئىشلىتىش. ئېچىلغان مۈلۈك

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

⮚ ئاندىن بىز File_Path ئۆزگەرگۈچى مىقدارنى تىزما تىپى دەپ ئېلان قىلىمىز.

2907

⮚ ۋە File_Path ئۆزگەرگۈچى مىقدارنى ھۆججەتنىڭ ئورنىغا تەڭشەڭ.

6654

⮚ بىز خىزمەت دەپتىرى تىپىدىكى ئۆزگىرىشچان دەپ جاكارلايمىز.

5414

then ئاندىن خىزمەت دەپتىرى خىزمەت دەپتىرى ئارقىلىق File_Path ئورنىدا ساقلانغان مۇندەرىجىدىن قوشۇلىدۇ. خاسلىقنى قوشۇڭ.

3832

⮚ ئاخىرىدا ، بىز ئاخىرلاشتۇرىمىز بۇ كودنىڭ تارماق تەرتىپى.

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

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

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

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

نىڭ ئالقىشىغا ئېرىشىدۇ.ئاسان. ئىسىم ئۆزگەرگۈچى مىقدار سۈپىتىدە ئاندىن كىچىك VBA ماكرو ئارقىلىق ھۆججەتنى ئېچىڭ.
  • ھۆججەتنىڭ ئېنىق ھۆججەت مۇندەرىجىسى تۆۋەندە خاسلىق كۆزنىكىدە كۆرسىتىلدى.
    • ئالدى بىلەن ، ئاچقۇچى بەتكۈچىگە كىرىپ ، Visual Basic نى چېكىڭ. ئەگەر سىزدە ئۇنداق بولمىسا ، ئاچقۇچىلار بەتكۈچىنى قوزغىتىشىڭىز كېرەك. ياكى كۆرۈنمە ئاساسىي تەھرىرلىگۈچ نى ئېچىش ئۈچۈن ' Alt + F11' نى باسسىڭىزمۇ بولىدۇ.

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

    • كېيىنكى قەدەمدە ، بۆلەك تەھرىرلىگۈچ كۆزنىكىگە تۆۋەندىكى كودنى كىرگۈزۈڭ:
    5637

    • ئاندىن <نى تاقاڭ. 6> بۆلەك كۆزنەك.
    • ئۇنىڭدىن كېيىن ، كۆرۈش بەتكۈچ & gt; ماكروس غا كىرىڭ. ماكروس . بۇ يەردىكى ئىسىم Open_with_File_Path . ئاندىن ئىجرا نى بېسىڭ.

    • ئۇنىڭدىن كېيىن ئۈلگە ھۆججىتى ئېچىلىدۇ.

    the كودنىڭ بۇزۇلۇشى

    8172

    ⮚ بىرىنچى ، تارماق تارماقنىڭ نامىنى تەمىنلەيمىز. بۇ جەريان Open_with_File_Path .

    7879

    ⮚ ئاندىن ، ھۆججەتنىڭ ئورنىنى File_Path variable

    6986

    inئاندىن بىز ئۆزگەرگۈچى مىقدارنى wrkbk دەپ جاكارلايمىز ، ئۇنىڭ تىپى خىزمەت دەپتىرى. wrkbk ئۆزگەرگۈچى مىقدار.

    5086

    ⮚ ئاخىرىدا ، بىز بۇ كودنىڭ تارماق تەرتىپىنى ئاخىرلاشتۇرىمىز.

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

    قەدەم باسقۇچلار Excel ھۆججىتى ھازىر ساقلاندى.

  • ھۆججەتنىڭ ئىسمى 1> بەتكۈچ ۋە Visual Basic نى چېكىڭ. ئەگەر سىزدە ئۇنداق بولمىسا ، ئاچقۇچىلار بەتكۈچىنى قوزغىتىشىڭىز كېرەك. ياكى كۆرۈنمە ئاساسىي تەھرىرلىگۈچ نى ئېچىش ئۈچۈن ' Alt + F11 ' نى باسسىڭىزمۇ بولىدۇ.
    • ئاندىن يېڭى سۆزلىشىش رامكىسى بولىدۇ ، بۇ سۆزلىشىش رامكىسىدا قىستۇر & gt; بۆلەك نى بېسىڭ.

    • كېيىنكى قەدەمدە ، بۆلەك تەھرىرلىگۈچ كۆزنىكىگە تۆۋەندىكى كودنى كىرگۈزۈڭ:
    8248

    • ئاندىن <نى تاقاڭ. 6> بۆلەك
    كۆزنەك.
  • ئۇنىڭدىن كېيىن ، كۆرۈش بەتكۈچ & gt; ماكروس غا كىرىڭ.ماكروس . بۇ يەردىكى ئىسىم Open_without_File_Path . ئاندىن «ئىجرا قىلىش» نى چېكىڭ.
  • ۋە Excel دا VBA ئارقىلىق ئۆزگىرىشچان ئىسىم بىلەن خىزمەت دەپتىرىنى ئاچىمىز.
  • the پارچىلىنىش كود

    7531

    ⮚ بىرىنچى ، تارماق تەرتىپنىڭ نامىنى تەمىنلەيمىز ، يەنى Sub Open_without_File_Path ()

    8123

    ⮚ بىز wrkbk خىزمەت دەپتىرىدىكى ئۆزگەرگۈچى مىقدار سۈپىتىدە

    8809

    ⮚ ئانا مۇندەرىجىدىن 1.xlsx دەپ ھۆججەت ئاچىمىز.

    3018

    ⮚ ئاخىرىدا ، تارماق تەرتىپنى ئاخىرلاشتۇرىمىز بۇ كودنىڭ .1 <<> Excel ھۆججىتىدىكى ھەر قانداق سانلىق مەلۇمات ياكى قىممەتنى ئۆزگەرتەلەيدۇ.

    باسقۇچلار

    • بىز ئاچماقچى بولغان ھۆججەت ھۆججەت قىسقۇچتا ساقلىنىدۇ.
    • ۋە بۇ بىز پەقەت ئوقۇشقىلا بولىدىغان ھۆججەت.

    • ئالدى بىلەن ، ئاچقۇچى غا كىرىڭ. بەتكۈچنى چېكىپ Visual Basic <7 نى چېكىڭ>. ئەگەر سىزدە ئۇنداق بولمىسا ، ئاچقۇچىلار بەتكۈچىنى قوزغىتىشىڭىز كېرەك. ياكى Visual Basic تەھرىرلىگۈچنى ئېچىش ئۈچۈن ' Alt + F11 ' نى باسسىڭىزمۇ بولىدۇ.

    • ئاندىن يېڭى بولىدۇ. سۆزلىشىش رامكىسى ، شۇ سۆزلىشىش رامكىسىدا ، نى چېكىڭ & gt; بۆلەك نى قىستۇرۇڭ. تۆۋەندىكى كود:
    9796
    • ئاندىن بۆلەك كۆزنىكىنى تاقاڭ.
    • ئۇنىڭدىن كېيىن ، كۆرۈش بەتكۈچ & gt; ماكروس .
    • ئاندىن ماكرونى كۆرۈش نى چېكىڭ.

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

    Code كودنىڭ بۇزۇلۇشى

    8349

    ⮚ ئالدى بىلەن ، تارماق پروگراممىغا ئىسىم بىلەن تەمىنلەيمىز ، يەنى Open_with_File_Read_Only ()

    2704

    Work بىز خىزمەت دەپتىرىدىكى wrkbk نى ئۆزگەرتىمىز 1>

    7199

    then ئاندىن ھۆججەت بېكىتىلگەن مۇندەرىجىدىن ئېچىلىدۇ ، ھۆججەت ئاخىرقى تالاش-تارتىش ئارقىلىق ئوقۇشقىلا قىلىپ بېكىتىلىدۇ.

    6289

    ⮚ ئاخىرىدا ، بىز ئاخىرلاشتۇرىمىز بۇ كودنىڭ تارماق تەرتىپى.

    تېخىمۇ كۆپ ئوقۇڭ: Excel VBA ئارقىلىق خىزمەت كىتابىنى قانداق ئوقۇش كېرەك؟

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

    قەدەم

    • ئالدى بىلەن ، ئاچقۇچى بەتكۈچىگە كىرىپ ، Visual Basic نى چېكىڭ. ئەگەر سىزدە ئۇنداق بولمىسا ، نى قوزغىتىشىڭىز كېرەكئاچقۇچىلار بەتكۈچى . ياكى كۆرۈنمە ئاساسىي تەھرىرلىگۈچ نى ئېچىش ئۈچۈن ' Alt + F11' نى باسسىڭىزمۇ بولىدۇ.

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

    • كېيىنكى قەدەمدە ، بۆلەك تەھرىرلىگۈچ كۆزنىكىگە تۆۋەندىكى كودنى كىرگۈزۈڭ:
    End Sub

    • ئاندىن <نى تاقاڭ. 6> بۆلەك
    كۆزنەك.
  • ئۇنىڭدىن كېيىن ، كۆرۈش بەتكۈچ & gt; ماكروس غا كىرىڭ. ماكروس
  • . بۇ يەردىكى ئىسىم Open_File_with_Messege_Box . ئاندىن ئىجرا نى بېسىڭ. 7>.
  • ئاندىن بولىدۇ نى بېسىڭ.
    • ئېچىڭ.

    • ئاندىن كودنى ئازراق ئۆزگەرتىشكە تىرىشىمىز. Sample10 ، ھۆججەت ھۆججەت قىسقۇچىدا ئەمەلىيەتتە Sample10 دېگەن ھۆججەت يوق.

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

    the كودنىڭ بۇزۇلۇشى

    9071

    ⮚ ئالدى بىلەن ، تارماق تەرتىپنىڭ نامىنى تەمىنلەيمىز. Open_with_File_Read_Only ()

    1123

    ⮚ بىز wrkbk نى خىزمەت دەپتىرىدىكى ئۆزگىرىشچان دەپ ئېلان قىلىڭ

    4983
    9717

    ⮚ بۇ قۇر ئۈلگە ئىسىملىك ​​ھۆججەتنىڭ مۇندەرىجىدە بار-يوقلۇقىنى تەكشۈرىدۇ ، ئەگەر ھۆججەت بار بولسا ، ئۇ بولىدۇ ھۆججەتنى ئېچىڭ ، شۇنىڭ بىلەن بىر ۋاقىتتا ئۇچۇرنى كۆرسىتىدۇ.

    2415

    ⮚ مۇندەرىجىدە ئۈلگە دېگەن ھۆججەت بولمىسا ، بۇ ئۇچۇر يەتكۈزۈلىدۇ.

    6111

    ⮚ ئاخىرىدا ، بىز بۇ كودنىڭ تارماق تەرتىپىنى ئاخىرلاشتۇرىمىز.

    9420

    ⮚ ئاخىرىدا ، بىز بۇ كودنىڭ تارماق تەرتىپىنى ئاخىرلاشتۇرىمىز.

    تېخىمۇ كۆپ ئوقۇڭ: VBA ئارقىلىق خىزمەت دەپتىرىنى قانداق ئېچىش ۋە ماكرونى ئىجرا قىلىش (4 مىسال)

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

    قەدەم باسقۇچلار ھۆججەت ئىزدىگۈچى سۆزلىشىش رامكىسىنى ئىشلىتىپ. ئەگەر سىزدە ئۇنداق بولمىسا ، ئاچقۇچىلار بەتكۈچىنى قوزغىتىشىڭىز كېرەك. ياكى كۆرۈنمە ئاساسىي تەھرىرلىگۈچ نى ئېچىش ئۈچۈن ' Alt + F11' نى باسسىڭىزمۇ بولىدۇ.

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

    • كېيىنكى قەدەمدە ، بۆلەك تەھرىرلىگۈچ كۆزنىكىگە تۆۋەندىكى كودنى كىرگۈزۈڭ:
    9841
    • ئاندىن بۆلەكنى تاقاڭ كۆزنەك.
    • ئۇنىڭدىن كېيىن ، كۆرۈش بەتكۈچ & gt; ماكروس غا كىرىڭ. <. بۇ يەردىكى ئىسىم Open_File_with_Dialog_Box . ئاندىن ئىجرا نى بېسىڭ.

    • ئاندىن يېڭى كۆزنەك ئېچىلىدۇ. ھۆججەت ئىزدىگۈچى سۆزلىشىش رامكىسىدا ئۈلگە نى تاللاڭ ۋە ماقۇل نى بېسىڭ.

    • ئاندىن ھۆججەت ئىسمى ئۈلگە ئېچىلدى. 5>

      Code كودنىڭ بۇزۇلۇشى

      2746

      ⮚ ئالدى بىلەن ، تارماق تەرتىپنىڭ نامىنى تەمىنلەيمىز ، يەنى Sub Open_File_with_Dialog_Box ()

      4282

      ⮚ بىز Dbox نى FileDialog تىپىدىكى

      1823

      دىكى ئۆزگىرىشچان دەپ جاكارلايمىز ⮚ بىز File_Path نى <6 دىكى ئۆزگىرىشچان دەپ جاكارلايمىز> File_Path String type

      9454

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

      Dbox.Title سۆزلىشىش رامكىسىنىڭ نامىنى بەلگىلەيدۇ. ۋە FileType ھۆججەتنىڭ تىپىنى بەلگىلەڭ. < Dbox.Show سۆزلىشىش رامكىسىنى ھۆججەتتە كۆرسىتىدۇ.

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

      5432

      ⮚ ئاخىرىدا ، بىز بۇ كودنىڭ تارماق تەرتىپىنى ئاخىرلاشتۇرىمىز.

      تېخىمۇ كۆپ ئوقۇڭ: Excel VBA ئارقىلىق ھۆججەت قىسقۇچ ۋە ھۆججەتنى تاللاڭ (4 مىسال) ئاندىن ئۇنى خىزمەت دەپتىرى ئارقىلىق ئاچىمىز. خاسلىقنى قوشۇڭ. 7>. ئەگەر سىزدە ئۇنداق بولمىسا ، ئاچقۇچىلار بەتكۈچىنى قوزغىتىشىڭىز كېرەك. ياكى كۆرۈنمە ئاساسىي تەھرىرلىگۈچ نى ئېچىش ئۈچۈن ' Alt + F11' نى باسسىڭىزمۇ بولىدۇ.

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

    كېيىنكى ، بۆلەك تەھرىرلىگۈچ كۆزنىكىگە تۆۋەندىكى كودنى كىرگۈزۈڭ:

    6240
    • ئاندىن بۆلەك كۆزنىكىنى تاقاڭ.
    • كېيىن يەنى بەتكۈچ بەتكۈچ & gt; ماكروس غا كىرىڭ.
    • ئاندىن ماكرونى كۆرۈش نى بېسىڭ. 21>
    • ماكرونى كۆرۈشنى باسقاندىن كېيىن ، ھازىر قۇرغان ماكرونى تاللاڭ. بۇ يەردىكى ئىسىم Open_File_with_Add_Property . ئاندىن ئىجرا نى بېسىڭ. قۇرۇلدى ۋە ئېچىلدى.

    Code كودنىڭ بۇزۇلۇشى تارماق تەرتىپنىڭ ئىسمى

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