مزاحم نمی شوم در پایان چند سوال اکسل دارم که خدمتتان می فرستم :
چطور میشود لیست های بر پا کرد که بمحض ورود اطلاعات جدید در آن و افزایش رکورد ها دامنه protection نیز بطور اتوماتیک گسترده شود و تا آخرین ردیف پیش رود ؟
هدف از این کار اینست که اطلاعات ورودی دستخوش تغییرات خواسته یا ناخواسته نشود .
سلولهای این sheet در صورتیکه پر شده باشند در مقابل تغییرات حفاظت می شوند .
بدین ترتیب که اگر checkbox بالا را در حالت انتخاب قرار دهیم در صورتیکه بخواهیم در خانه ای که پر است مقداری را وارد کنیم، از اینکار جلوگیری بعمل خواهد آمد.
(توسط جعبه ابزار فرم یک CheckBox به sheet اضافه کنید)
کد برنامه ویژوال بیسیک :
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
cellval = ActiveCell.Value
sheetprotect = Range("a1").Value
If cellval <> "" And sheetprotect Then
ActiveSheet.Protect
Else
ActiveSheet.Unprotect
End If
End
من یک مشکلی دارم در یک سلول میخواهم همیشه مقدار آخرین سلول پر شده یک محدوده از یک ستون را داشته باشم چگونه می توانم اینکار را انجام دهم لطفا هرچه سریعتر من را راهنمایی کنید.
اگر برایتان مقدور است
اردشیر
با سلام خدمت دوست عزیز
جواب سوال شما بدین ترتیب است که اگر محدوده شما پیوسته و تمامی سلولهای آن پر شده باشد ، می توانید از توابع زیر برای اینکار به سادگی استفاده کنید .
کار با این توابع را با ذکر مثالی نشان داده ام.
فرمول خانه D1 و D2 در شکل نشان داده شده است ،
|
A |
B |
C |
D |
E |
F |
1 |
Day |
Num |
|
Mon |
< - - - - |
=INDEX(A:B,COUNTA(A:A),1) |
2 |
Sun |
2 |
|
14 |
< - - - - |
=INDEX(A:B,COUNTA(B:B),2) |
3 |
Mon |
4 |
|
|
|
|
4 |
Tue |
6 |
|
|
|
|
5 |
Wed |
8 |
|
|
|
|
6 |
Thu |
10 |
|
|
|
|
7 |
Fri |
12 |
|
|
|
|
8 |
Sat |
14 |
|
|
|
|
9 |
Sun |
|
|
|
|
|
10 |
Mon |
|
|
|
|
|
اما اگر ! محدوه شما غیر پیوسته باشد حالت خاصی پیش میآید و فرمول نویسی آن با مراجع دورانی به سختی میسر است و میدانیم که مراجع دورانی حداکثر Iterations = 32767 خواهد بود و این درحالی است که شما 32536 خانه در اکسل دارید، پس اینهم نا کارآمد است. (البته اینکار انجام شدنی است).
اما راه حل اصولی اینگونه موارد نوشتن یک تابع ساده است و من این تابع را برای شما مینویسم ، برای استفاده از این تابع مراحل زیر را برای ایجاد آن طی کنید .
Function FINDLASTVALUE(CellRange As Range)
' THIS FUNCTION FIND FINAL VALUE IN A SPECIFIC RANGE
For Each C In CellRange
If C.Value <> "" Then
FINDLASTVALUE = C.Value
End If
Next C
End Function
حال در اکسل تابعی به نام FINDLASTVALUE دارید که توسط آن میتوانید مقدار آخرین خانه هر محدوده را پیدا کنید .
بعنوان مثال در اکسل مینویسیم :
=FINDLASTVALUE(A:A)
که آخرین مقدار را در محدوده ستون A برای ما پیدا میکند
در کلاس برای شروع این مبحث اینچنین شروع میکنم که خانههای اکسل مثل آدمها و سکه اند، یعنی دو رو دارند . یک ظاهر و و یک باطن .
مانند خانهای که تاریخ 7/27/2006 را نشان میدهد اما باطن آن عدد 38925 است.
در کار با رقم های اعشار اعداد نیز ما همین حالت را داریم ، بدین ترتیب که اگر از Toolbar گزینههای Decrase Decimal و Incrase Decimal را انتخاب کنیم ، در واقع فقط ظاهر آن خانه تغییر کرده است و در صورتیکه روی این خانه عملیات ریاضی انجام دهیم ، باطن خانه در آن محاسبات شرکت خواهد کرد.
در مثال زیر این امر به وضوح مشخص است که در خانه عدد 123.1 نشان داده میشود اما در نوار فرمول مقدار واقعی این خانه که 123.1233 است را میبینیم.
منظور از روند کردن یک عدد، یعنی تغییر دائمی در رقمهای آن عدد.
روند کردن قسمت اعشار یک عدد
روند کردن قسمت صحیح یک عدد
تابع Round
برای گرد کردن تا تعداد رقم دلخواه اعشار بکار میرود ، بدین صورت که :
ROUNDUP(Number,Num_digits)
Number : عددی که میخواهیم آنرا روند کنیم.
Num_digits : دقت اعشار
اگر پارامتر دوم عدد مثبت باشد، رقم داده شده را با آن دقت اعشار داده شده گرد میکند (عدد 5 بستگی به رقم بعدش دارد ، اگر عدد بعد از 5 از 5 بیشتر باشد 5 به 6 گرد میشود)
· اگر صفر باشد فقط قسمت صحیح عدد را میدهد
· اگر عدد منفی باشد از سمت چپ ممیز شروع به گرد کردن میکند.
=ROUND(2.15, 1) |
عدد 2.15 را تا یک رقم اعشار گرد میکند که میشود 2.1 |
=ROUND(2.149, 1) |
Rounds 2.149 to one decimal place (2.1) |
=ROUND(-1.475, 2) |
Rounds -1.475 to two decimal places (-1.48) |
=ROUND(21.5, -1) |
Rounds 21.5 to one decimal place to the left of the decimal point (20) |
ROUNDDOWN |
گرد کردن اعداد به سمت صفر |
=ROUNDDOWN(2.578;2)à2.57 |
ROUNDUP |
گرد کردن اعداد دور از صفر |
=ROUNDUP(2.578;2)à2.58 |
CEILING |
عدد 2.4 را به نزدیکترین مضرب 2 که از خودش بیشتر است گرد میکند . |
=CEILING(2.4;2) à 4 |
FLOOR |
عدد 24 را به نزدیکترین مضرب صحیح 7 که از 24 کمتر است گرد میکند |
=FLOOR(24;7) à 21 |
EVEN |
عددی را به نزدیکترین عدد زوج بعداز خودش گرد می کند. |
=EVEN(2.5) à 4 |
ODD |
عددی را به نزدیکترین عدد فرد بعد از خودش گرد میکند. |
=ODD(1.5) à 3 |
TRUNC |
قسمت اعشاری را حذف میکند. |
=TRUNC(8.9) à 8 |
MROUND |
عددی را به مضربی دلخواه از عدد دیگر، گرد میکند. |
=MROUND(10;3) à9 |
INR |
جزء صحیح یک عدد را میدهد. |
=INT(5.4) à 5 |
کاربرد ROUNDUP : فرض کنید که قرار است امتیاز افرادی را پس از یک سری محاسبات بدست آورید، اگر شما از تابع ROUND استفاده کنید ، چون اعداد 12.44 را تا یک رقم اعشار میکند 12.4 ، ممکن است فردی اعتراض کند که امتیاز او نادیده گرفته شده است ! آنهم در حد یکصدم ! بنابراین بهتر است از ROUNDUP استفاده کنیم که در هر حال امتیازی بیشتر را محاسبه میکند.
کاربرد CEILING : این تابع کار مثل راننده تاکسیها عمل میکند، یعنی اگر کرایه شما 118 تومان شده باشد ، میگویند 125 تومان یا مثلا اگر کرایه شما شده باشد 233 تومان میگویند 250 تومان . البته این به این دلیل نیست که میخواهند پول بیشتری بگیرند ! بلکه به خاطر این است که در سیستم پولی ما 25 تومانی داریم اما 33 تومان نه. در واقع آنها عدد را به اولیل مضرب 25 بالاتر از کرایه گرد میکنند و ما در اکس مینویسیم :
=CEILING(کرایه , 25 ) J
-------------------------------
بعد از این که یاهو مسنجر ۸ به بازار آمد تقریبا همه تروجانهایی که پسورد سندر بودن بروی یاهو ۸ بی اثر ماندند.تا آنجا که حتی مجیک پی اس که در نوع خود عالی بود به برنامه خود ریوژن نزد وبه همان ریوژن پلاس خود اکتفا نمود.قضیه از این قرار بود که این برنامه ها بر اساس خاصیت دامپ کار میکردن که در یاهو ۸ بی تاثیر بود!تروجانهای ایرانی که همیشه با موفقیت نسبت به بقیه کار می کردند ناگهان متوقف شدند.حتی مجیک پی اس که ملکه تروجانهای ایرانی لقب گرفته بود در یاهو ۸ ناتوان شد.البته بازی با تبلیغات برنامه هایی چون ndf170 تلاشی جز فریب اذعان عمومی نداشتند.تا اینکه آرش پی اس با ۲ قابلیت متفاوت برا یاهو ۸و زیز آن دست به کار بزرگی زدوامپراتور تروجانهای جهان لقب گرفت. به زودی نسخه آزمایشی آرش پی اس برای دانلود رایگان در این سایت قرار خواهد گرفت. | |
1. | فصلنامه اطلاعات مکانیکی | ||
فصلنامه صاحب امتیاز، مدیر مسئول: مهندس علی آهنی سردبیر: مهندس محمد شاکری تلفن: 2-8212981 (021)دورنگار: 8212983 (021) |
3727 |
2. | فصلنامه تحقیقات موتور | ||
فصلنامه فنی، مهندسی صاحب امتیاز، مدیر مسئول: مهندس سید مصطفی میرسلیم سردبیر: مهندس امیر فرزاد محسنیان راد تلفن: 44537032 (021)دورنگار: 44537032 (021) |
4991 |
3. | فصلنامه مکانیک و هوافضا فارسی ، انگلیسی | ||
فصلنامه علمی و پژوهشی صاحب امتیاز: دانشگاه امام حسین (ع) مدیر مسئول: دکتر مجید سلیمانی پور سردبیر: دکتر محمد طیبی رهنی تلفن: 77308648 و77314071 داخلی 2634 (021)دورنگار: 77308648 (021) |
1565 |
4. | ماهنامه مهندسی مکانیک فارسی،انگلیسی، فرانسه | ||
ماهنامه فنی، مهندسی ناشر: انجمن مهندسان مکانیک ایران مدیر مسئول: مهندس علی اکبر صابری سردبیر: دکتر عباس راستگو تلفن: 88762672 (021)دورنگار: 88762672 (021) |
1955 |
5. | فصلنامه نامه مکانیک شریف | ||
فصلنامه تخصصی - کاربردی مهندسی مکانیک ناشر: دانشگاه صنعتی شریف مدیر مسئول: دکتر جواد اکبری سردبیر: مهندس محمد فرجود تلفن: 66165575 (021)دورنگار: 66165575 (021) |
2610 |
6. | نشریه پژوهشی مهندسی مکانیک ایران | |||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||||
|
ناشر: انجمن مهندسان مکانیک ایران مدیر مسئول: دکتر محمود یعقوبی سردبیر: دکتر محمدرضا اسلامی تلفن: 64543416 (021)دورنگار: 6419736 (021) |
4879 |
. | ماهنامه بزرگراه رایانه | ||
ماهنامه علمی، فنی (تخصصی کامپیوتر) صاحب امتیاز، مدیر مسئول: مرتضی رضایی ناظمی سردبیر: مهندس محمدمهدی خزاعی تلفن: 88415670 ، 88404848 (021)دورنگار: 88415670 (021) |
1043 |
2. | ماهنامه پردازشگر فارسی، انگلیسی | ||
ماهنامه فنی، مهندسی صاحب امتیاز، مدیر مسئول: محمد نصیر فرهمند سردبیر: علی معینی تلفن: 88826489 ، 88309811 (021)دورنگار: 88304358 (021) |
2180 |
3. | ماهنامه تجارت الکترونیک و رایانه فارسی-انگلیسی | ||
ماهنامه تجارت الکترونیکی ، IT , اینترنت و کامپیوتر صاحب امتیاز: سید علیرضا درخشان مدیر مسئول: سیدعلیرضا درخشان سردبیر: دکتر اردوان میرزایی ؛ سیدعلیرضا درخشان ؛ مهندس محمدحسین باقرپور تلفن: 88821299 (021)دورنگار: 88824048 (021) |
2810 |
4. | ماهنامه تراشه | ||
ماهنامه علمی، آموزشی، فنی تخصصی کامپیوتر صاحب امتیاز، مدیر مسئول: مهندس عباس سبزعلی گل سردبیر: سید مهدی مدبری تلفن: 2930134 ، 7722881 (0251)دورنگار: 2930134 (0251) |
1667 |
5. | خبرنامه انفورماتیک | ||
دوماهنامه خبری، تخصصی(انفورماتیک) ناشر: معاونت انفورماتیک، مرکز مدارک اقتصادی اجتماعی و انتشارات سازمان برنامه و بودجه تلفن: 5-22250461 (داخلی 302) (021)دورنگار: 22228022 (021) |
1072 |
6. | ماهنامه دانش و کامپیوتر | ||
ماهنامه علوم پایه صاحب امتیاز، مدیر مسئول: فاطمه حافظیان سردبیر: امیرعباس فلاح تلفن: 88265461 (021)دورنگار: 88265461 (021) |
2318 |
7. | ماهنامه دنیای نرم افزار | ||
ماهنامه معلومات عمومی، سرگرمی صاحب امتیاز، مدیر مسئول: بابک پاکزاد سردبیر: نریمان فرامرزی تلفن: 22909462 (021)دورنگار: 22220435 (021) |
3310 |
8. | ماهنامه دنیای کامپیوتر و ارتباطات | ||
ماهنامه خبری، تحلیلی، آموزشی و اطلاع رسانی صاحب امتیاز، مدیر مسئول: محمود اروج زاده تلفن: 88724761 ، 88701265 (021)دورنگار: 88724761 (021) |
2333 |
9. | ماهنامه رایانه فارسی،انگلیسی | ||
ماهنامه فنی مهندسی صاحب امتیاز، مدیر مسئول: ابوالفضل ذوالفقاری سردبیر: پیمان بابازاده تلفن: 22862524 ، 22862445 ، 22868944 (021)دورنگار: 22862524 ، 22862445 ، 22868944 (021) |
1082 |
10. | ماهنامه رایانه خبر | ||
ماهنامه فنی مهندسی صاحب امتیاز، مدیر مسئول، سردبیر: مهندس حمیدرضا حق پرست تلفن: 22221086-22253684 (021)دورنگار: 22229109 (021) |
3405 |
11. | ماهنامه ریزپردازنده | ||
ماهنامه دانش و مهندسی کامپیوتر (درباره کامپیوتر) صاحب امتیاز، مدیر مسئول: علیرضا محمدی فر تلفن: 88434169 (021)دورنگار: 88421170 (021) |
1092 |
12. | ماهنامه شبکه | ||
ماهنامه اجتماعی، فرهنگی صاحب امتیاز، مدیر مسئول: هرمز پوررستمی سردبیر: علیرضا صالحی تلفن: 1-66905080 (021)دورنگار: 1-66905080 (021) |
1828 |
13. | دو ماهنامه شبکه اینترنت فارسی-انگلیسی | ||
دوماهنامه اینترنت ناشر: حسین سلطانی مدیر مسئول: حسین سلطانی سردبیر: محدثه اورند تلفن: 88787969 ، 88771299 (021) |
3198 |
14. | ماهنامه عصر فناوری اطلاعات | ||
ماهنامه فنی مهندسی صاحب امتیاز، مدیر مسئول: احمد عدالت سردبیر: دکتر امیرحامد رضائی تلفن: 3-88913591 (021)دورنگار: 3-88913591 (021) |
4611 |
15. | دوماهنامه علوم رایانه | ||
دوماهنامه فنی مهندسی صاحب امتیاز، مدیر مسئول: علی حسن حسنی سردبیر: کامران چیذری تلفن: 66525161 (021) |
3080 |
16. | ماهنامه فا | ||
ماهنامه فن آوری اطلاعات و ارتباطات صاحب امتیاز: محمدعلی جلالی مدیر مسئول: محمد علی جلالی تلفن: 88741149 (021)دورنگار: 88741151 (021) |
4615 |
17. | ماهنامه کاربر | ||
ماهنامه کامپیوتری و اینترنتی صاحب امتیاز، مدیر مسئول: حمید رضا زمانی سردبیر: بابک عظیمی تلفن: 22851005 (021)دورنگار: 22851004 (021) |
3316 |
18. | دوماهنامه گزارش کامپیوتر | ||
دوماهنامه فنی، مهندسی صاحب امتیاز: انجمن انفورماتیک ایران مدیر مسئول، سردبیر: ابراهیم نقیب زاده مشایخ تلفن: 88748597 (021) |
1336 |
19. | ماهنامه ماشینهای اداری و رایانه | ||
ماهنامه اطلاع رسانی- تحلیلی صاحب امتیاز، مدیر مسئول: مهندس اسکندر سعادت خامنه تلفن: 1-88308460 (021)دورنگار: 88309828 (021) |
2572 |
20. | فصلنامه موج سبز | ||
فصلنامه تخصصی برق، الکترونیک و کامپیوتر صاحب امتیاز، مدیر مسئول: جواد بزرگی سردبیر: محمد رضا بزرگی |
2566 |
دوستان عزیزمی توانید در زمینه استراکچر-پایپینگ-کنترل پروژه-برق وابزاردقیق وتستهای جوشکاری سوالات خودرامطرح نمایند.