نجوم المشاركات
Popular Content
Showing content with the highest reputation on 17 أكت, 2019 in all areas
-
استاذ حسين لا افهم ما لزوم الحلقة التكرارية يكفي هذا الماكرو Option Explicit Sub Go_To() On Error Resume Next Sheets(Sheets("رئيسي").[D5].Value).Select End Sub5 points
-
السلام عليكم ورحمة الله تعالى وبركاته طبعا فى ناس لوحات مفاتيحهم ممكن تكون مثلى كل حروفها انجلش فقط ويعانون الامرين نظرا لحفظهم تقريبا للوحه ولكن قد تخونهم بعض الاحرف وخاصة مع الكتابة السريعة بدون مراجعة قد تصدف منهم اخطاء املائية مثلما يحدث لى هنا احياناا واعرف ان قد يضحك منها البعض كما اضحك انا على نفسي وبالصدفة وجدت على الويندوز لوحة المفاتيح بشكل تانى غير عجبنى جدا TabTip حتى لا اطيل عليكم لما لا نشاهدها فى الاكسس ملاحظة : تظهر لوحة المفاتيح عند الضغط بالماوس على مربع النص TabTip.mdb4 points
-
4 points
-
مبروك أستاذ حسين مأمون إنضمامك لعائلة الخبراء ,أسأل الله لك التوفيق والنجاح دائما ..وأعانك الله على هذه المسئولية الجديدة وسدد الله خطاك عن حق وجدارة بارك الله فيك وزادك الله من فضله3 points
-
3 points
-
3 points
-
أستاذ الحسن 0546 أين الضغط على الإعجاب طالما أعجبتك الإجابة وهذا اقل ما تقدمه لصاحب الفضل فى مساعدته فى حل مشكلتك ؟3 points
-
السلام عليكم وهذا أيضا مع بعض التعديل... تعداد التلاميذ حسب المستوى والعمر والجنس.xls2 points
-
روعه ابا جودى بارك الله لك فى جودى واخواتها وبارك الله فى علمك ونسال الله لجميع اساتذتنا ان يكتب لكم بكل حرف تقدمونه فى سبيل نشر العلم حسنه وان يزيدها فهو الكريم العليم الخبير تمنياتى للجميع بالتوفيق ودوام النجاح2 points
-
2 points
-
2 points
-
أستاذنا أبو عبدالله الحلوانى أستاذنا ابا جودى أنا شايف فاكهة نازلة يمين ويمن ما فيش أى حاجة للغلبان اللى باصصلكم فى كل حاجة ده .. ولا يعنى عشان مش صعيدى أخى العزيز kha9009lid إسمها ايه لوحة المفاتيح دى .. باين عليها جبارة2 points
-
انت يُدفع لك ابا جودى وبالنص زى ما اتعودنا مش قولتلك هنطلك دافع كنت أم مدفوع😉2 points
-
أستاذنا ابا جودى اى دا اى دا اى دا .. أنا حاسس إنى زى ماتقول كده خير اللهم اجعله خير ماسك موبايل نوت 20++ كمل يا جميل الشكل وهندسه شوية.. الله يفتح عليك ..2 points
-
بل كل الشكر والتقدير لكم أستاذنا ومعلمنا القدير عصام ربيع زادكم الله فضلا وعلما ونفع بكم أينما حللتم2 points
-
كل الشكر والتقدير لأستاذنا بو عبدالله الحلوانى ولكل أعضاء المنتدى الكرام خالص تحياتى2 points
-
اخي الكريم حسب علمي تنوع الالوان في صفوف الليست من المستحيل حتى وان كانت هناك تقنية ستكون صعبة وستزيد ثقل عمل الكود2 points
-
ما هي اداة البحث التي تريد ان تشغلها الصّف او اسم التلميذ على كل حال جرب هذا الملف st_by_class.xlsx2 points
-
المفروض انه يفتح تقرير محدد للطياعة تمام كل ياللى مطلوب منك تفح هذا التقرير فى وضع التصميم وتقوم بوصع حدث عند التحميل كالاتى Private Sub Report_Load() 'Printed by Me.txtPrintedBy = UsersNames End Sub على اعتبار ان تضع مربع النص اسفل صحفة التقرير سوف يكون اسمه txtPrintedBy وعنوانه سوف يكون طبع بواسطة :2 points
-
انا اسف جدا جدا جدا انا فهمت غلط مكنت فاهم ان حضرتك حابب ترتب التاريخ انا اختلط على الامر واعتقد ان المشكله فى الفرز واختيار التواريخ بين فترتى البداية والنهاية .. سامحنى غلبتك وبالنسبة للشكر فكل الشكر والتقدير ولاستاذى الجليل ومعلمى الاستاذ @ابو عارف2 points
-
شكرا لك أخي أبو عارف وابا جودى إليك يا من كان له قدم السبق في ركب العلم والتعليم، إليك يا من بذلت ولم تنتظر العطاء، إليك أهدي عبارات الشكر والتقدير.2 points
-
2 points
-
2 points
-
2 points
-
السلام عليكم بعد اذن الاستاذ حسين هذا كود اتمنا يلبي طلبك انقر زر تنفيذ abad_Merg.xls2 points
-
2 points
-
1 point
-
احسنت اخي ابو عبدالله واقدر جهودكم المبذولة معي هي مجرد فكرة بسيطة او تعديل ارادها احد اصدقائي وكنت قط اعطيته برنامج المخازن هذا منذ فترة شكراً اخي وبارك الله بك1 point
-
تم التعديل على الملف ليعطيك الاسم (او عدة اسماء تبدأ بحرف او حروف معينة) الصفحة Salim من هذا الملف Saerch_by_Name.xlsx1 point
-
أستاذنا عصام ربيع وأحبتي أعضاء المنتدي الكرام 🍊🍋🍌🍎🍈🥝🍒🍊🍋🍌🍎🍈🥝🍊🍋🍌🍎🍈🥝 🍋🍌🍎🍈🥝🍒🍊🍋🍌🍎🍈🥝🍊🍋🍌🍎🍈 🍋🍌🍎🍈🥝🍒🍊🍋🍌🍎🍈🥝🍊🍋🍌🍎🍈 تحلية خفيفة ودعايا لمنتجاتنا من المزرعة اليكم بدون وسيط 😁1 point
-
بالتأكيد طريقة الأستاذ سليم أفضل مما تتطلب بمعنى انك بمجرد اختيار الصف تجلب المعادلة بيانات كل التلاميذ الموجودين بهذا الصف وهذا منطقيا طبعا أفضل1 point
-
1 point
-
انا ويندوز 7 وشغال فل الفل وشكرا على الفاكهة وجودى بتقول لك شكرا يا عمو ممكن طيب اذا تكرمت اسم البرنامج اشوفه كده حبيبى واستاذى الجليل دا نوت 9 اكسس1 point
-
يستاهل كل خير أبارك لك اللقب الذي تستحقه عن جدارة تحياتي1 point
-
فكرة رائعة اليوم ماشاء الله عليك رايق شوف انا من اكثر من خمس سنوات لا استخدم ولا يوجد لدي لوحة مفاتيح بكافة اجهزتي بالمنزل استخدم برنامج رائع يعطيك لوحة مفاتيح شبيهه باجهزة التاب وفيه نفس الميزة التي ذكرت بمجرد وضع المؤشر في حقل يقبل الكتابة تفتح لوحة المفاتيح وتغيير الشكل وتخصيص واعادة ترتيب تحكم كامل عيبه الوحيد ان الترخيص مرتفع ولكن يستاهل اول الامر اخذت رخصة لجهاز واحد ثم غيرت الرخصة الى 5-9 اجهزة1 point
-
جرب هذا لعله يفي الغرض تعداد التلاميذ حسب المستوى والعمر والجنس.xls1 point
-
ابو عبد الله عاشت ايدك وصلت الفكرة غيرت رقم الاصدار صار يعمل عندي(.اشكرك ابو عبد الله واشكر اخوية عصام واشكر اخوية احمد يوسف)1 point
-
عدل الكود ليلائم الأوفيس تبعك كالآتى Const HKEY_CURRENT_USER = &H80000001 Dim oRegistry Dim sPath Dim sDescription Dim bAllowSubFolders Dim bAllowNetworkLocations Dim bAlreadyExists Dim sParentKey Dim iLocCounter Dim arrChildKeys Dim sChildKey Dim sValue Dim sNewKey Set WshShell = CreateObject("WScript.Shell") strCurDir = WshShell.CurrentDirectory Set oRegistry = GetObject("winmgmts:\\.\root\default:StdRegProv") sPath = strCurDir sDescription = "YourTrustedLocationDescriptionGoesHere" bAllowSubFolders = True bAlreadyExists = False sParentKey = "Software\Microsoft\Office\14.0\Access\Security\Trusted Locations" ' sParentKey = "Software\Microsoft\Office\14.0\Excel\Security\Trusted Locations" ' sParentKey = "Software\Microsoft\Office\14.0\PowerPoint\Security\Trusted Locations" ' sParentKey = "Software\Microsoft\Office\14.0\Word\Security\Trusted Locations" iLocCounter = 0 oRegistry.EnumKey HKEY_CURRENT_USER, sParentKey, arrChildKeys For Each sChildKey in arrChildKeys oRegistry.GetStringValue HKEY_CURRENT_USER, sParentKey & "\" & sChildKey, "Description", sValue If sValue = sDescription Then bAlreadyExists = True If CInt(Mid(sChildKey, 9)) > iLocCounter Then iLocCounter = CInt(Mid(sChildKey, 9)) End If Next 'If bAlreadyExists = False Then sNewKey = sParentKey & "\Location" & CStr(iLocCounter + 1) oRegistry.CreateKey HKEY_CURRENT_USER, sNewKey oRegistry.SetStringValue HKEY_CURRENT_USER, sNewKey, "Path", sPath oRegistry.SetStringValue HKEY_CURRENT_USER, sNewKey, "Description", sDescription If bAllowSubFolders Then oRegistry.SetDWORDValue HKEY_CURRENT_USER, sNewKey, "AllowSubFolders", 1 End If ولا تنسى وضع الملف فى نفس مسار قاعدة البيانات1 point
-
أستاذ @Amir - 4k ماذا يحدث عندما تفتح ملف vbs هل تظهر لك رسالة خطأ ولو أمكن تقوم بتصوير رسالة الخطأ وياحبذا لو ذكرت لنا نوع الأوفس لديك (2019 - 2016 - 2010 - 2003) وهل قمت بتغير رقم الاصدار داخل الكود وفقا لتعليمات أستاذنا @essam rabea1 point
-
السلام عليكم جرب هذا ان وافق مرادك فلا تنسانا بدعوة في ظهر الغيب zaCaptureWebCam2017.mdb1 point
-
1 point
-
1 point
-
ابحث عن فونط IDAutomationHC39M بعد تثبيت اجعله خط نص او مربع مراد تحويله الى رموز باركود1 point
-
وعليكم السلام ورحمة الله وبركاته ملف ربما يتوافق مع طلبك التنبيه في حالة التكرار .xls تحياتي1 point
-
أخي ابو زاهر جرب المرفق ان شاء الله يكون حسب مطلوب تعديل كود.mdb1 point
-
1 point
-
الف شكر استاذي الفاضل ابو عارف واستاذي الفاضل essam rabea هذا هو المطلوب جزاكم الله خير1 point
-
ربما يستحسن استعمال هذا مني طلب مساعده من منتدى اوفسينا (2) (1).xlsm1 point
-
اخواني اساتذتي Ali Mohamed Ali و سليم حاصبيا واخرون ، انه لشرف لي ان أكون بين عظماء مثلكم واتمنى من العلي القدير ان ينور قلوبنا وان يتقبل منا ومنكم جميع اعمالنا وان نكون عند حسن ظن جميع اعضاء هذا الصرح العظيم. اشكركم جميعا تحياتي1 point
-
1 point