مسیج باکس در اکسل

[esrafil2006]

با سلام خدمت دوستان
مشکل من اینه که یه جدولی دارم که اطلاعات سلول اون کشویی انتخاب میشن و در دو شیت ثبت میشن میخام در شیت اول که انتخاب میشه مثلا نوشابه سریع یک پنجره پیغام باز بشه و به کار بر اون متن هشداری را اطلاع بده (مثلا اطلاعات نوشابه در شیت دوم ثبت شود) و کاربر بعد اون پیغام را ببنده فقط در حد هشدار باشه در این لحظه کاربر میدونه که اطلاعات نوشابه را توی شیت دوم هم باید ثبت کنه ممنون میشم کمکم کنید

[Ali Parsaei]

سلام،
در همان data validation تب دوم (input message) اين امکان را به شما مي دهد که وقتي خانه مربوطه در حالت انتخاب قرار گرفت يک پيغام (که شما متن آن را تعيين مي کنيد) برايش به نمايش در بيايد، همان مشکل شما را حل مي نمايد؟ يا اينکه حتما" مي خواهيد با vba باشد؟
البته با vba باشد اين بدي را هم دارد که فايلتان کند مي شود چون بايد در رويداد selection change شيت نوشته شود.

[esrafil2006]

ضمن تشکر از پاسخ شما
لطفا با vb را هم راهنمایی کنید ممنون میشم

[AmirAkbar]

سلام..
اگر پیغام فقط برای نوشابه است این فایل رو ببینید..
ولی اگر قراره برای همه کالاها این یاداوری صورت بگیره بهتره بصورت کامنت روی سلول یا بصورت متن معمولی در یکی از سلولهای توی دید (بالای صفحه) نوشته بشه..

msgbox nooshabe (http://s6.picofile.com/file/8188802676/msgbox_nooshabe.xlsm.html)

برای همه کالاها :
msgbox koli (http://s6.picofile.com/file/8188803526/msgbox_koli.xlsm.html)

[Ali Parsaei]

با اجازه جناب AMIRAKBAR
از کد زير هم مي توانيد استفاده کنيد که شرح متن انتخابي در سل هم در پيغام مربوطه منظور گردد:


Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Row < 10 Then
MsgBox "اطلاعات " & Target.Value & " در شيت دو نيز ثبت شود"
End If
End Sub

[esrafil2006]

خیلی ممنون از
جناب AMIRAKBAR بسیار عالی
فقط هر کاری کردم نتونستم فرمول را در کل ستون a عمل کنم به صورتی که این دستور در هر سلول از ستون a عمل بشه
تشکر و سپاس

[hamed kakoulvan]

با سلام خدمت اعضاء محترم
من یک ستون دارم که در هر روز ماه کارکرد یک ماشین توش وارد میشه (بدیهی که کارکرد ماشین در روز بعد بیشتر شده یا همون مقدار دیروزی هست) و در انتهای ستون ماکزیمم مقادیر موجود در این ستون رو به من میده.
میخوام هرموقه کارکرد دستگاه به 500:00:00 ساعت رسید یک پیغام ب من بده. این کارو با data validation انجام میدم کار نمیکنه ( تو انتهای ستون از تابع max استفاده کردم )
اگه راهنمایی کنید ممنون میشم

[generalsamad]

با سلام
شما از طریق Whole Number
Less than رو روی 501 قرار بدید مشکلتون حل میشه

فایل ضمیمه گردید

[AmirAkbar]

خیلی ممنون از
جناب AMIRAKBAR بسیار عالی

فقط هر کاری کردم نتونستم فرمول را در کل ستون a عمل کنم به صورتی که این دستور در هر سلول از ستون a عمل بشه
تشکر و سپاس

اگر همه ستون a رو بخواید باید از کدی که استاد پارسا گفتن استفاده کنید و با اجازه ایشون کدها رو توی فایل قرار دادم ..
msgbox koli2 (http://s6.picofile.com/file/8189093450/msgbox_koli2.xlsm.html)