اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

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

قام بنشر

نعم أخي ،

لا بد من وجود طريقة برمجية حيث أن الأمر وذلك بواسطة 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