اذهب الي المحتوي
أوفيسنا

إخفاء مربع طرح سؤال من شريط القوائم ؟؟؟ كيف


الجديد2007

الردود الموصى بها

هل فكر أحدكم يوم كيف أخفاء مربع طرح سؤال والموجود في شريط القوائم اذا كان هناك طريقة غير الطريقة التي وجدتها فأني منتظر الرد اما في حالة عدم وجود رد فعندي طريقة اتمنى ان تفيد الجميع وشــــكرأ

رابط هذا التعليق
شارك

نعم أخي ،

لا بد من وجود طريقة برمجية حيث أن الأمر وذلك بواسطة CommandBars

حيث على سبيل المثال

CommandBars("Menu Bar").Controls("Edit").Visible = False
وذلك لإخفاء قائمة تحرير edit من شريط الأوامر طبعا هنا الموضوع يتعلق بمعرفة الاسم المناسب الذي يجب أن نستخدمه الكود الآتي يطبع لك جميع الأسماء
Public Sub ListCommandBars()

    ' Purpose: Lists all available command bars in
    ' this Office application.

    Dim objCommandBar As Office.CommandBar
    Dim strResults As String
       
    Debug.Print "Command bars in this application:"
    
    For Each objCommandBar In Application.CommandBars
        
        Debug.Print objCommandBar.Name & _
            " (" & GetCommandBarType(objCommandBar.Type) & ")"
           
    Next objCommandBar
        
End Sub

وهنالك العديد من الإجراءات التي تمكنك من اظهار أو اخفاء أو انشاء أو اضافة أوامر في القوائم هــــــــــــنـــــــــــــا

ولكنك ستكون بحاجة إلى مرجع خاص وهو

Microsoft Visual Basic for Applications Extensibility 5.3 library - VBE6EXT.OLB

تحياتي

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information