كل الانشطه

سلام عليكم ورحمة الله تعالى وبركاته اخي عبد الله شكرا على الجواب وجزاك الله خيرا الان الجواب كافي وشافي ولي سؤال فقط عند استبدال TextBox1 بـ COMOBOX1 هل هناك مشكلة في TextBox1 ام خيار فقط لان في بعض الاحيان قد استعمل TextBox مرة اخرى شكرا وجزاك الله خيرا على هذا الرد الكافي والسلام عليكم ورحمة الله تعالى وبركاته

السلام عليكم المرفق ادناه يحتوي مثل ما في الصورة المعروضة عند النقر على الزر يفتح مربع حوار اكسس ، وعند النقر على Open يتم فتح المرفق المطلوب : لا اريد ظهور مربع حوار اكسس اريد ان يتم فتح المرفق من الزر مباشرة DbTest.rar

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

شكرا لكم Tutuapp 9Apps

شكرا لك عالنشر اخي العزيز snaptube vidmate

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

لدي قاعدة بيانات أكسيس ملخبطة أود إضافة نماذج ليصبح برنامج .فمن أعذيه القاعدة يكملها؟

تفضل محاولتي . KhalifaTest.accdb

شكرا اخي عبدالله على الرد لعل الاخوة يعالجون المشكلة في اقرب وقت مع خالص الشكر

تسلم كود ممتاز

حسب التجربة المشكلة بالمنتدى شكرا لمتابعتك واهتمامك الافاضل حسونة حسين Foksh

السلام عليكم ورحمة الله وبركاته تم استبدال TextBox1 بـ COMOBOX1 يتم فيه تجميع التواريخ من العمود B التواريخ في العمود B بالنظام الفرنسى جعلتها بالنظام dd/mm/yyyy عند التعديل استخدم زر خفظ التعديل اليك الملف ليست بوكس1.xlsm

السلام عليكم و رحمة الله و بركاتة تحية طيبة لكل أعضاء المنتدى الكرام، يسرني أن أعلن عن إنجاز ملف "الجزر والمد" (Tides and Islands). لقد تم تجميع وإعداد هذا الملف بفضل جهودكم ودعمكم المستمر، وبمساعدة أدوات بحث وتحليل متقدمة مثل Gemini، بهدف توفير مرجع شامل ومفيد حول هذا الموضوع الهام، مع تركيز خاص على الموقع/المواقع الجغرافية التي يغطيها التحليل. 🌟 لماذا نحتاج إلى ملاحظاتكم؟ (للتدقيق والتطوير) هذا العمل هو ملك للجميع، ولضمان دقته وفائدته القصوى، فإنني أتوجه إليكم بطلب هام: 1. تسجيل الملاحظات وتصحيح الأخطاء: أرجو من كل من يجد أي خطأ (علمي، لغوي، أو فني)، خاصة فيما يتعلق ببيانات الموقع الجغرافي المشمول في الملف، أو يرى أن هناك معلومة تحتاج إلى تعديل أو توضيح، أن يسجل ملاحظته مشكورًا. 2. التطوير والإضافة: أرحب بأي اقتراحات تهدف إلى تطوير محتوى الملف وإثرائه بمعلومات إضافية، وخصوصًا ما يخص تغطية الموقع، سواء بإضافة إحداثيات، خرائط تفصيلية، أو أي معلومات ذات صلة به. عملنا الجماعي هو سر قوتنا. ساهموا معنا في جعل هذا الملف المرجع الأفضل والأكثر دقة في المنتدى. شكرًا جزيلاً لجهودكم وتعاونكم المثمر. مع خالص التحية والتقدير، ‏‏‏‏الجزر و المد.xlsm

هذه الصور تبين النتيجة تصميم ثم عرض .. العرض يتم لجميع الطلاب

طيب .. جرب الفكرة المدمجة من آكسيس نفسه 🤔 Database2.accdb

طيب بدون الحديث عن متغيرات وهمية وغيرها اعيد السؤال بصيغة اخرى .. ولعدم احراجك اخي الغالي فالسؤال موجه لعموم الخبراء هنا هل يمكن اظهار الصورة في الفورم من دون اخراجها خارج قاعدة البيانات؟

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

طيب هناك فكرة تدور في ذهني .. يمكنك إخراج الملف بأسم غريب ومشفر لا يفهمة إلا من يعرفه 🙂 مثلا لو كان اسم الملف Ball.png أجعل اسمه هكذا مثلا gfkjgfggsdfjhfd.ddt وبعد أستيراده مجددا رجع الاسم الحقيقي للملفBall.png واحذف الملف المشفر ولن يفهم أحد أيش اللي حصل .. ولا من سمع ولا من دري 😅

