نمایش نتایج: از شماره 1 تا 4 , از مجموع 4

موضوع: vlookup چند گانه 2

  1. #1


    آخرین بازدید
    2023/06/27
    تاریخ عضویت
    August 2014
    محل سکونت
    تهران
    نوشته ها
    47
    امتیاز
    36
    سپاس
    20
    سپاس شده
    19 در 11 پست
    سطح اکسل
    39.00 %

    vlookup چند گانه 2

    با توجه به اطلاعات شیت یک فایل پیوست با سرچ کردن توسط تابع vlookupبه اطلاعات شیت دو برسم.
    این همان سوال قبلی که توسط بنده مطرح شد و خیلی واضح نبود مجددا پرسش رو با ویرایش فایل پیوست قبل مطرح کردم.
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.
    فايل هاي پيوست شده فايل هاي پيوست شده

  2.  

  3. #2


    آخرین بازدید
    2023/08/17
    تاریخ عضویت
    March 2015
    محل سکونت
    آمل
    نوشته ها
    3,343
    امتیاز
    11575
    سپاس
    1,885
    سپاس شده
    8,165 در 3,011 پست
    تعیین سطح نشده است

    با سلام

    در فایل پیوست با استفاده از ویژوال بیسیک یک لیست بدون تکرار در شیت اول ایجاد گردید و سپس مقدار هر شخص در سلول روبرو در یک ردیف لیست گردید

    کد PHP:
    Sub UniqueCopy()
     
    Sheet1.Range("1:20").Clear
     On Error Resume Next
     Sheet2
    .Select
        With ActiveSheet
             
    .Range("A1", .Range("A65536").End(xlUp)).AdvancedFilter _
                 Action
    :=xlFilterCopyCopyToRange:=Sheet1.Range("A1"), Unique:=True
        End With
    On Error 
    GoTo 0

    test

    End Sub

    Sub test
    ()
    Dim k As Integer

    Sheet1.Cells(Sheet1.Rows.Count"A").End(xlUp).Row
    Sheet2.Cells(Sheet2.Rows.Count"A").End(xlUp).Row
    For 2 To Z
    2
    For 2 To y

    If LCase(Sheet1.Range("A" I).Value) = LCase(Sheet2.Range("A" j).ValueThen

    Sheet1
    .Cells(Ik).Value Sheet2.Range("b" j).Value

    1

    Sheet1
    .Cells(Ik).Value Sheet2.Range("c" j).Value
    1

    'Sheet1.Cells(i, k).Value = Sheet2.Range("d" & j).Value'
    'k = k + 1'

    'Sheet1.Cells(i, k).Value = Sheet2.Range("e" & j).Value'
    'k = k + 1'


    End If

    Next
    Next


    End Sub 
    فايل هاي پيوست شده فايل هاي پيوست شده

  4. سپاس ها (3)


  5. #3


    آخرین بازدید
    2023/06/27
    تاریخ عضویت
    August 2014
    محل سکونت
    تهران
    نوشته ها
    47
    امتیاز
    36
    سپاس
    20
    سپاس شده
    19 در 11 پست
    سطح اکسل
    39.00 %

    سلام جناب مهندس
    راه حلی به جز ویژوال بیسیک وجود نداره؟ من میخوام از طریق فرمول ها برای فایلی که داه های زیادی دارم و حجمش هم خیلی زیاد هستش،فرمول بنویسم و برای همه داده هام اجرا کنم.
    با سپاس

  6. #4


    آخرین بازدید
    2023/08/17
    تاریخ عضویت
    March 2015
    محل سکونت
    آمل
    نوشته ها
    3,343
    امتیاز
    11575
    سپاس
    1,885
    سپاس شده
    8,165 در 3,011 پست
    تعیین سطح نشده است

    نقل قول نوشته اصلی توسط mehrabn نمایش پست ها
    سلام جناب مهندس
    راه حلی به جز ویژوال بیسیک وجود نداره؟ من میخوام از طریق فرمول ها برای فایلی که داه های زیادی دارم و حجمش هم خیلی زیاد هستش،فرمول بنویسم و برای همه داده هام اجرا کنم.
    با سپاس
    با سلام

    من فرمولی رو برای اینکار بخاطر ندارم، باید نظر سایر دوستان در انجمن رو جویا بشیم

    یک نمونه فایل با داده بیشتر ضمیمه کنید بهتر میشه نتیجه گیری نمود
    ویرایش توسط iranweld : 2015/10/14 در ساعت 11:29


اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

موضوعات مشابه

  1. vlookup چند گانه
    توسط mehrabn در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 2
    آخرين نوشته: 2015/10/07, 12:53
  2. for each یا vlookup ؟
    توسط majidartoor در انجمن فرم ها در ويژوال بيسيك - Forms in VBA
    پاسخ ها: 1
    آخرين نوشته: 2014/11/20, 23:00
  3. هزار و یک شب اکسل - شب چهل وسوم جستجو با Vlookup در جهت عکس (سمت چپ ) Reverse Vlookup
    توسط امين اسماعيلي در انجمن ترفندهای اکسل Excel Tricks
    پاسخ ها: 6
    آخرين نوشته: 2014/05/07, 21:24
  4. حالت خاص در فرمول vlookup
    توسط master در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 6
    آخرين نوشته: 2014/02/25, 19:33
  5. حل مشکل vlookup با کمک ماکرو
    توسط sshamedk در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 3
    آخرين نوشته: 2013/12/26, 00:05

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

انجمن اكسل ايران , اكسل , اكسس , سوال و جواب اكسل , سوال اكسس , انجمن اكسل ايران , توابع اكسل, آموزش اكسل, آموزش اكسس, VBA, ويژوال بيسيك

کلمات کلیدی این موضوع

علاقه مندی ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است
با ما در تماس باشيد