المسلم العربي

سيدي بن علية حاجي المشكل دوما ارجو ان تتواصل معي في الواتس أو غيره ارجووووك لدي مشروع اصممه لمشتركي مكتبة ارجوك

لدي مشكل في برنامجي الذي اصنع عند الضغط على تسجيل يأتي الخطأ الآتي و للعلم لدي يوزرفوم للترحيل

أخي الكريم بقي نفس المشكل الصورة لا تظهر لأن اسمها بالعربية لما قمت بتغيير اسم الصورة للغة الفرنسية مثلا ahmed ووضعت نفس الاسم في القائمة ظهرت الصورة لماذااااا؟؟؟؟

شكرا أخي الكريم الخاصية right to left لا أستطيع تغييرها أختار true لا تتغير و الصورة موجود و بالاسم و في نفس الفولدر ولا تظهر أرجو المساعدة

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

مرحبا محترفي الاكسل و الشكر موصول لكم جميع أريد تعديل هذا اليوز فورم الخاص بالبحث بالاسم و ذاك باظهار نتائج البحث الاسم هو الأول كما هو موضح في الصورة + اضافة صورة الشخص المبحوث عنه لما نختاره يوز فورم للبحث.rar

أتمنى مساعدتي لكل عباقرة البرمجة

أرجو ارفاق الملف من فضلك

السلام عليكم ورحمة االله تعالى وبركاته. هذا الكود هو لحساب مفتاح رقم الضمان الاجتماعي (CLE ) وذلك بلغة windev. و أريد تغيير هذه البرمجة إلى لغة VBA ساعدوني أرجوك يا خبراء البرمجة ( Calculer la Clé de N° de sécurité Sociale (Algérie// Procédure Windev // (PROCEDURE CleSS(nSS,nCle sNuméroSS est une chaîne = nSS nLongueur est un entier = 0 nIndice est un entier = 0 nCheck est un entier = 0 nNum est un entier = 0 bVerif est un booléen = Vrai Pour vérifier la taille du numéro SS// (nLongueur = Taille(sNuméroSS ? La taille est - elle correcte// SI nLongueur = 0 OU nLongueur <> 10 ALORS bVerif = Faux FIN " Le numéro ne contient que des "0// SI sNuméroSS = Répète("0",10) ALORS bVerif = Faux FIN (nTaille est un entier = Taille(sNuméroSS Tester si chaque caractère est bien un chiffre// POUR nIndice = 1 A nTaille Le numéro contient un "0" ou un caractère// SI Val(sNuméroSS[[nIndice]]) = 0 ET sNuméroSS[[nIndice]] <> "0" ALORS ("Info("Veuillez saisir un numéro valide","Seulement les chiffres sont autorisés bVerif = Faux FIN FIN Déterminer la validité du code selon l'algorithme de la clé de sécurité sociale// Comptage de la première série de nombres// XXXXXXXXXX// Somme de cette série pour obtenir eCheck// POUR nIndice = nLongueur-1 A 1 PAS -2 ([[nNum = Val(sNuméroSS[[nIndice A nIndice nCheck += nNum*2 FIN xxxxx// Comptage de la seconde série de nombres// Somme de cette série pour obtenir eCheck// POUR nIndice = nLongueur A 2 PAS -2 ([[nNum = Val(sNuméroSS[[nIndice A nIndice nCheck += nNum FIN 99 - la somme totale = la clé SS// SI bVerif = Faux OU nCheck > 99 ALORS "nCle = "ER SINON nCle = 99 - nCheck FIN و شكرا لمنتدانا الغالي تعلمنا منكم الكثير

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

تم حل المشكل شكرا أخي خليل و الله تعلمنا منكم الكثير كيف نشكركم قولو لنا لا نعرف طريقة لشكركم

أتمنى مساعدتي لدي برنامج لحساب مفتاح الحساب البريدي و البنكي المهم المفاتيح دائماً أصغر من 100 يعني من 99 حتى 01 و المشكل أنه من 1 إلى 9 يجب كتابتها على الشكل 01 02 03 04 05 06 07 08 09 و لدي يوزرفورم لحساب ذلك لكن لا تظهر الأعداد كما أريد و لذلك أريد كود لإظهار الصفر شمال العدد لما يكون المفتاح أصغر من 10 و شكرا

أريد تحويل المعادلات و العمليات لحساب كل من cle ccp و Rip إلى يوزفورم منفصل عن ورقة الاكسل و بأكواد Vba و شكرا لكم تعلمت منكم الكثير CLE CCP RIP RIB.rar

ارفع ملف العمل حتى يساعدك الأعضاء الخبراء و شكراً

أرجو التوضيح ؟؟؟؟؟؟؟؟؟

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

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

أرجوالمساعدةعلى ايجاد أكواد لتصميم البرنامج الموضح اسفله و أتمنى أن لا تكون الأكواد مرتبطة بخلايا في الاكسل Offecena.rar

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

أردت تطوير صيغة وضعتها داخلها أرجو المساعدة

السلام على إخواني في هذا الصرح العلمي الجميل الذي نتعلم منه يومياً لدي تساؤل حول تعديل صيغة و كل شيء بموضح بالملف المرفق و شكرا لكم Demand SAID.rar

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

أخر سؤال و هل يمكن عمل هذا العمل على شكل ماكرو Macro تلقائي مرن للتعديل لأن المعادلات معقدة وصعبة الفهم و شكرا أخوتي الكرام

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

أخي سليم و لما الخلايا فارغة يجب أن لا تظهر الرسالة