عبد الله قدور

السلام عليكم ورحمة الله وبركاته قمت بتجربة سريعة فإذا تكرمت علي بالاجابة كيف عدد الكلمة 44 وعدد الايات التي ذكرت فيها 48 علما ان بحث في برامج اخرى فان عدد تكرار كلمة الرحمن في القران هو 47 تحياتي لك وجهد جبار جزاك الله كل خير

السلام عليكم ورحمة الله وبركاته اخي الكريم اعتذر على التأخر في الرد اتبع الاعدادات التي في صورة لتحديد طابعة محددة

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

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

السلام عليكم ورحمة الله وبركاته اسعدد الله مساءكم اخواني الكرام عندي هذا الكود الجميل استخدمه في اضافة البيانات الى الجدول، ولكن بعد تغيير الجدول واصبح مرتبط بقاعدة بيانات SQL لم يعد يعمل فما السبب دام فضلكم Set DB = CurrentDb() Set RsW = DB.OpenRecordset("spech") With RsW .AddNew !code = Me.code !Datee = Me.Datee !SourceItem = Me.SourceItem !SpplierName = Me.SpplierName !Address = Me.Address !DateRec = Me.DateRec !Driver = Me.Driver !TruckNo = Me.TruckNo !sgin1 = Me.sgin1 !sgin2 = Me.sgin2 !sgin3 = Me.sgin3 !user = DLookup("user", "currentuser") .Update End With

حياك الله وبياك اخي جعفر لم انتبه اني استخدم التعبير الخطأ الى ان ذكرت انت ذلك جزاك الله كل خير

السلام عليكم ورحمة الله وبركاته اخواني الكرام عندي هذا الكود أريد من خلاله نقل تحديث بيانات الجدول الاول من بيانات الجدول الثاني باستخدام recordset لكن تظهر رسالة خطأ تقول انه لا يوجد سجل Set DB = CurrentDb Set RsW = DB.OpenRecordset("item") ' جدول الوجهة Set RsM = DB.OpenRecordset("tmpadvb") 'جدول المصدر Do Until RsM.BOF RsW.MoveFirst Do Until RsW.BOF If RsW!id = RsM!ItId Then RsW.Edit RsW!LastDate = RsM!ExDate RsW!Cost = RsM!Price RsW.Update Exit Do End If RsW.MoveNext Loop RsM.MoveNext Loop RsM.Close RsW.Close Set DB = Nothing هذه هي رساله الخطا

تحياتي لك أخي الكريم انا استخدم هذا الموقع الرابط حياك الله وبياك من بعض ما عندكم استاذنا الكريم

جزاك الله كل خير اخي الكريم نجح الامر وحلت المشكلة

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

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

تأكد من تصميم التقرير مربع النص الذي فيه الرقم كبير تستطيع فعل ذلك من تصميم التقرير

بارك الله فيك اخي الكريم حياك الله وبياك

اضغط على الخط ضغطتين ثم اختر تثبيت يقوم بتثبيت الخط في مجلد الخطوط او انسخ الخط الى المجلد المسار التالي C:\Windows\Fonts

في المرفق في المشاركة الاولى تحياتي لك

السلام عليكم اخي الكريم في هذه المشاركة والمرفق فيها تجد فيها اكواد تتحكم بطباعة التقرير الابعاد والهوامش ونوع الورق والاتجاه عمودي ام افقي الرابط

جزاك الله كل خير ونفع الله بكم وأمد في عمركم بالخير والبركة والطاعة المقبولة بإذن الله تعالى

السلام عليكم اخواني الكرام كيف يمكنني تشغيل حلقة تكرارية for do while بشكل تنازلي بحيث يبدأ العد من الرقم الكبير ثم يتم انقاص واحد حتى يصل الى الرقم 1 ثم تتوقف الحلقة

السلام عليكم كأني ما في أمل من الملف

السلام عليكم اخواني الكرام تظهر رسالة الخطأ التالية عندما افتح ملف الاكسل وبعد اختيار نعم تظهر الرسالة الثانية ويعطي انه تم الاصلاح لكن عند فتح الملف مرة اخرى تعود نفس الرسالة للظهور هل هناك طريقة لحل هذه المشكلة

السلام عليكم اخي الكريم @ازهر عبد العزيز هذا التطبيق الذي تحدثت عنه وهناك تطبيقات اخرى ايضا لكن فقط تفتح الجداول لا اكثر

السلام عليكم بحثت عن هذا الموضوع كثيرا ولم اجد اكثر من تطبيق تفتح الجداول فقط

السلام عليكم جزاك الله كل خير اخي الكريم هل يوجد طريقة لاضافتها للاكسل بشكل كامل كما يضاف function الى الاكسل ويصبح استخدامه في اي ملف اكسل افتحه اجده

للرفع

السلام عليكم تفضل اخي الكريم بعد اضافة الحقلين المطلوبين طلب العلم لا يصلح مع الحياء فمن حقك الطلب وواجب علي الاجابة وسامحني على التاخير فضغط العمل لا يرحم barcode.accdb