عبدالله باقشير
-
Posts
4796 -
تاريخ الانضمام
-
تاريخ اخر زياره
-
Days Won
57
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو عبدالله باقشير
-
السلام عليكم ورحمة الله وبركاته لعبة ترتيب اجزاء الصورة هدية لاخي دغيدي استخدم الاسهم لترتيب الاجزاء المرفق اكسل 2003 ودمتم في حفظ الله لعبة ترتيب اجزاء الصورة.rar
-
الحكاية اني لم افهم طلبك اطلب شو بدك ؟ (بالسوري)
-
السلام عليكم قبل ان احمل الملف اكيد حاجة حلوة جزاك الله خيرا وبارك فيك
-
السلام عليكم الاخ الفاضل / محمدي ---------- حفظك الله جزاك الله خيرا تقبل تحياتي وشكري الاخ الفاضل / khhanna ---------- حفظك الله جزاك الله خيرا تقبل تحياتي وشكري الاخ الفاضل / مجدي يونس ---------- حفظك الله جزاك الله خيرا تقبل تحياتي وشكري الاخ الفاضل ابو حنين --------------حفظه الله جزاك الله خيرا فكرة حلوة لتقسيم الصورة تقبل تحياتي وشكري ممكن بالرسام : صورة السمات تصرف بالمقاس واحفظ الصورة باسم وهكذا مرة اخرى طبعا قبل ذلك تحسب المقاسات من المطلوبة من الصورة ودمتم في حفظ الله
-
السلام عليكم الاخ ابو حنين حفظك الله جزاك الله خيرا وبارك فيك تقبل تجياتي وشكري اخي دغيدي لا عليك طلبك مجاب تفضل المرفق 2003 تحريك اجزاء صورة1.rar
-
وعليكم السلام تفضل الملف حلالك اعمل ما تريد هذا حسب ما فهمت من طرحك اذا تريد شي آخر وضح ما تريده تقبل تحياتي وشكري
-
وعليكم السلام ورحمة الله وبركاته اهذا ما قصدته اخي الحبيب شاهد المرفق2003 تحريك اجزاء صورة.rar
-
السلام عليكم الاخ الفاضل الشهابي الله يكرمك ويجزيك خيرا الاخ الفاضل / عبدالله المجرب بارك الله فيك تقبلوا تحياتي وشكري
-
بارك الله فيكم وجزاكم الله خيرا تقبلوا تحياتي وشكري
-
السلام عليكم هذا مثال عملي http://www.officena.net/ib/index.php?showtopic=41620
-
السلام عليكم هذا مثال عملي لموضوع هل تعلم ---------سلسلة تعليمية 2 سبورة احرف متحركة مماثلا لاحد الاعمال المعمولة بغير الاكسل قمت بتحميله سابقا من المنتدى شاهد المرفق 2003 الاحرف المتحركة.rar
-
======================== الاخ الفاضل/ ابوحنين ======================== و
-
بارك الله فيك اخي ابو انصار تقبل تحياتي وشكري
-
وهناك ملاحظة اثناء نسخ كود فيه كلمات عربية قبل النسخ حول اللغة في الاكسل الى العربية ثم قم بالنسخ ستظهر اللغة العربية بشكلها الصحيح وليست طلاسم ودمتم
-
السلام عليكم ورحمة الله وبركاته بارك الله فيكم جميع المشاركين ولاثراء الموضوع هناك ايضا موانع اخرى لتسمية ورقة العمل وهي : - طول الاسم يجب الا يكون اكبر من 31 - وبعض الاحرف ممنوعة في التسمية MyChArray = Array("/", "*", ":", "؟", "?", "[", "]") هذه دالة تشمل جميع الموانع لاسم الورقة يمكن استخدامها داخل الكود Function kh_Test_MyChr(KhString As Variant) As Boolean Dim MySh As Worksheet Dim MyChArray, MyChr Dim S As Integer, R As Integer S = Len(Trim(KhString)) If S > 31 Or S = 0 Then MsgBox "حروف الاسم قد تكون اصغر من 1 او اكبر من 31", 524288 + 1048576 + 16, "اسم مرفوض" kh_Test_MyChr = True Exit Function End If '------------------------------------ MyChArray = Array("/", "*", ":", "؟", "?", "[", "]") For Each MyChr In MyChArray If InStr(1, KhString, MyChr, 1) <> 0 Then MsgBox "حروف الاسم تحتوي على الحرف " & Chr(10) & Chr(10) & Chr(9) & MyChr & Chr(10) & Chr(10) & "وهو من الاحرف الممنوعة " & "/ * : ؟ [ ]", 524288 + 1048576 + 16, "حرف ممنوع" kh_Test_MyChr = True Exit Function End If Next '------------------------------------ For Each MySh In ActiveWorkbook.Sheets If UCase(Trim(MySh.Name)) = UCase(Trim(KhString)) Then MsgBox "الاسم مكرر ", 524288 + 1048576 + 16, "اسم مكرر" kh_Test_MyChr = True Exit Function End If Next End Function وهذا كود الاضافة بمعية الدالة Sub kh_Addsheet() Dim MyName As String Dim xlSheet As Worksheet MyName = TextBox1.Value If kh_Test_MyChr(MyName) = True Then Exit Sub Set xlSheet = ActiveWorkbook.Sheets.Add(After:=Sheets(Sheets.Count)) xlSheet.Name = MyName Set xlSheet = Nothing End Sub ودمتم
-
السلام عليكم ورحمة الله وبركاته انا استخدم الرسام في تصميم الصور في اغلب الاحوال وفيه امكانية اضافة النصوص تقبل تحياتي وشكري
-
نعم بالامكان بتخزين موقع الكائن عرضا وطولا اثناء الخروج واستخدامها اثناء الدخول ممكن التخزين في متغيرات او خلايا او اسماء .....الخ حسب ما تريد شاهد المرفق 2003 move1.rar
-
السلام عليكم ورحمة الله وبركاته الاخ الفاضل / ابو انس__________ حفظه الله الاخ الفاضل / cat101__________ حفظه الله الاخ الفاضل / طارق محمود__________ حفظه الله الاخ الفاضل / الجزيرة__________ حفظه الله الاخ الفاضل / mhrrd__________ حفظه الله الاخ الفاضل / محمد مصطفى ابوحمزة__________ حفظه الله الاخ الفاضل / عبدالله المجرب__________ حفظه الله الاخ الفاضل / رجب جاويش__________ حفظه الله الاخ الفاضل / احمد فضيلة__________ حفظه الله الاخ الفاضل / الشهابي__________ حفظه الله الاخ الفاضل / محمدي__________ حفظه الله الاخ الفاضل / ابو انصار__________ حفظه الله جزاكم الله خيرا واثابكم بدعائكم واعطاكم بمثلة اضعاف مضاعفة تقبلوا تحياتي وشكري
-
السلام عليكم ورحمة الله وبركاته نقول لمن اعتمر تقبل الله منا ومنكم صالح الاعمال ونقول لمن ترقى الف مبروك وعفوا انها جاءت متاخرة وبعد هل تعلم كيف تحرك كائن ( ليبل - صورة الخ ) في فورم ليس اثناء التصميم وانما بعد فتحه نستخدم حدثين لزر الماوس الاول : اثناء الضغط عليه لتخزين موقع الضغط طولا وعرضا Private Sub LabelStart_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) Xd = X Yd = Y End Sub الثاني : حدث حركة الماوس بشرط اثناء الضغط على الزر اليسار Button = 1 الزر اليمين ياخذ القيمة 2 Private Sub LabelStart_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single) If Button = 1 Then With Me.LabelStart .Move .Left + (X - Xd), .Top + (Y - Yd) End With End If End Sub شاهد المرفق 2003 move.rar
- 21 replies
-
- 2
-
-
- تحريك كائن
- فورم
- (و2 أكثر)
-
======================== الاخ الفاضل/ amroomo ======================== و
-
بالنسبة للخلايا لم اجرب ذلك ولكن يمكن يكون من ادوات خيارات لون تحدد لون من الموجود تعديل والله اعلم ودمتم في حفظ الله
-
الالوان مقدور عليها لكن تغيير الازرار الله اعلم تقبل تحياتي وشكري
-
السلام عليكم ورحمة الله وبركاته الاخ الفاضل / دغيدي__________ حفظه الله الاخ الفاضل / khhanna__________ حفظه الله الاخ الفاضل / Creation World__________ حفظه الله الاخ الفاضل / الجزيرة__________ حفظه الله الاخ الفاضل / mhrrd__________ حفظه الله الاخ الفاضل / محمد مصطفى.2011__________ حفظه الله الاخ الفاضل / سعد عابد__________ حفظه الله الاخ الفاضل / goodfas__________ حفظه الله الاخ الفاضل / الشهابي__________ حفظه الله الاخ الفاضل / عباس السماوي__________ حفظه الله جزاكم الله خيرا تقبلوا تحياتي وشكري
-
انا لله وإنا اليه اجعون عظم الله اجركم اللهم غسل الفقيد بالماء والثلج والبرد وطهره من الخطايا كما تطهر الثوب الابيض من الدنس . والهم اهله الصبر والسلوان انا لله وإنا اليه اجعون
-
السلام عليكم ملف لحوالي 560 لون مع المعلومات (Hex Code , RGB , MSAccess) اذا اردت استخدام لون في الفورم او ادوات التحكم استخدم الرقم في العمود MSAccess Me.Frame1.BackColor = 5540692 وممكن ادخاله مباشرة اثناء التصميم للاشكال التلقائية RGB للويب Hex Code اثناء معاينة الفورم حرك الماوس في الفورمة ولاحظ ماذا يحدث جعلنا الزر ياتي طوعا حيث انت ليخدمك الخلاصة فيه الكثير من الفوائد ودمتم في حفظ الله المرفق اكسل 2007 اكسل 2003 color.rar
