طراحی منوبارروی کامندبوتون....

[daglararan]

ازدوستان عزیزخواهشمنداست چگونگی طراحی وساخت یک نمونه ازمنوباربرای یک کامندبوتون رابرای مایادبدند. استدعامیشود بایک نمونه فایل زحمت را تقبل فرمایند. مثال: منوباربرای رپورت.

-------------------------------------
فرزندهنرباش نه فرزندپدر-------------فرزندهنرزنده کندنام پدر

[Fazaeli]

اول بایدبه روشی که در تاپیکهای قبلی گفته شد یعنی Tools\customize وارد قسمت customize شده در قسمتtoolbarsدکمه newرا زده و در toolbar name نام منویی(toolbar) که میخواهید ایجاد کنید را وارد مینماییدok کرده toolbar ایجاد شده بعد وارد قسمت Commandsشده دکمه Rearrange commandsرازده ودر قسمت تول بار نام تول بار ایجاد شده را انتخاب ودکمه ADDرا زده Command ها رایکی،یکی واردنموده سپس دوباره واردقسمت toolbars شده وسپس واردpropertiesتول بار ایجاد شده شوید قسمت typeبصورت دیفالت روی menu barاست اونو به Popupتغییر دهید.
حال یک فرم درست کنید یک کامند باتن بر روی آن قراردهید بر روی اونتonclick کد زیر را واردنمایید

On Error Resume Next

Set objPopup = CommandBars("نام تول بار ایجاد شده")
objPopup.ShowPopup

Set objPopup = Nothing

حالا فرم را ایجاد شده را اجرا کنید به خواسته خود میرسید
باتشکر
م.فضائلی

[amirsadeghi]

سلام با این روش هم میشه
private sub cmd1_click()
popupmenu menuname
end sub

[daglararan]

فضائلی عزیزضمن تشکروقدردانی ازتمام کارهای مفیدت ازاین اموزش شمانیزکمال تشکررادارم.دستهایت رامیفشارم!
---------------------------------
فرزندهنرباش نه فرزندپدر-------------فرزندهنرزنده کندنام پدر