استفاده از vlookup در vba

Collapse
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • mokaram
    مدير تالار اکسل و بانک اطلاعاتی

    • 2011/02/06
    • 1805
    • 74.00
    #1

    استفاده از vlookup در vba

    با سلام
    من یه فرم دارم که اطلاعات را تو یه شیت میریزم دو تا باکس دارم که کد مشتری و نام مشتری هست میخوام با vlookup کاری کنم که کد مشتری را که تو تکست باکس 2 میزنم تو تکست باکس 3 نام مشتری بیاد ولی هر میکنم ارور میده.
    کد PHP:
    Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    TextBox3.Text = Application.WorksheetFunction.VLookup(TextBox2.Text, Sheet3.Range("a2:b1000"), 2, 0)
    End Sub 
    (تمامی کدها و نام مشتری ها در شیت 3 موجود است.کد در شیت a و نام مشتری در شیت b)
    آیا فرمول مشکل داره؟
    جواب نمیده
    [CENTER][IMG]http://forum.exceliran.com/signaturepics/sigpic909_10.gif[/IMG]
    [/CENTER]
    برچسب ها: هیچ‌کدام
    • ~M*E*H*D*I~
      مدیر ارشد انجمن

      • 2011/10/19
      • 4377
      • 70.00
      #2
      RE: استفاده از vlookup در vba

      سلام
      باید قبل از کد اضافه کنی on error resume next تا خطا نگیره[hr]
      اگه حل نشد ی اضافه کردن اون کد برو تو قسمت tools/option بعد تو تب general قسمت error trapping گزینه سوم رو انتخاب کن
      [CENTER]
      [SIGPIC][/SIGPIC]
      [/CENTER]

        کامنت

        • Javid Mokhtari
          مدير تالار ويژوال بيسيك

          • 2012/01/16
          • 1212
          • 73.00
          #3
          RE: استفاده از vlookup در vba

          نوشته اصلی توسط barrai
          با سلام
          من یه فرم دارم که اطلاعات را تو یه شیت میریزم دو تا باکس دارم که کد مشتری و نام مشتری هست میخوام با vlookup کاری کنم که کد مشتری را که تو تکست باکس 2 میزنم تو تکست باکس 3 نام مشتری بیاد ولی هر میکنم ارور میده.
          کد PHP:
          Private Sub TextBox2_Exit(ByVal Cancel As MSForms.ReturnBoolean)
          TextBox3.Text = Application.WorksheetFunction.VLookup(TextBox2.Text, Sheet3.Range("a2:b1000"), 2, 0)
          End Sub 
          (تمامی کدها و نام مشتری ها در شیت 3 موجود است.کد در شیت a و نام مشتری در شیت b)
          آیا فرمول مشکل داره؟
          جواب نمیده
          با سلام.
          کد رو به شکل زیر بنویسید ببینید جواب میده:

          TextBox3.Text = Application.WorksheetFunction.VLookup(TextBox2.Tex t, Sheet3.Range("a2:b1000").Value, 2, 0
          [FONT=Tahoma][INDENT][CENTER][SIZE=3][FONT=courier new][B][FONT=comic sans ms][SIZE=3][FONT=arial]دوره های آموزش رایگان اکسل از صفر تا پیشرفته بصورت تصویری
          بیش از [COLOR=#008000]60[/COLOR] جلسه آموزش ویدئویی رایگان

          شرکت در دوره:
          [/FONT][/SIZE]
          [SIZE=5] [FONT=Tahoma][FONT=courier new][B][URL]https://javidsoft.ir/courses/[/URL][/B][/FONT][/FONT][/SIZE][/FONT]
          [/B][/FONT][/SIZE]
          [/CENTER]
          [/INDENT]
          [/FONT]

            کامنت

            • mokaram
              مدير تالار اکسل و بانک اطلاعاتی

              • 2011/02/06
              • 1805
              • 74.00
              #4
              RE: استفاده از vlookup در vba

              متاسفانه هیچ کدوم جواب نداد
              on error resume next را که اضافه کردم دیگه ارور نداد ولی هیچ عملی انجام نشد
              ولی تو روش دوم انجام نشدارور هم داد تلفیق هر دو هم جواب نداد
              [CENTER][IMG]http://forum.exceliran.com/signaturepics/sigpic909_10.gif[/IMG]
              [/CENTER]

                کامنت

                • ~M*E*H*D*I~
                  مدیر ارشد انجمن

                  • 2011/10/19
                  • 4377
                  • 70.00
                  #5
                  RE: استفاده از vlookup در vba

                  فایلو پیوست کن ببینیم مشکل چیه
                  [CENTER]
                  [SIGPIC][/SIGPIC]
                  [/CENTER]

                    کامنت

                    • Javid Mokhtari
                      مدير تالار ويژوال بيسيك

                      • 2012/01/16
                      • 1212
                      • 73.00
                      #6
                      RE: استفاده از vlookup در vba

                      نوشته اصلی توسط barrai
                      متاسفانه هیچ کدوم جواب نداد
                      on error resume next را که اضافه کردم دیگه ارور نداد ولی هیچ عملی انجام نشد
                      ولی تو روش دوم انجام نشدارور هم داد تلفیق هر دو هم جواب نداد
                      آری،باید فایل رو بذارید تا مشکل رو بررسی کنیم...
                      [FONT=Tahoma][INDENT][CENTER][SIZE=3][FONT=courier new][B][FONT=comic sans ms][SIZE=3][FONT=arial]دوره های آموزش رایگان اکسل از صفر تا پیشرفته بصورت تصویری
                      بیش از [COLOR=#008000]60[/COLOR] جلسه آموزش ویدئویی رایگان

                      شرکت در دوره:
                      [/FONT][/SIZE]
                      [SIZE=5] [FONT=Tahoma][FONT=courier new][B][URL]https://javidsoft.ir/courses/[/URL][/B][/FONT][/FONT][/SIZE][/FONT]
                      [/B][/FONT][/SIZE]
                      [/CENTER]
                      [/INDENT]
                      [/FONT]

                        کامنت

                        • mokaram
                          مدير تالار اکسل و بانک اطلاعاتی

                          • 2011/02/06
                          • 1805
                          • 74.00
                          #7
                          RE: استفاده از vlookup در vba

                          اینم قسمتی از فایل نمونه
                          ممنون از لطف اساتید

                          فایل نمونه
                          [CENTER][IMG]http://forum.exceliran.com/signaturepics/sigpic909_10.gif[/IMG]
                          [/CENTER]

                            کامنت

                            • Javid Mokhtari
                              مدير تالار ويژوال بيسيك

                              • 2012/01/16
                              • 1212
                              • 73.00
                              #8
                              RE: استفاده از vlookup در vba

                              برای متن:
                              [align=left]
                              کد PHP:
                              On Error Resume Next
                              TextBox3                              .Text = Application.WorksheetFunction.VLookup(TextBox2.Text, Sheet3.Range("a2:b4").Value, 2, False) 
                              [/align]
                              برای عدد:
                              [align=left]
                              کد PHP:
                              On Error Resume Next
                              TextBox3                              .Text = Application.WorksheetFunction.VLookup(Val(TextBox2.Text), Sheet3.Range("a2:b4").Value, 2, False) 
                              [/align]
                              [FONT=Tahoma][INDENT][CENTER][SIZE=3][FONT=courier new][B][FONT=comic sans ms][SIZE=3][FONT=arial]دوره های آموزش رایگان اکسل از صفر تا پیشرفته بصورت تصویری
                              بیش از [COLOR=#008000]60[/COLOR] جلسه آموزش ویدئویی رایگان

                              شرکت در دوره:
                              [/FONT][/SIZE]
                              [SIZE=5] [FONT=Tahoma][FONT=courier new][B][URL]https://javidsoft.ir/courses/[/URL][/B][/FONT][/FONT][/SIZE][/FONT]
                              [/B][/FONT][/SIZE]
                              [/CENTER]
                              [/INDENT]
                              [/FONT]

                                کامنت

                                • mokaram
                                  مدير تالار اکسل و بانک اطلاعاتی

                                  • 2011/02/06
                                  • 1805
                                  • 74.00
                                  #9
                                  RE: استفاده از vlookup در vba

                                  ممنون جاوید جان
                                  متشکر
                                  [CENTER][IMG]http://forum.exceliran.com/signaturepics/sigpic909_10.gif[/IMG]
                                  [/CENTER]

                                    کامنت

                                    • Nima

                                      • 2011/07/22
                                      • 385
                                      #10
                                      RE: استفاده از vlookup در vba

                                      نوشته اصلی توسط jansiz hayat
                                      برای متن:
                                      [align=left]
                                      کد PHP:
                                      On Error Resume Next
                                      TextBox3                                      .Text = Application.WorksheetFunction.VLookup(TextBox2.Text, Sheet3.Range("a2:b4").Value, 2, False) 
                                      [/align]
                                      برای عدد:
                                      [align=left]
                                      کد PHP:
                                      On Error Resume Next
                                      TextBox3                                      .Text = Application.WorksheetFunction.VLookup(Val(TextBox2.Text), Sheet3.Range("a2:b4").Value, 2, False) 
                                      جاوید جان سلام

                                      من وقتی از این کد استفاده می کنم ارور 1004 :
                                      (unable to get VLookup property of the WorksheetFunction class)
                                      میده به نظر میرسه که نمیتونه تابع vlookup رو تو فرم اجرا کنه راه حلش چیه؟

                                      با تشکر
                                      [/align]
                                      [CENTER][COLOR=#ff0000]************************************[/COLOR]
                                      No [COLOR=#32CD32][B]LION's [/B][/COLOR]roar ruins my hut, I afraid of [COLOR=#ff0000][B]TERMITE's [/B][/COLOR]silence
                                      [COLOR=#ff0000]************************************[/COLOR]

                                      [/CENTER]

                                        کامنت

                                        • Javid Mokhtari
                                          مدير تالار ويژوال بيسيك

                                          • 2012/01/16
                                          • 1212
                                          • 73.00
                                          #11
                                          RE: استفاده از vlookup در vba


                                          جاوید جان سلام

                                          من وقتی از این کد استفاده می کنم ارور 1004 :
                                          (unable to get VLookup property of the WorksheetFunction class)
                                          میده به نظر میرسه که نمیتونه تابع vlookup رو تو فرم اجرا کنه راه حلش چیه؟
                                          -----------------------------------------------------------------------------------------------------------------------------------
                                          سلام اخوی.
                                          اما برا من جواب میده.
                                          لطفاً فایلی قرار بدین...

                                          [FONT=Tahoma][INDENT][CENTER][SIZE=3][FONT=courier new][B][FONT=comic sans ms][SIZE=3][FONT=arial]دوره های آموزش رایگان اکسل از صفر تا پیشرفته بصورت تصویری
                                          بیش از [COLOR=#008000]60[/COLOR] جلسه آموزش ویدئویی رایگان

                                          شرکت در دوره:
                                          [/FONT][/SIZE]
                                          [SIZE=5] [FONT=Tahoma][FONT=courier new][B][URL]https://javidsoft.ir/courses/[/URL][/B][/FONT][/FONT][/SIZE][/FONT]
                                          [/B][/FONT][/SIZE]
                                          [/CENTER]
                                          [/INDENT]
                                          [/FONT]

                                            کامنت

                                            • mahsa shayesteh

                                              • 2011/12/07
                                              • 272
                                              #12
                                              RE: استفاده از vlookup در vba

                                              سلام
                                              این اتفاق برای من سر یه کاری خیلی افتاده انگار به تنظیمات و نحوه نصب اکسل ربط داره رو لپ تاپم کامل اجرا میشد ولی رو سیستم اداره همین خطارو میداد منم اکسل رو دوباره نصب کردم درس شد
                                              [color=#FF0000]در روزگاری که لبخند ادمها بخاطر شکست توست برخیز تا بگریند[/color]

                                                کامنت

                                                • Javid Mokhtari
                                                  مدير تالار ويژوال بيسيك

                                                  • 2012/01/16
                                                  • 1212
                                                  • 73.00
                                                  #13
                                                  RE: استفاده از vlookup در vba

                                                  نوشته اصلی توسط mahasa shayesteh
                                                  سلام
                                                  این اتفاق برای من سر یه کاری خیلی افتاده انگار به تنظیمات و نحوه نصب اکسل ربط داره رو لپ تاپم کامل اجرا میشد ولی رو سیستم اداره همین خطارو میداد منم اکسل رو دوباره نصب کردم درس شد
                                                  خطای بالا مربوط به نوع مقدار جست و جو می باشد که برای کد غیر منطقی می باشد.مثلاً نوع داده جست و جو ، متنی باشد ولی شما عدد را وارد کنید.
                                                  [FONT=Tahoma][INDENT][CENTER][SIZE=3][FONT=courier new][B][FONT=comic sans ms][SIZE=3][FONT=arial]دوره های آموزش رایگان اکسل از صفر تا پیشرفته بصورت تصویری
                                                  بیش از [COLOR=#008000]60[/COLOR] جلسه آموزش ویدئویی رایگان

                                                  شرکت در دوره:
                                                  [/FONT][/SIZE]
                                                  [SIZE=5] [FONT=Tahoma][FONT=courier new][B][URL]https://javidsoft.ir/courses/[/URL][/B][/FONT][/FONT][/SIZE][/FONT]
                                                  [/B][/FONT][/SIZE]
                                                  [/CENTER]
                                                  [/INDENT]
                                                  [/FONT]

                                                    کامنت

                                                    • mahsa shayesteh

                                                      • 2011/12/07
                                                      • 272
                                                      #14
                                                      RE: استفاده از vlookup در vba

                                                      نوشته اصلی توسط jansiz hayat
                                                      نوشته اصلی توسط mahasa shayesteh
                                                      سلام
                                                      این اتفاق برای من سر یه کاری خیلی افتاده انگار به تنظیمات و نحوه نصب اکسل ربط داره رو لپ تاپم کامل اجرا میشد ولی رو سیستم اداره همین خطارو میداد منم اکسل رو دوباره نصب کردم درس شد
                                                      خطای بالا مربوط به نوع مقدار جست و جو می باشد که برای کد غیر منطقی می باشد.مثلاً نوع داده جست و جو ، متنی باشد ولی شما عدد را وارد کنید.
                                                      سلام آقای مختاری
                                                      ولی تو یک سیستم درست بود یک سیستم دیگه پیغام خطا میداد
                                                      [color=#FF0000]در روزگاری که لبخند ادمها بخاطر شکست توست برخیز تا بگریند[/color]

                                                        کامنت

                                                        قبلی template بعدی
                                                        چند لحظه..