پرفروش ترين
برترين
آخرين محصولات فروشگاه
فایل الکترونیکی آموزش اکسل پیشرفته ۲۰۱۰
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
یوزرفرم پیشرفته -Advanced  User Form
داشبورد (مقدماتی) – Dashboards(Elementary)
ابزارهای اعتبار سنجی و اخطار دهنده
بسته آموزشی userform
مدیریت و کنترل خطا در اکسل
توابع متنی
گرافیک در اکسل
جزوه آموزشی جداول و نمودارهای پاشنه ای
فایل آموزشی نحوه تهیه فرمت عددی دلخواه یا custom number format cell
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
صفحه 1 از 2 12 آخرینآخرین
نمایش نتایج: از شماره 1 تا 10 , از مجموع 11

موضوع: کمبو باکس بدون تکرار

  1. #1


    آخرین بازدید
    20 _ 10 _ 2015
    تاریخ عضویت
    December_2011
    نوشته ها
    275
    امتیاز
    238
    سپاس
    216
    سپاس شده
    218 در 73 پست

    کمبو باکس بدون تکرار

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

  2. سپاس ها (1)


  3.  

  4. #2


    آخرین بازدید
    3 روز پیش
    تاریخ عضویت
    October_2011
    محل سکونت
    Sheet1!A1
    نوشته ها
    4,149
    امتیاز
    11584
    سپاس
    4,476
    سپاس شده
    10,966 در 2,948 پست

    RE: کمبو باکس بدون تکرار

    سلام
    شما باید داده ها رو تو یه ارایه بریزی بعد با دوتا متغیر تو حلقه forاونهارو مقایسه کنی و غیر تکراری هارو تو یه ارایه دیگه ذخیره کنی بعد این ارایه رو به کمبو باکس اضافه کنی

  5. سپاس ها (1)


  6. #3


    آخرین بازدید
    8 ساعت پیش
    تاریخ عضویت
    January_2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,169
    امتیاز
    2482
    سپاس
    1,383
    سپاس شده
    1,938 در 616 پست

    jansiz hayat به Yahoo ارسال پیام

    RE: کمبو باکس بدون تکرار


  7. سپاس ها (1)


  8. #4


    آخرین بازدید
    03 _ 04 _ 2017
    تاریخ عضویت
    February_2010
    محل سکونت
    بوشهر
    نوشته ها
    922
    امتیاز
    653
    سپاس
    29
    سپاس شده
    799 در 342 پست

    shamsololama به Yahoo ارسال پیام فرستادن پیام با Skype به shamsololama

    RE: کمبو باکس بدون تکرار

    نقل قول نوشته اصلی توسط mahasa shayesteh
    سلام به دوستای عزیز
    من یه ستون از داده ها دارم که توش داده های تکراری هس تو محیط اکسل نمیخوام داده ها یونیک بشن می خوام یه فرم بسازم با یه کمبو باکس که از طریق کد نویسی داده های تکراری تشخیص داده بشه و لیستی که نشون داده میشه یونیک باشه
    با درود فراوان

    با تشکر از دوست خوبم jansiz hayat ازجواب خوب و کاملشون
    این هم یک نمونه برای حذف تکراری از کمبو باکس


    Private Sub UserForm_Initialize()
    Dim n
    Dim c As Range
    Dim i As Integer
    ComboBox1.AddItem Sheet1.Range("A1").Value
    For Each c In Sheet1.Range("A1:A1000")

    n = fals
    If c.Value <> "" Then
    For i = 0 To ComboBox1.ListCount - 1

    If ComboBox1.List(i, 0) = c.Text Then
    ' MsgBox (ComboBox1.List(i, 0)) & "-" & c.Value
    n = True
    GoTo point1:
    End If
    Next i
    If n = flase Then
    ComboBox1.AddItem c.Value
    End If
    End If
    point1:
    Next c
    End Sub



    فایل نمونه:
    [attachment=484]
    فايل هاي پيوست شده فايل هاي پيوست شده

  9. سپاس ها (2)


  10. #5


    آخرین بازدید
    3 روز پیش
    تاریخ عضویت
    October_2011
    محل سکونت
    Sheet1!A1
    نوشته ها
    4,149
    امتیاز
    11584
    سپاس
    4,476
    سپاس شده
    10,966 در 2,948 پست

    RE: کمبو باکس بدون تکرار

    با سلام
    روشی که تو فایل ضمیمه آوردم هم روش خوبیه
    فايل هاي پيوست شده فايل هاي پيوست شده

  11. سپاس ها (1)


  12. #6


    آخرین بازدید
    20 _ 10 _ 2015
    تاریخ عضویت
    December_2011
    نوشته ها
    275
    امتیاز
    238
    سپاس
    216
    سپاس شده
    218 در 73 پست

    RE: کمبو باکس بدون تکرار

    سلام
    ممنون از جوابای متنوعی که دوستان دادن ولی جواب آقای وطن پرست رو اصلا نفهمیدم میشه توضیح بدید

  13. #7


    آخرین بازدید
    3 روز پیش
    تاریخ عضویت
    October_2011
    محل سکونت
    Sheet1!A1
    نوشته ها
    4,149
    امتیاز
    11584
    سپاس
    4,476
    سپاس شده
    10,966 در 2,948 پست

    RE: کمبو باکس بدون تکرار

    تو این روش برای جلوگیری از اشغال بی مورد حافظه ابتدا آدرس آخرین ردیف استفاده شده رو پیدا میکنیم بعد بر اساس اون محدوده مورد نظر در قالب range1 تعریف میشه (از طریق set ) شیء collection این امکان رو میده مجموعه ای از ایتم ها به صورت واحد در بیان یعنی تو یک گروه قرار بگیرن هر کالکشن دو خصوصیت ایتم و کلید داره هر مقدار تو محدوده به عنوان کلید تعریف میشه این کلید ها باید منحصر به فرد باشن اگه نباشن error 457 به وجود میاد با شرط قرار دادن این ارور تکراری ها به کمبوباکس اضافه نمیشن (البته من این بخش یعنی حلقه foreach رو از یه برنامه دیگه استفاده کردم که کار خودم نبوده توضیحاتم برداشت خودم از روش بود اگه اساتید محترم هم نظر بدن ممنون میشم)

  14. #8


    آخرین بازدید
    8 ساعت پیش
    تاریخ عضویت
    January_2012
    محل سکونت
    استان اردبیل / شهرستان پارس آباد (مغان)
    نوشته ها
    1,169
    امتیاز
    2482
    سپاس
    1,383
    سپاس شده
    1,938 در 616 پست

    jansiz hayat به Yahoo ارسال پیام

    RE: کمبو باکس بدون تکرار

    با سلام.
    با تشکر از دوست زحمتکشمون آقای وطن پرست.این خیلی خوبه که برای یک سئوال ایده های دیگری هم قرار دهیم.و به خومون نگیم که «چون یکی از دوستان جواب داده دیگه نیازی نیست که من جواب بدم».و این کار آقای وطن پرست قابل تقدیر است که باعث میشه با ایده های مختلفی روبرو شویم.

    آقای وطن پرست،لازم نمیدونم ذره بینی به مسئله نگاه کنیم اما اگه قسمت IFرو به صورت زیر بنویسید بهتره.چون اگه بین داده ها سطر خالی باشه،اون سطر خالی رو هم به Combobox اضافه میکنه:

    If Err.Number <> 457 And cell.Value <> "" Then

  15. سپاس ها (1)


  16. #9


    آخرین بازدید
    3 هفته پیش
    تاریخ عضویت
    July_2011
    محل سکونت
    تهران
    نوشته ها
    385
    امتیاز
    856
    سپاس
    666
    سپاس شده
    1,348 در 369 پست

    فرستادن پیام با Skype به Nima

    RE: کمبو باکس بدون تکرار

    نقل قول نوشته اصلی توسط vatanparast
    با سلام
    روشی که تو فایل ضمیمه آوردم هم روش خوبیه
    با سلام خدمت اقای وطن پرست عزیز

    من از این کدی که شما گذاشتین استفاده کردم ولی وقتی که تعداد ردیفهای ما زیاد باشه زمان لود شدن فرم خیلی زیاد طول می کشه

    مثلا من برای یه فایلی که 25000 تا ردیف داره تست کردم 21 ثانیه طول میکشه تا فرم لود بشه

    راهی هست که این زمان کم بشه

    با تشکر

  17. سپاس ها (1)


  18. #10


    آخرین بازدید
    3 هفته پیش
    تاریخ عضویت
    July_2011
    محل سکونت
    تهران
    نوشته ها
    385
    امتیاز
    856
    سپاس
    666
    سپاس شده
    1,348 در 369 پست

    فرستادن پیام با Skype به Nima

    RE: کمبو باکس بدون تکرار

    ... Any new updates

  19. سپاس ها (2)



صفحه 1 از 2 12 آخرینآخرین

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

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

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

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

عدم تکرار داده ها در کمبوباکس

فرستادن ado به combo box بدون آیتم تکراری

کمبو باکس استان و شهرستان در اکسس

اضافه اردن ایتم به کامبو باکس با کد نویسی

نحوه ایجاد کمبو باکس در اکسس استان و شهر

ایجاد کمبو باکس شهرستان و استان در اکسس

کمبو باکس در فرم اکسس حذف تکراری

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

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