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

موضوع: حذف سل‌های خالی‌ در کمبکس

  1. #1


    آخرین بازدید
    2013/03/14
    تاریخ عضویت
    June 2012
    نوشته ها
    50
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    حذف سل‌های خالی‌ در کمبکس

    با سلام،

    چگونه میشود ، کاری کرد ک سل های خالی‌ ( blank) ستون "A " در کمبکس دیده نشوند و فقط سل‌های که دارای مقدار هستند نشان داده شود ؟


    آدرس دريافت فايل :
    http://persiandrive.com/889287

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

  2.  

  3. #2
    mokaram آنلاین نیست.
    مدير تالار اکسل و بانک اطلاعاتی


    محصولات کاربر

    ويدئوي ايجاد سطح دسترسي
    آخرین بازدید
    2023/04/20
    تاریخ عضویت
    February 2011
    محل سکونت
    ســــاوه
    نوشته ها
    1,805
    امتیاز
    6409
    سپاس
    8,100
    سپاس شده
    5,163 در 1,502 پست
    سطح اکسل
    74.00 %

    mokaram به Yahoo ارسال پیام

    RE: حذف سل‌های خالی‌ در کمبکس

    از این کد استفاده کن

    dim c as range
    for each c in sheet1.range("a2:a100")
    if c<>"" then
    combobox1.additem c.value
    end if
    next c

  4. #3


    آخرین بازدید
    2013/03/14
    تاریخ عضویت
    June 2012
    نوشته ها
    50
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: حذف سل‌های خالی‌ در کمبکس

    خیلی‌ ممنونم.

    آیتم‌های ستون "A " وجود دارند و غیر قابل تغییر هستند و باید براساس آنها کار کنم.

    از کد شما نتونستم استفاده کنم. خطا میدهد در سطر ۴.


    ممنون

  5. #4


    آخرین بازدید
    2020/05/21
    تاریخ عضویت
    October 2012
    نوشته ها
    60
    امتیاز
    13
    سپاس
    118
    سپاس شده
    33 در 15 پست
    سطح اکسل
    75.00 %

    RE: حذف سل‌های خالی‌ در کمبکس

    نقل قول نوشته اصلی توسط amirgolshan
    خیلی‌ ممنونم.

    آیتم‌های ستون "A " وجود دارند و غیر قابل تغییر هستند و باید براساس آنها کار کنم.

    از کد شما نتونستم استفاده کنم. خطا میدهد در سطر ۴.


    ممنون
    دوست عزیزمون کد رو صحیح نوشتن احتمالا" اسم کمبو باکس شما combobox1 نیست که خطا میدهد

  6. #5


    آخرین بازدید
    2013/03/14
    تاریخ عضویت
    June 2012
    نوشته ها
    50
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: حذف سل‌های خالی‌ در کمبکس

    با سلام،

    خیلی‌ سپاسگزارم.

    من تسلط به کد نویسی ندارم ، شاید به همین دلیل هست ک نیمیتونم از کد شما درست استفاده کنم.
    به هر حال از کمک و راهنمایی کاملِ شما دوستان عزیز خیلی‌ ممنونم.


    در فایل پیوست ، من مجدداً نتونستم از این کد استفاده کنم.

    هدف من این هست ک در کمبکس فقط ۳ آیتم زیر نمایش داده شود :

    Non-Available
    Available
    Lack of information


    آدرس دريافت فايل :
    http://persiandrive.com/661986


    مجدداً سپاسگزارم از راهنمایی شما.

  7. #6


    آخرین بازدید
    2013/03/14
    تاریخ عضویت
    June 2012
    نوشته ها
    50
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    RE: حذف سل‌های خالی‌ در کمبکس

    کیست مرا یاری دهد ؟

  8. #7


    محصولات کاربر

    یوزرفرم پیشرفته
    آخرین بازدید
    2018/06/18
    تاریخ عضویت
    February 2011
    محل سکونت
    تهران
    نوشته ها
    311
    امتیاز
    1448
    سپاس
    129
    سپاس شده
    560 در 159 پست
    تعیین سطح نشده است

    s.cheraghi به Yahoo ارسال پیام

    RE: حذف سل‌های خالی‌ در کمبکس

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

  9. #8


    آخرین بازدید
    2021/12/05
    تاریخ عضویت
    February 2010
    محل سکونت
    بوشهر
    نوشته ها
    940
    امتیاز
    718
    سپاس
    29
    سپاس شده
    863 در 365 پست
    تعیین سطح نشده است

    shamsololama به Yahoo ارسال پیام

    RE: حذف سل‌های خالی‌ در کمبکس

    نقل قول نوشته اصلی توسط amirgolshan
    با سلام،

    خیلی‌ سپابدزارم.

    من تسلط به کد نویسی ندارم ، شاید به همین دلیل هست ک نیمیتونم از کد شما درست استفاده کنم.
    به هر حال از کمک و راهنمایی کاملِ شما دوستان عزیز خیلی‌ ممنونم.


    در فایل پیوست ، من مجدداً نتونستم از این کد استفاده کنم.

    هدف من این هست ک در کمبکس فقط ۳ آیتم زیر نمایش داده شود :

    Non-Available
    Available
    Lack of information


    آدرس دريافت فايل :
    http://persiandrive.com/661986


    مجدداً سپابدزارم از راهنمایی شما.
    با درود فراوان

    در کدی که دوست عزیزمون نوشته بودن و مشکلی هم نداشت برای برنامه شما با مشکل بر میخورین دلیلش هم اینه که شما نیاز دارین در کومبوباکس دو ستون را اد کنید یعنی هم ستون A هم ستون B چون بر اساس انتخاب از کمبو می خواهید تکست باکس را پر کنید برای همین یک خط کد دیگه هم نیاز دارین که بهش اضافه کنید یعنی خط ششم تا ستون دوم کمبو باکس هم اضاف شود هرچند در کمبو نمایش داده نمیشه (البته اگر بخواین می تونین نمایشش بدین)

    Private Sub UserForm_Initialize()
    Dim c As Range
    For Each c In Sheet1.Range("a1:a100")
    If c <> "" Then
    ComboBox1.AddItem c.Value
    ComboBox1.List(ComboBox1.ListCount - 1, 1) = c.Offset(0, 1).Value
    End If
    Next c
    End Sub


    فایل نمونه:

    [attachment=1031]
    فايل هاي پيوست شده فايل هاي پيوست شده

  10. #9


    آخرین بازدید
    2014/07/02
    تاریخ عضویت
    October 2012
    نوشته ها
    21
    امتیاز
    1
    سپاس
    334
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    RE: حذف سل‌های خالی‌ در کمبکس

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

    ای نمونه کد هم میتونه این کار رو انجام بده
    با این خصوصیت که ردیف های تکراری رو هم حذف میکنه

    .................................................. .....................

    Private Sub UserForm_Initialize()

    Dim col As New Collection
    Dim r As Long
    Dim m As Long

    m = Sheet1.Range("A" & Rows.Count).End(xlUp).Row
    On Error Resume Next
    For r = 1 To m
    If Sheet1.Range("A" & r).Value <> "" Then
    col.Add Item:=Sheet1.Range("A" & r).Value, Key:=CStr(Sheet1.Range("A" & r).Value)
    End If
    Next r
    For r = 1 To col.Count
    Me.ComboBox1.AddItem col( r)
    Next r


    End Sub


    .................................................. ..................


    این هم نمونه فایل

    دانلود


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

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

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

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

xls حذف ردیف سطر خالی

کمبکس

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

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

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