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

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

  1. #1


    آخرین بازدید
    14 _ 03 _ 2013
    تاریخ عضویت
    June_2012
    نوشته ها
    50
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست

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

    با سلام،

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


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

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

  2.  

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


    آخرین بازدید
    یک روز پیش
    تاریخ عضویت
    February_2011
    محل سکونت
    ســــاوه
    نوشته ها
    1,523
    امتیاز
    5549
    سپاس
    6,348
    سپاس شده
    4,345 در 1,207 پست

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

    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


    آخرین بازدید
    14 _ 03 _ 2013
    تاریخ عضویت
    June_2012
    نوشته ها
    50
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست

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

    خیلی* ممنونم.

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

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


    ممنون

  5. #4


    آخرین بازدید
    2 روز پیش
    تاریخ عضویت
    October_2012
    نوشته ها
    60
    امتیاز
    12
    سپاس
    118
    سپاس شده
    32 در 15 پست

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

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

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

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


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

  6. #5


    آخرین بازدید
    14 _ 03 _ 2013
    تاریخ عضویت
    June_2012
    نوشته ها
    50
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست

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

    با سلام،

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

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


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

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

    Non-Available
    Available
    Lack of information


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


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

  7. #6


    آخرین بازدید
    14 _ 03 _ 2013
    تاریخ عضویت
    June_2012
    نوشته ها
    50
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست

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

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

  8. #7


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

    یوزرفرم پیشرفته
    آخرین بازدید
    01 _ 05 _ 2016
    تاریخ عضویت
    February_2011
    محل سکونت
    تهران
    نوشته ها
    311
    امتیاز
    1436
    سپاس
    129
    سپاس شده
    548 در 155 پست

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

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

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

  9. #8


    آخرین بازدید
    3 هفته پیش
    تاریخ عضویت
    February_2010
    محل سکونت
    بوشهر
    نوشته ها
    922
    امتیاز
    643
    سپاس
    29
    سپاس شده
    789 در 337 پست

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

    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


    آخرین بازدید
    02 _ 07 _ 2014
    تاریخ عضویت
    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 حذف ردیف سطر خالی

کمبکس

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

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