تفضل Sub ToggleColumns() Dim action As String Dim colsInput As String Dim colArray() As String Dim colItem As Variant Dim answer As VbMsgBoxResult Dim invalidInput As Boolean ' مربع حوار لتحديد الإجراء (إخفاء أو إظهار) answer = MsgBox("هل تريد إخفاء الأعمدة؟" & vbCrLf & vbCrLf & "اضغط 'Yes' للإخفاء، 'No' للإظهار.", vbYesNoCancel + vbQuestion, "تحديد الإجراء") If answer = vbCancel Then Exit Sub ' الخروج إذا ضغط المستخدم على "Cancel" ElseIf answer = vbYes Then action = "إخفاء" Else action = "إظهار" End If ' مربع إدخال لطلب الأعمدة من المستخدم colsInput = InputBox("الرجاء إدخال الأعمدة التي تريد " & action & "ها." & vbCrLf & vbCrLf & "أمثلة:" & vbCrLf & "عمود واحد: B" & vbCrLf & "أعمدة متجاورة: B:D" & vbCrLf & "أعمدة متفرقة: B,D,F", "تحديد الأعمدة") ' الخروج إذا كان الإدخال فارغًا If colsInput = "" Then Exit Sub ' إزالة أي مسافات زائدة وتقسيم الإدخال عند الفاصلة colArray = Split(Replace(colsInput, " ", ""), ",") invalidInput = False On Error Resume Next ' تجاهل الأخطاء مؤقتًا للتحقق من صحة الإدخال ' المرور على كل عنصر أدخله المستخدم For Each colItem In colArray If colItem <> "" Then ' التحقق من أن كل جزء من الإدخال يمثل نطاقًا صالحًا If Columns(colItem).Count = 0 Then invalidInput = True Exit For End If End If Next colItem On Error GoTo 0 ' إعادة تفعيل معالجة الأخطاء ' إذا كان هناك إدخال غير صالح، أظهر رسالة خطأ If invalidInput Then MsgBox "الإدخال '" & colItem & "' غير صالح. الرجاء التأكد من إدخال أسماء أعمدة صحيحة.", vbCritical, "خطأ في الإدخال" Exit Sub End If ' تنفيذ الإجراء على كل عمود أو نطاق For Each colItem In colArray If colItem <> "" Then If action = "إخفاء" Then Columns(colItem).Hidden = True Else Columns(colItem).Hidden = False End If End If Next colItem MsgBox "تم " & action & " الأعمدة بنجاح!", vbInformation, "اكتمل الإجراء" End Sub

اعتذر .. الفكرة والمطلوب غير واضحين لي نهائياً 😐 .

سلام عليكم اتمنى ان اجد اليوم الجواب وجزاكم الله خيرا

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

ما شاء الله على الرد ، بارك الله فيك أخى أبو عيد

أولا اشكر القائمين على هذا المنتدى الرائع في تعليم الاوفيس بجميع برامجه واسأل الله لهم التوفيق والسداد وان يجعل ذلك في ميزان حسانتهم ثانيا بعد توقف المنتدى الأسبوع الماضي وعودته لاحظت ان الملفات في الصفحات القديمة لم تعد تقبل التحميل بعد الضغط عليهابينما سابقا كانت تقبل التحميل كمثال هذان الموضوعان لم استطع تحميل أي ملف فيهما https://www.officena.net/ib/topic/64029-%D8%A7%D9%8A%D8%AC%D8%A7%D8%AF-%D8%A7%D9%83%D8%A8%D8%B1-%D8%AE%D9%85%D8%B3-%D9%82%D9%8A%D9%85/ https://www.officena.net/ib/topic/63972-%D8%AA%D9%86%D8%B3%D9%8A%D9%82-%D8%B4%D8%B1%D8%B7%D9%8A-%D9%84%D8%B1%D9%82%D9%85/ غيرت المتصفح دون جدوى لعلكم تتاكدون هل يمكنكم التحميل فتكون المشكلة لدي ام لا فتكون المشكلة من المنتدى ويتم معالجتها مع خالص الشكر والتقدير

امنح بحثك لمسة احترافية مع خطة بحث من إتقان توضح كيفية كتابة بحث بعنوان بالإنجليزي بأسلوب أكاديمي عالمي، تشمل خطة البحث نماذج من أمثلة عن عناوين بحوث، وتشرح لك كيف تكتب بحث علمي بالإنجليزية؟ مع تزويدك بـ بحث إنجليزي جاهز pdf ونموذج بحث بالإنجليزي pdf؛ ولتوفير وقتك نقدم لك أيضًا خطة بحث جاهزة عالية الجودة.