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

**Ali Parsaei** · 2015/05/14, 20:57

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

**esrafil2006** · 2015/05/16, 16:49

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

**AmirAkbar** · 2015/05/17, 02:49

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

msgbox nooshabe

برای همه کالاها :
msgbox koli

**Ali Parsaei** · 2015/05/17, 09:27

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

کد PHP:


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** · 2015/05/18, 10:39

خیلی ممنون از

جناب AMIRAKBAR بسیار عالی

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

**hamed kakoulvan** · 2015/05/18, 13:50

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