بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
كل الانشطه
- Today
-
kkhalifa1960 started following مساعده فى طباعه تقرير يبناء على حقل check Box
-
مساعده فى طباعه تقرير يبناء على حقل check Box
kkhalifa1960 replied to TAMER AGOOR's topic in قسم الأكسيس Access
مشاركة مع الاساتذة الكرام تفضل أستاذ @TAMER AGOOR محاولتي حسب مافهمت . ووافني بالرد . DDTwoReports.rar -
مساعدة : حذف سجل من جدول رئيسي له جداول مرتبطة به
الشامي نت replied to الشامي نت's topic in قسم الأكسيس Access
ههههههههه انا اعرف ذلك لكن قلت لربما توجد طريقة ! شكرا لك اخي -
kokdyrd joined the community
-
leeeedo75 started following قسم الأكسيس Access
-
جاري التحميل
-
leeeedo75 joined the community
-
kkhalifa1960 started following رقم سري لفتح نموذج يحتوي معلومات سرية للغاية
-
رقم سري لفتح نموذج يحتوي معلومات سرية للغاية
kkhalifa1960 replied to عبد اللطيف سلوم's topic in قسم الأكسيس Access
استاذ @عبد اللطيف سلوم اضافة لمسة بسيطة جعل ماسج ادخال الباسوورد نجوم (*****) .واخفاء الرقم السري بجداول النظام المخفية تفضل المرفق . رقم سري.rar -
السلام عليكم ورحمة الله وبركاته تسلم بشمهندس foskh هذا هو المطلوب جزاك الله خيرا وصحة وعافية
- Yesterday
-
most fa430 joined the community
-
تجميع فواتير اسبوعيه فى ملف pdf واحد
محمد هشام. replied to عادل ابوزيد's topic in منتدى الاكسيل Excel
راودتني هده الفكرة من قبل لا كن للاسف يصعب عليا فهم طريقة اشتغالك على الملف السؤال هو في حالة قمت بترحيل فواتير اسبوع معين هل يتم استخراج رقم الاسبوع من اخر تاريخ للفاتورة او فقط تسلسل بعدد الاسابيع المرحلة مثال لنفترض انه تم ترحيل مثلا اول فاتورة من تاريخ 2024/04/05 الى 2024/04/11 ماهو رقم الاسبوع المتوقع هل 1 او 15 -
مساعده فى طباعه تقرير يبناء على حقل check Box
Foksh replied to TAMER AGOOR's topic in قسم الأكسيس Access
أخي الكريم ، من يقدم المساعدة لا يعلم ما هو مقصودك بـ "مش شغال ؟؟؟؟؟؟؟؟" دون ان تطرح المشكلة ؟؟؟ وإن كان مقصدك بعدم اجراء وتنفيذ امر الطباعة !!!! فذلك لعدم وجود امر الطباعة DoCmd.PrintOut اما هذا السؤال :- فاعتقد حله كود اغلاق التقرير بعد امر الطباعة DoCmd.Close acReport, "SeparetrBySelection" مساهمة مع الأخ @Lover Karo 👍 -
توضحت الفكرة .. اليك حلين اثنين واختر ما تريده . الأول لو كان الإسم أكبر من 4 مقاطع :- Private Sub comb1_Click() Dim parts() As String parts = Split(txtNm.Value, " ") If UBound(parts) > 3 Then MsgBox "النص أكبر من 4 مقاطع" Exit Sub End If name1 = parts(0) name2 = parts(1) name3 = parts(2) name4 = parts(3) End Sub والثاني تحسباً لو كان الإسم أقل من 4 مقاطع :- Private Sub comb1_Click() Dim parts() As String parts = Split(txtNm.Value, " ") If UBound(parts) > 3 Then MsgBox "النص أكبر من 4 مقاطع" Exit Sub ElseIf UBound(parts) < 3 Then MsgBox "النص أصغر من 4 مقاطع" Exit Sub End If name1 = parts(0) name2 = parts(1) name3 = parts(2) name4 = parts(3) End Sub جرب واخبرني بالنتيجة 😊
-
كيفك استاذي العزيز ...وسامحني على الازعاج وبارك الله فيك حصلت مشكله بسيطه في ان الاحتياجات التدريبية عندما احدد شهر معين على سبيل المثال اذا انا بحاجه الى معرفه الاحتياجات التدريبيه لشهر ٣ يظهر الاحتياجات كامله لكل الشهور ياريت ويكون الخيارات متاحه للبحث على كل شهر لحاله او كل الشهور مع بعض
-
صيغaccdb
-
السلام عليكم ورحمة الله وبركاته مساءك سعيد بشمهندس foskh اشكرك وبارك الله فيك ماقصدته بشمهندس هو ان يتوقف عمل كود التقسيم حال وجود الاسم باكثر من اربع مقاطع وان يتم السماح بتقسيم الاسم يدويا في مربعات تقسيم الاسم وذلك كي نتلافى العديد من المشاكل في قصص الاسماء التي لاتنتهي فذاك اسمه مركب مكون من اتنين او تلاته اي ان يكون اسمه الاول محمد ابراهيم وذلك اسمه ابوفلان واخر بن علان وهكذا بمعنى اخر ان يعمل شرط التقسيم كما هو ولكن يتوقف عمله في حال اكتشف ان هذا الاسم الرباعي يحوى اكثر من اربع مقاطع ويتم السماح بالتقسيم اليدوي وان ندخل هذا الاسم في مربعات التقسيم يدويا تحياتي
-
fci_angel joined the community
-
اريد عمل ضغط واصلاح قاعدة بيانات اكسس خارجية
abouelhassan replied to salah.sarea's topic in قسم الأكسيس Access
مشكوررر اخى خليفة -
رقم سري لفتح نموذج يحتوي معلومات سرية للغاية
abouelhassan replied to عبد اللطيف سلوم's topic in قسم الأكسيس Access
شكر وتقدير واحترام من اخيك -
للعلم اخي الكريم ، التعديل على برنامج جاهز ليلبي حاجتك قد يستغرق وقت أطول من بداية تصميمه من البداية 😅
-
حالياً لاني متابع من الموبايل ، اكتب لي بشرح وافي ( ولا تبخل بالشرح الواضح ) الفكرة اللي متخيلها للبرنامج من لحظة أول نموذج ..... الخ 😅
-
عبد اللطيف سلوم started following مساعدة في تعديل برنامج
-
نزل البرنامج هنا مشان نقدر نطبق عليه اما اذا صيغته Accde فهذا النوع لا احد يستطيع ان يعدل عليه انسى الموضوع
-
mhm55 joined the community
-
تحديث كميه المخزون
mahmoud nasr alhasany replied to mahmoud nasr alhasany's topic in منتدى الاكسيل Excel
احسنت ا/ حسونة حسين أنه يعمل شكرا جزيلا على هذا المجهود الرائع -
تمام استاذنا foksh. في انتظارك ان شاءالله
-
جزاك الله خير الجزاء اجرب وارد لك خبر غدا ان شاء الله لايوجد لدينا كهرباء حاليا 😅
-
تفضل أخي الكريم Scanner DLL.accdb ارسل الكود الذي لديك لتجربته ومحاولة فهم سلوكه
-
جربته الان ولم يفلح ماالحل؟ هل ممكن اخي الكريم ان تعطيني الكود عندك من خلال مثال الكود الذي لدي يعمل بشكل ممتاز تلى ويندوز 7
-
-
مشكور اخي الكريم قد جربته من قبل ولم ينجح اعتقد ان الملف لديه مشكلة توافق مع ويندوز10 واريد حلها من عند احد الاخوة الكرام في المنتدى
-
أخي @Zooro1 ، ربي يسلمك من كل مكروه لنبدأ غداً إن شاء الله في توضيح بعض النقاط والأساسيات ثم البدء بتصميم الجداول .
-
تفضل أخي @SAROOK ، تم التعديل على مديول المرفق وتوسيعه ليشمل كلمة "بن" أينما وردت بين مقاطع الإسم ، في الكود التالي :- Public Function qsplit(FullName As String, i As Integer) As String Dim parts() As String Dim j As Integer Dim namePart As String parts = Split(FullName, " ") For j = 0 To UBound(parts) - 1 If InStr(parts(j), "بن") > 0 Then parts(j) = parts(j) & " " & parts(j + 1) parts(j + 1) = "" End If Next j Dim count As Integer For j = 0 To UBound(parts) If parts(j) <> "" Then If count = i Then qsplit = parts(j) Exit Function End If count = count + 1 End If Next j End Function مع بقاء الإستدعاء كما هو في الملف المرفق لك ، وهذا ملفك بعد التعديل :- Splite Names.accdb