مرحوم محمد محمدی

🖤 پیام تسلیت

با نهایت تأسف و تأثر، باخبر شدیم جناب آقای محمد محمدی با نام کاربری smartman ، از مدیران ارزشمند انجمن اکسل ایران، دار فانی را وداع گفته‌اند.

ایشان سال‌ها با دانش، تجربه، اخلاق نیکو و روحیه کمک به دیگران، سهم بزرگی در رشد و پویایی انجمن داشتند و خاطره حضور ارزشمندشان همواره در ذهن اعضای انجمن باقی خواهد ماند.

مدیریت و اعضای انجمن ExcelIran این ضایعه را به خانواده محترم ایشان، دوستان و تمامی اعضای انجمن تسلیت عرض نموده و از خداوند متعال برای آن مرحوم، رحمت و مغفرت الهی و برای بازماندگان صبر و شکیبایی مسئلت دارند.

انا لله و انا الیه راجعون

اصلاح کد index

Collapse
این تاپیک قفل است.
X
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • sanjesh_88

    • 2017/01/02
    • 48
    #1

    [حل شده] اصلاح کد index

    سلام کد زیر کمترین مقدار در 10 سطر آخر را با استفاده از تابع offset در یک فایل حساب و آن را در یک فایل دیگر می ریزد

    کد PHP:
    MIN(OFFSET('1.xls'!$B$1;COUNTA('1.xls'!B:B)-1;0;-10;-1)) 
    اما بنده می خواهم همین کد را با استفاده از تابع index بنویسم که نمی دونم چگونه 10 سطر آخر را به دست بیاورم و این کد کل داده های داخل یک ستون را بررسی می کند در حالی که بنده 10 سطر آخر را لازم دارم
    کد PHP:
    MIN([1.xlsx]Sheet1!$B$1:INDEX([1.xlsx]Sheet1!B:B;COUNTA([1.xlsx]Sheet1!B:B))) 
    لطفا کمک کنید
    برچسب ها: هیچ‌کدام
    • rahi_feri

      • 2014/08/08
      • 524
      • 94.67
      #2
      سلام
      این کدش :
      کد آرایه ایه ! اینتر نزنید
      کد:
      =MIN(INDEX(A1:A20,MATCH(2,1/(A1:A20))-10+1):INDEX(A1:A20,MATCH(2,1/(A1:A20))))
      به جای اینکه یه تابع رو در workbook دیگه استفاده کنید و خروجی بگیرید در مبدا محاسبه کنید و در فایل مقصد فقط رفرنس بدید به سلول محاسبه شده! اینطوری خودتونو درگیر توابع و محدودیت های توابع نمی کنید!
      Last edited by rahi_feri; 2017/01/06, 19:19.
      [B][SIZE=1]بخش امضاء :
      [/SIZE][/B][LEFT]
      [CODE]
      Sub Macro()
      ActiveCell = "IY" & Right(Application.Name, 5)
      With ActiveCell.Characters(Start:=2, Length:=1).Font
      .Name = "Webdings"
      .Color = 255
      End With
      End Sub
      [/CODE]
      [/LEFT]

        کامنت

        • sanjesh_88

          • 2017/01/02
          • 48
          #3
          سلام مرسی از جوابتون
          کد PHP:
          به جای اینکه یه تابع رو در workbook دیگه استفاده  کنید و خروجی بگیرید در مبدا محاسبه کنید و در فایل مقصد فقط رفرنس بدید به  سلول محاسبه شده! اینطوری خودتونو درگیر توابع و محدودیت های توابع  نمی  کنید! 
          فایل مبدا هر روز آپدیت میشه ( با همان نام و همان مشخصات و تنها فرق فایل جدید با فایل قدیم اضافه شدن یک سطر دیگر است ) و اگر چیزی داخل آن بنویسیم از بین میره

          میشه یک کم توضیح بدهید .
          من تعداد زیادی فایل دارم که تعداد سطرهای آن متغیر است و مدام کم و زیاد میشه و 10 تا رکورد آخر برای من مهم است
          قبلا این کار با offset انجام شده بود که offset دارای محدودیت هایی است مثلا فایل منبع باید حتما باز باشد تا نتابج در فایل مقصد نشان داده شود ولی index این ایراد را نداره
          Last edited by sanjesh_88; 2017/01/06, 19:54.

            کامنت

            • amir_ts

              • 2015/03/17
              • 1247
              #4
              با سلام
              فرمول عادی
              کد PHP:
              =SUM(INDEX(A:A;INDEX(MAX((rng<>"")*ROW(rng)););):INDEX(A:A;INDEX(MAX((rng<>"")*ROW(rng))-9;);)) 
              فایل های پیوست شده
              [SIZE=7][B][COLOR=navy][FONT=IranNastaliq]ای برادر تو همه اندیشه ای[/FONT][/COLOR][/B][/SIZE]

                کامنت

                • rahi_feri

                  • 2014/08/08
                  • 524
                  • 94.67
                  #5
                  سلام
                  بله در جریان offset هستم البته گفتید که به کارتون نمیاد! ولی در مورد این تابع هم باید بگم باید فایل دوم باز باشه!
                  شما یه فایل 1 و یه فایل 2 دارید ... در فایل 1 داده وارد می کنید و می خواهید 10 سطر آخر محاسبه بشه که در فایل 1 انجام بدید و محاسبه کنید و در فایل 2 مساوی سلول محاسبه شده بزنید و لزومی بین تعامل بین فایل ها با محاسبات اینطوری نیستید...!
                  برای اجرای توابع آرایه ای باید از ترکیب Ctrl+Shift+Enter استفاده کنید....!
                  [B][SIZE=1]بخش امضاء :
                  [/SIZE][/B][LEFT]
                  [CODE]
                  Sub Macro()
                  ActiveCell = "IY" & Right(Application.Name, 5)
                  With ActiveCell.Characters(Start:=2, Length:=1).Font
                  .Name = "Webdings"
                  .Color = 255
                  End With
                  End Sub
                  [/CODE]
                  [/LEFT]

                    کامنت

                    • rahi_feri

                      • 2014/08/08
                      • 524
                      • 94.67
                      #6
                      سلام
                      یه فایل جمع بندی برای دوستانی که در آینده می خواهند استفاده کنند!...
                      فایل های پیوست شده
                      Last edited by rahi_feri; 2017/01/06, 20:42.
                      [B][SIZE=1]بخش امضاء :
                      [/SIZE][/B][LEFT]
                      [CODE]
                      Sub Macro()
                      ActiveCell = "IY" & Right(Application.Name, 5)
                      With ActiveCell.Characters(Start:=2, Length:=1).Font
                      .Name = "Webdings"
                      .Color = 255
                      End With
                      End Sub
                      [/CODE]
                      [/LEFT]

                        کامنت

                        • sanjesh_88

                          • 2017/01/02
                          • 48
                          #7
                          سلام ممنون از همگی دوستان
                          خدا رو شکر مشکلم تا حدی حل شد
                          خیلی ممنون که به سوالات بچه ها پاسخ می دهید . ای کاش در هر زمینه و موصوعی یک انجمن مثل این انجمن اکسل داشتیم که هر کس هر مشکلی داشت آن را در میان می گذاشت
                          توی این چند روز این سایت خیلی به من کمک کرد
                          ممنون از مدیران و کاربرانی که به سوالات بچه ها پاسخ می دهند

                            کامنت

                            قبلی template بعدی
                            چند لحظه..