محمد طاهر

برجاء مراجعة هذا الموضوع http://arabteam.nicmatic.com/vb/showthread...42017#post42017 و قد و ضعته فى موضوع منفصل و دعوت الاخوة فى قسم البيزيك للمناقشة لكي تكون خطوة الانطلاق هي كل الدوال الموجودة بخصوص الموديول برجاء مراجعة الدروس فى الصفحة الرئيسية و سأكملها …

برجاء مشاركاتنا الرأي فى قسم الأكسس فى هذا الموضوع http://arabteam.nicmatic.com/vb/showthread...42017#post42017 برجاء الرد هناك و ليس هنا

علي عيني حاضر و لم يصلني شيئ علي البريد بعد

نظرا لتعدد مرات الحديث حول التفقيط هنا و فى قسم البيزيك قمت بوضع الدوال المطروحة و عددها 12 دالة فى ملف اكسيل واحد لكي يسهل المقارنة بينها http://mypage.ayna.com/mtarafa/Punct_ALl.zip ( يتم وضع الرقم المراد تفقيطه فى الخلية b1 ) أرجو ممن لديه دوال أخري طرحها ه…

اعتقد ان هنا WWW.C4ARAB.COM يوجد قسم خاص بالاوفيس عموما كدعم فني و ليس كمنتدي و تحديدا هنا http://support.c4arab.com/

بصراحة لم أجرب ذلك من قبل و لكن فكرت فى حل آخر سأطرحه رغم أنك وجدت ما يناسبك ، لعله يكون مفيدا أن تنشئ التقرير فى اكسيل و تستخدم Data Import External Data فتستدعي الاستعلام بالكامل الي Excel و في ورقة عمل أخري تضع التقرير المطلوب ، و باستخدام دالة Vlookup تستط…

حذفت مشاركتي لأضعها بصورة أوضح لأنها غير واضحة وهناك مثال آخر و ضعه أبو هادي مشكورا

بالنسبة للجريد فلن تجد بصفة عامة استخدام لها فى الاكسس لأنها اضيفت الي الفيجوال لتعوض امكانيات اصلا موجودة فى الاكسس فسؤالك مكانه قسم البيزيك فالاخوة هناك أقدر علي الرد الاخ الغريب بالنسبة لموضوع تحول الممنتدي الي فصل دراسي ، هل هذا جيد أم سيء ؟؟;) فالفصل مكان…

للأسف لم أجربها :(

بالنسبة للكود الاو ل تضع أول سطر للتعريف بمفرده ثم باقي الاسطر فى حدث فتح الفورم أما بالنسبة للثاني فعند الوقوف علي المكان الذي تريد الكتابة فيه بالعربي (صندوق نص اسمه Text1 مثلا ) جرب و ان لم ينجحا اخبرني فانا لم اجربهما بعد

هذا كود سبق ان وضعه الاخ حمود70 فى قسم البيزيك و يليه طريقة اسهل للأخ weego فى نفس القسم Private Declare Function GetKeyboardLayout Lib "user32" (ByVal dwLayout As Long) As Long Dim kbd As Long On Error Resume Next 'get keyboard language.Arabic or English kbd …

السلام عليكم VBA ماكرو يقوم بعد عدد الحروف من حرف معين فى ملف وورد مع الأخذ بالاعتبار أن ال أ = ا = إ = آ و ان ي = ى هذا رابط ملف الوورد http://mypage.ayna.com/mtarafa/CountLetter.zip تذكر السماح بتفعيل الماكرو Tools,Macro,Security Medium و عند فتح الملف يسأل …

Private Sub Form_AfterUpdate() If Me.total.Value > 10 Then Beep MsgBox Str(Me.total.Value) + "Days till now !" End If End Sub مع ملاحظة ان الرسالة لن تظهر الا عند الانتقال الي السجل التالي اما ان اردت ارسال الرسالة بعد ادخال التاريخ فضع نفس الكود فى حدث بعد ال…

اعتقد انه لن يكون أمامك الا ان تتحلي بالصبر ، فما نيل المطالب بالتمني أما عن المشاكل الأخري غير الصبر فاطرحها و سنحاول فيها ان شاء الله

هل جربت تصميم التقرير بالاكسس بالطريقة العادية انا اعلم ان ذلك ممل فى تقرير كهذا و لكن هل جربت ؟؟

هل النموذج به فورم و فورم فرعي أم أنه نموذج مستمر هذا سيؤثر علي مكان وضع الكود اما عن الكود If DCount("Fieldname", "TableName", "[StudentID] = " & _ Me.StudentID) > 10 Then Beep فه انه يتم البحث عن عدد الحقول فى جدول معين عن طريق الدالة Dcount و اذا كانت النتي…

السلام عليكم ان توجيه السؤال لشخص بعينه قد يثير حفيظة بعض الناس و هذا قد حدث بالفعل فى أقسام أخري هنا فى المنتدي ، فتجد أحدهم يسأل و الآخر يجيب قائلا "ما دمت وجهنت السؤال الي فلان فسأتركه يجيبك" لذلك أنا أرفض السماح بسؤال شخص بعينه و أنا أقول مثل أشرف أن هناك …

خاصية التصغير عند الطباعة هي من خواص الدرايفر الخاص بالطابعة جميع الطابعات الحديثة ل HP بها هذه الخاصية ( التي تطبع علي مقاس A3) اذا أقترح عليك تصميم التقرير علي مقاس A3 اذا كان لديك طابعة A3 بها خاصية التصغير الي A4 عنج الطباعة

If DCount("Fieldname", "TableName", "[studentID] = " & _ Me.StudentID) > 10 Then Beep

Tools Options Defaut Open Mode Shared