ساخت mssage box در محیط اکسل با استفاده از برنامه ویژوال بیسیک

[ali.b]

در اکسل:
یک پنجره پیغام(Massage Box) از سه بخش به شرح ذیل ساخته شده است:
عنوان پیغام , شرح پیغام گزینه های پیغام
Massage box هایی که در طول یک برنامه به آنها نیاز داریم شامل دو گروه می باشد:
الف- پیغامهایی که صرفا اطلاعاتی بوده و به کاربر مفهومی را بدون آنکه عملیاتی بر روی داده ها انجام دهد انتقال می دهد.مانند پیغامهای خوش آمد گویی.
ساختار ساده اینگونه پیغامها به صورت زیر در محیط VBA به صورت زیر است:

Sub message()
MsgBox "hello my frends"
End Sub

ب- پیغامهای عملیاتی که بر روی داده های موجود در بانک اطلاعاتی یا برنامه محاسباتی کاربر، تغیراتی انجام می دهد. در اینجا ساختار اصلی یک پیغام، که شامل هر سه قسمت یک پیغام است(عنوان، شرح و گزینه) مشاهده می شود
در زیر مثالی آورده شده است با شرحی که آیا مایل هستید ادامه دهید و سه گزینه انتخابی بله، خیر و کنسل را شامل می گردد. سپس به ازای انتخاب گزینه بله تعدادی از داده ها را دلیت نموده و به ازای گزینه خیر، همان اطلاعات را انتخاب می نماید.
ساختار چنین برنامه ای به شکل زیر نوشته می شود:

Sub message()
x = MsgBox("do you want to continue?", vbYesNoCancel, "message box")
If x = vbYes Then
Rows("1000:2000").Select
Selection.Delete Shift:=xlUp
ElseIf x = vbNo Then
Rows("1000:2000").Select
End If
End Sub
همانطور که در خط دوم برنامه ملاحظه می گرددساختار کلی یک کادر پیغام شامل سه بخش عنوان، شرح و گزینه های پیغام می باشد که به علامت , از هم جدا می شود. به عبارت VBA در قسمت میانی فرمول توجه کنید.
نکته: اطلاعات کامل در مورد Massage Box در HELP اکسل آورده شده است .
منبع:

دوست عزیز اقای بیرامی
اینم ادرس سایت
http://persianblog.ir (http://persianblog.ir/)