پرفروش ترين
برترين
آخرين محصولات فروشگاه
فایل الکترونیکی آموزش اکسل پیشرفته ۲۰۱۰
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
نمایش نتایج: از شماره 1 تا 1 , از مجموع 1

موضوع: پاک کردن ردیف های خالی

  1. #1


    آخرین بازدید
    تاریخ عضویت
    January 2014
    نوشته ها
    800
    امتیاز
    1684
    سپاس
    594
    سپاس شده
    1,259 در 438 پست
    تعیین سطح نشده است

    پاک کردن ردیف های خالی

    با سلام
    با این کد می تونین ردیف های خالی رو حذف کنین
    کد:
    Sub DeleteEmptyRows()
    '
    'This macro will delete all rows, which are missing data in a 
    'particular column, underneath and including the selected cell.
    '
    Dim Counter
    Dim i As Integer
    Counter = InputBox("Enter the total number of rows to process")
    ActiveCell.Select
    For i = 1 To Counter
    If ActiveCell = "" Then
    Selection.EntireRow.Delete
    Counter = Counter - 1
    Else
    ActiveCell.Offset(1, 0).Select
    End If
    
    Next i
    End Sub
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2. سپاس ها (2)


  3.  


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

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

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

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

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

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

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

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

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