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

موضوع: شمارش رديفها

  1. #1


    آخرین بازدید
    2022/09/06
    تاریخ عضویت
    November 2010
    نوشته ها
    140
    امتیاز
    23
    سپاس
    22
    سپاس شده
    25 در 22 پست
    سطح اکسل
    68.00 %

    شمارش رديفها

    درستون a اعدادي به شرح زير دارم كه اعداد آن در حال تغيير هست وممكنه اعداد ديگري جايگزين شوند . مي خوام در ستون ديگري مثلا c اعداد از 1 شمارش بشن و وقتي به اون عدد(4) رسيدند شمارش از سطر بعدي براي دومين عدد شروع بشه و وقتي به دومين عدد(2) رسيد شمارش سطر سوم از 1 شروع بشه وبه عدد اون سل (3) برسه و همينطور به سلهاي بعدي اين شمارش ادامه داشته باشه. در فايل زير ستون a وستون c آورده شده .

    http://gigpars.com/images/wjia_book1.xlsx
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2.  

  3. #2


    آخرین بازدید
    2024/02/06
    تاریخ عضویت
    January 2012
    محل سکونت
    کاشان
    نوشته ها
    170
    امتیاز
    602
    سپاس
    7
    سپاس شده
    372 در 125 پست
    تعیین سطح نشده است

    smartman به  ICQ ارسال پیام smartman به MSN ارسال پیام smartman به Yahoo ارسال پیام

    RE: شمارش رديفها

    کد:
    Sub CustomFill()
        i = 1
        j = 1
        m = 1
        n = 3
        Do While Cells(i, j).Value > 0
            For num = 1 To Cells(i, j).Value
                Cells(m, n) = num
                m = m + 1
            Next
            i = i + 1
        Loop
    End Sub
    i= شماره سطر اولین سل مبدا
    j= شماره ستون اولین سل مبدا

    m= شماره سطر اولین سل مقصد
    n= شماره ستون اولین سل مقصد

  4. #3


    آخرین بازدید
    2022/09/06
    تاریخ عضویت
    November 2010
    نوشته ها
    140
    امتیاز
    23
    سپاس
    22
    سپاس شده
    25 در 22 پست
    سطح اکسل
    68.00 %

    RE: شمارش رديفها

    سلام اين كد رو كجا قرار بدم تا هميشه فعال باشه

  5. #4


    آخرین بازدید
    2024/02/06
    تاریخ عضویت
    January 2012
    محل سکونت
    کاشان
    نوشته ها
    170
    امتیاز
    602
    سپاس
    7
    سپاس شده
    372 در 125 پست
    تعیین سطح نشده است

    smartman به  ICQ ارسال پیام smartman به MSN ارسال پیام smartman به Yahoo ارسال پیام

    RE: شمارش رديفها

    داخل یک ماژول!

  6. #5


    آخرین بازدید
    2016/08/18
    تاریخ عضویت
    December 2010
    نوشته ها
    398
    امتیاز
    253
    سپاس
    750
    سپاس شده
    383 در 159 پست
    تعیین سطح نشده است

    RE: شمارش رديفها

    با سلام
    لطفاً اگر میشه کد ماژول رو تو فایل نمونه بزارین تا عملکردش رو ببینیم
    با تشکر

  7. #6


    آخرین بازدید
    2022/09/06
    تاریخ عضویت
    November 2010
    نوشته ها
    140
    امتیاز
    23
    سپاس
    22
    سپاس شده
    25 در 22 پست
    سطح اکسل
    68.00 %

    RE: شمارش رديفها

    منظورم اين نبود منظور اينه كه به چه صورتي ويا در كجاه قراربدم وقتي سلهاي اولي تغيير كردند اين شمارش ها همزمان تغيير يابند

  8. #7


    آخرین بازدید
    2024/02/06
    تاریخ عضویت
    January 2012
    محل سکونت
    کاشان
    نوشته ها
    170
    امتیاز
    602
    سپاس
    7
    سپاس شده
    372 در 125 پست
    تعیین سطح نشده است

    smartman به  ICQ ارسال پیام smartman به MSN ارسال پیام smartman به Yahoo ارسال پیام

    RE: شمارش رديفها



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

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

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

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

شمارش exceliran.com

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

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

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