AutoFilter در اکسل و جمع ستون

در تصویر اول از عملگر Or در ستون ۷ یا Owner استفاده نُموده و همانطور که می بینید Ben و John در حالت انتخاب قرار گرفته اند. در تصویر دوم فیلتر در دو ستون ۷ و ۹ صورت گرفته

انجام فیلتر در Vba معمولا در گزارشات می تواند موثر باشد که با کدهایی که داده میشه آیتم (هایی) فیلتر شود(ند) و کانت یا جمع آن در شیت یا ورک بوک ( ناحیه کاری : سند دیگری ) ریخته شود.فرضا محصولات مختلفی دارید که هرکدام در هر ماه طی روزهایش به تعدادی تولید می شود یا باید با Pivot table اطلاعات گزارش را تهیه کنید یا به تعداد عنوان محصولات فیلتر کنید و جمع تعداد را در شیت دیگری برای ارائه به مدیریت منتقل کنید ... با کمک Vba می توان هر محصول را در آن محدود بصورت خودکار فیلتر کرد و بعد تعداد اتومات گرفته و کپی شود و از فیلتر خارج شده و دوباره به همین منوال تا پایان کار ... با رکورد ماکرو هم می توان این کار را به انجام رسانید یعنی فرآیند کاری شما از pivot گرفتن تا انتخاب و کپی کردن اعداد به شیت مربوطه ضبط یا رکورد می شود و بعد زمان اجرای آن بصورت اتومات ملاحظه می کنید که همان کارهایی که خودتان به آرامی و دقت انجام دادید به سرعت جلوی چشمتان انجام خواهد گرفت.

در زیر متغیر LastRow شمارش تعداد ردیف ها در آن موقتاً ذخیره می شود و در انتهای ستون S جمع اعداد وارد شده در ستون را درج می کند توجه داشته باشید اگر در ستون مربوطه Cell یا سلولی خالی باشد تا همانجا را شمارش می کند پس لازم است برای LastRow از ستونی استفاده شود که نباید خالی بماند 

Dim LastRow As Long
LastRow = Cells(Cells.Rows.Count, "S").End(xlUp).Row + 1
Range("S" & LastRow) = WorksheetFunction.Sum(Range("S2:S" & LastRow - 1))

می توانید کد زیر را در ماژولی کپی کنید در ستون یک اعداد یا حروفی را تایپ کنید و بینشان را خالی بگذارید تابع Msgbox عدد ذخیره شده در متغیر lastLine اظهار شده توسط شما را نشان خواهد داد و به چگونگی عملکرد آن نیز پی خواهید برد.

Sub checkLastFilledLine()

Dim lastLine As Long

lastLine = Cell(Rows.Count, 1).End(xlUp).Row

msgbox lastLine

End Sub

SumIf :

البته خود SumIf را غیر از محیط VBE اکسل داخل شیت هم می توان استفاده نمود 

نوشتاری آن به شرح زیر آمده :

SUMIF(range, criteria, [sum_range])

که Range همان ستونیست که شرط شما درآن وجود دارد و آرگومان آخر محدوده ( ستونیست ) جمع شماست . در تصویر بالا  جمع محدوده B را به شرط برقراری عبارت متنی Product B در محدود A  آمده..... تابع SumIfs شرط های بیشتری را می توانید دخیل کنید که نوشتاری آن به شرح زیر می باشد :

SUMIFS(sum_range, criteria_range1, criteria1, [criteria_range2, criteria2], ...)

 اول محدوده Sum ( فرضا می خواهید جمع محدوده ای در ستون X را بگیرید ) و بعد محدوده شرط اول ( مثل رنج A در مثال قبل ) و خود شرط ( "Product B" ) و محدوده شرط دوم و شرط دوم و به همین منوال .... یعنی مانور شما برای Sum گرفتن از محدوده ای حاوی چندین شرط متفاوت را مهیا می سازد.

۲۸ مهر ۱۴۰۲ ۱۸ عصر :

سلمان رشدی: از جنگ حماس و اسرائیل در هراسم و امیدوارم متوقف شود 

سلمان رشدی نویسنده سرشناس بریتانیایی-آمریکایی هندی‌تبار در کنفرانس مطبوعاتی در حاشیه برگزاری نمایشگاه بین‌المللی کتاب فرانکفورت خواستار پایان جنگ حماس و اسرائیل شد.  

او گفت: «من سرشار از هراسم، این تنها چیزی است که می‌توانم بگویم. من فکر می‌کنم در رابطه با حمله حماس، سرشار از هراس شده‌ام. همچنین در باره آن‌چه آقای نتانیاهو ممکن است در پاسخ به این حمله انجام دهد پر از گمانم و تنها امیدوارم که در اولین نقطه ممکن این خصومت‌ها متوقف شوند.»

آرمیتاژ مشهد مهر ۱۴۰۲

شاکی بازداشت شد

در نهایت همه این افراد با شکایت مدیر فود کورت پاساژ آرمیتاژ به کلانتری «هفت تیر» که در نزدیکی پاساژ واقع شده، منتقل می‌شوند. به گفته مدیر روابط عمومی پاساژ، در ابتدای امر مقامات انتظامی از برخورد با افرادی که در پاساژ درگیری ایجاد کرده بودند، می‌گویند اما در ادامه آنان آزاد می‌شوند و مدیر فود کورت پاساژ که از طرف مجموعه برای شکایت رفته بود، بازداشت شد. عادل سوختانلو، مدیر فود کورت پاساژ است که برای شکایت رفته بود ولی بازداشت شد. او به «شبکه شرق» می‌گوید: «در کلانتری به یکباره همه چیز برعکس شد. این افراد مجوز نداشتند، به دروغ خود را مأموران فرمانداری معرفی کرده بودند، از شوکر استفاده کردند، به دختر مردم سیلی زدند اما من بازداشت شدم و یک شب هم در بازداشت بودم. فردای آن روز هم من را نزد قاضی کشیک فرستادند و به قید وثیقه آزاد شدم.» مدیر روابط عمومی پاساژ آرمیتاژ در اینستاگرامش نوشته که برای سوختانلو پرونده‌ای با اتهام «ممانعت از امر به معروف» تشکیل شده و در انتظار تشکیل جلسه رسیدگی است.

بیرانوند تصریح کرد: آویشن سقط کننده جنین در مادران باردار محسوب می‌شود بنابراین زنان باردار باید از مصرف آن خودداری کنند.