محمد على ابو على

New Microsoft Excel Worksheet (9).rar

مع العلم ان نتائج البحث تظهر كاسماء مكان ادوات التحكم الليبل وليس التكست بوكس

بمعنى لو كتبت فى التكست بوكس اسم الكتاب يظهر على الليبل الاول العنوان والثانى المؤلف والثالث الناشر وهكذا

6 minutes ago, محمد ابو صهيب said:

جزاك الله عنا خيرا


 

9 minutes ago, عبد العزيز البسكري said:

السّلام عليكم و رحمة الله و بركاته

جرّب هكذا أخي الكريم ..على أساس الليبل1 و الخلية A3

Private Sub UserForm_Initialize()
Label1.Caption = Range("a3")
End Sub

شكرا جزيلا استاذنا جزاك الله عنا خيرا

3 minutes ago, ياسر خليل أبو البراء said:

بارك الله فيك أخي العزيز عبد العزيز البسكري

أخي السائل يرجى وضع عنوان مناسب للموضوع مستقبلاً إن شاء الله ..راجع التوجيهات في الموضوعات المثبتة في صدر المنتدى

 

جرب التالي

ضع الكود التالي في حدث الفورم

Private Sub UserForm_Initialize()
    Label1.Caption = Range("A1").Value
End Sub

ثم قم بوضع الكود التالي في حدث ورقة العمل

Private Sub Worksheet_Change(ByVal Target As Range)
    On Error Resume Next
        If Intersect(Range("A1"), Target) Is Nothing Then
            Exit Sub
        Else
            UserForm1.Label1.Caption = Range("A1").Value
        End If
    On Error GoTo 0
End Sub

لتجربة الملف قم بإظهار الفورم ...ستظهر أداة العنوان بها قيمة الخلية A1 .. اترك الفورم مفتوح وانقر في الخلية A1 وعدل القيمة لتجد أن الأداة يتم تحديثها

تقبل تحياتي

Update Label Automatically By Cell Change YasserKhalil.rar

بارك الله فيك استاذ ياسر  واعتذر على عدم علمى بالتوجيهات

كيفيه جعل اسم اداه العنوان على الفورم  يتغير تلقائيا بتغير محتوى خليه ما  يعنى لو فى خليه مكتوب فيها "محمد " يبقى اسم الليبول محمد وعند التغيير فى الخليه يتغير اسم الليبول

دا برنامج مكتبات

محتاج اعمل يوزر فورم   يبقى فيه ثلاث قوائم منسدله

الاولى   للقسم الرئيسى ووحده تانيه للفرعى ياخد من الرئيسى والثالثه فرع ثانى ياخذ منه

دا المرفق فيه مثال  للمطلوب

مثال.rar

56 minutes ago, ياسر خليل أبو البراء said:

أخي الكريم حاولت فهم التصنيف الموجود في الملف المرفق ولم أفهم الكثير ..يرجى مزيد من التوضيح لتيسر المساعدة من قبل إخوانك ولتجد استجابة بالموضوع

تقبل تحياتي

 

دا الملف بطريقه ثانيه  ان شاء الله يكون وصلت قصدى

وشكرا جزيلا

مكتبه.rar

4 minutes ago, ياسر خليل أبو البراء said:

أخي الكريم محمد علي

أهلاً بك في المنتدى ونورت بين إخوانك

يرجى تغيير اسم الظهور للغة العربية كما يرجى الإطلاع على موضوع التوجيهات في الموضوعات المثبتة في المنتدى

بالنسبة لطلبك يرجى ضغط الملف المراد العمل عليه ثم رفعه لتجد المساعدة من إخوانك بالمنتدى

تقبل تحياتي

انا اسف بجد بس انا مش بتعامل مع ا لانترنت كتير

بس الطلب دا محتاجه 

مكتبه.rar

محتاج فورم فيه

ثلاث قزائم منسدله تتغير كل منها حسب بيانات الثانيه

الكود بس