PDA

توجه ! این یک نسخه آرشیو شده میباشد و در این حالت شما عکسی را مشاهده نمیکنید برای مشاهده کامل متن و عکسها بر روی لینک مقابل کلیک کنید : بدست اوردن شماره اخرین سطر دارای مقدار



master
2014/08/25, 00:51
سلام اگه بخوام اخرین سطری که مقدار داره شمارش رو بدست بیارم باید چیکار کنم؟
فرض هم بر این باشه که بین هر سطر سطر خالی وجود نداره یعنی مثلا 20 تا سطر داریم همه پشت سر هم هستن منم همون عدد 20 رو میخوام(در واقع هر سطر نماینده یه پرسنل هست و اطلاعاتش داخلش هست من میخوام ببینم چند پرسنل دارم (توی شیت مورد نظر)
با تشکر

jmkhah
2014/08/25, 01:05
از فرمول Count استفاده کنید هر سطری که پر شده باشه میشماره تعدادش میده

master
2014/08/25, 06:59
میشه با مثال بگید؟
ضمنا این برا نوشتن توی سلول هست؟
من میخوام توی کاکرو ها ازش استفاده کنم و ترجیح میدم به صرت کدی باشه ولی خوب اگه اینجوری هم باشه فوقش توی یه سلول مینوسیم و توی کد ها مقدار رو از اون سلول میخونم
با تشکر

علی فاطمی
2014/08/25, 07:15
با سلام و روز بخیر ، پیشنهاد می کنم تاپیک های زیر رو مطالعه بفرمائید.

پيدا كردن آخرين سطر در يك محدوده تعريف شده (http://forum.exceliran.com/showthread.php?4356-%D9%BE%D9%8A%D8%AF%D8%A7-%D9%83%D8%B1%D8%AF%D9%86-%D8%A2%D8%AE%D8%B1%D9%8A%D9%86-%D8%B3%D8%B7%D8%B1-%D8%AF%D8%B1-%D9%8A%D9%83-%D9%85%D8%AD%D8%AF%D9%88%D8%AF%D9%87-%D8%AA%D8%B9%D8%B1%D9%8A%D9%81-%D8%B4%D8%AF%D9%87)
شناسایی آخرین ردیف اطلاعات (http://forum.exceliran.com/showthread.php?196-%D8%B4%D9%86%D8%A7%D8%B3%D8%A7%DB%8C%DB%8C-%D8%A2%D8%AE%D8%B1%DB%8C%D9%86-%D8%B1%D8%AF%DB%8C%D9%81-%D8%A7%D8%B7%D9%84%D8%A7%D8%B9%D8%A7%D8%AA/page2)

shamsololama
2014/08/25, 14:31
میشه با مثال بگید؟
ضمنا این برا نوشتن توی سلول هست؟
من میخوام توی کاکرو ها ازش استفاده کنم و ترجیح میدم به صرت کدی باشه ولی خوب اگه اینجوری هم باشه فوقش توی یه سلول مینوسیم و توی کد ها مقدار رو از اون سلول میخونم
با تشکر



بادرود فراوان

اینکه آخرین سطر پر رو پیدا کنید را ها زیادی وجود داره که می توانید از حلقه ها استفاده کنید و یا اینکه آخرین سل استفاده شده و مواردی دیگه که تو این سایت هم نمونه هاش ذکر شده

ولی در مورد اینکه فرمودین من میخوام تو ماکرو استفاده کنم عرض کنم خدمت شما که با این کد می توانید از توابعی که داهل سل ها استفاده میکنید در وبی آ و یا ماکرو نیز بهره ببرید



Application.WorksheetFunction.CountA (Range("A1:A1000"))




با نوشتن Application.WorksheetFunction و گذاشتن یک نقطه در انتهای آن توابع در دسترس خواهند بود و لیست توابع بصورت منوی کمکی برای شما باز می شود