اذهب الي المحتوي
أوفيسنا

كل الانشطه

هذه الصفحة تحدث تلقائياً

  1. الساعة الأخيرة
  2. اخي الكريم المطلوب تم توضيحه بالملف المرقق وهو عند استدعاء كود الماكرو الذي تم تسجيله لا يعمل واعتقد ان الفيجوال بيسك يطلب تعريف السولفر على انه دالة
  3. Today
  4. شكرا اخي كنوري تم حل المشكلة بارك الله فيك وانت ايضا اخي وسيط بارك الله فيك
  5. بارك الله فيك اخي كنوري وانت ايضا اخي الوسيط نفس الفكرة ونفس مبدأ العمل هذا هو المطلوب طبقت الفكرة ونجحت في النموذج الاساسي ولكن في نموذج فرعي مصدر سجلاته نموذج الاساسي وفيه حقل للبحث وبعد البحث لا يمكن الاختيار من السجلات المطلوبة للتصديرها يعني عند الضغط لا يستطيع الاختيار تبقى فارغة من علامة ✔️ عكس النموذج الاساسي عادي تختار وتصدر واموره تمام ؟
  6. @Mohamed Hicham لماذا تستخدم الحلقة التكرارية وخاصية اختيار الملفات ؟ من شانه ان يجعل الكود بطيء ، دائما نلجا الى الفلترة او الفلترة المتقدمة لسرعتها خصوصا ان بيانات الاخ tahar صغيرة اما اذا كانت البيانات ضخمة عندها نستخدم الحلقة التكرارية مع المصفوفات لتسريع الكود. مجرد ملاحظة فقط ..تحياتي .
  7. اخي الكريم ...وكيف سنعرف نوعية الخطا اذا انت لم تحدده. حقيقة لم استعمل هذه الاداة من قبل لكن اذا كنت تقصد هذا الخطا "compile erro function not defined" في هذه الحالة يجب ان تتاكد من تقعيل هذه الاداة من خلال قائمة خيارات الملف والذهاب الى الوظائف الاضافية adds in ويظهر لك مجموعة خيارات ابحث عنها وفعلها وستظهر لك القائمة وستجدها وفعلها ثم ادخل الى محرر الاكواد ومن قائمة tool >reference > solver قم بتحديدها اما اذا كان خطا اخر فعليك توضيح ذلك و لاتضع سؤال عشوائي لا احد يعلم ما هو الخطأ . تحياتي
  8. السلام عليكم شكراً اخي الكريم سامي بصراحة اخي العزيز هو عند اختيار اسم بلد من الكومبوبكس لا تظهر النتائج إلا بعد عمل ريفريش للنموذج ، كما انه يقوم بتكرار السجلات بنفس الاسم لنفس البلد يعني لازم يظهر اسم واحد حتى وان كان مكرر في السجلات لنفس البلد ؟ ؟؟؟؟؟؟
  9. اذكر مثال نزلته من المنتدى لكن لسن متاكد من صاحبه TabRight.accdb
  10. السلام عليكم اساتذتنا الكبار ارجو النظر الى المشكلة الواردة في الملف المرفق قمت بتسجيل ماكرو للأداة سولفر ولكن عند استدعائه مرة اخرى لا يعمل ويعطيني خطأ ارجو من حضراتكم تعديل الكود ليعمل بكفاءة عند استدعاؤه portofolio.xlsm
  11. السلام عليكم ورحمة الله تعالى وبركاته تفضل اخي الكريم يمكنك وضع الكود التالي وفلترة العمود بعشرة اعداد دفعة واحدة قابلة للزيادة . Sub Filter_() Dim Criteria_MH(100) As String Dim i As Integer Application.ScreenUpdating = False Sheets("ارقام الفلترة").Activate Range("A2:A12").Select For i = 0 To Selection.Count Criteria_MH(i) = Selection(i) Next Sheets("الجدول").Range("A3:A100").AutoFilter Field:=1, Criteria1:=Criteria_MH, Operator:=xlFilterValues Sheets("الجدول").Activate Application.ScreenUpdating = True End Sub tahar-MH.xlsm
  12. Yesterday
  13. =IF(IF(NB.SI($B$1:B2;B2)=1;MAX($A1:A$1)+1;"")<>"";SI(NB.SI($B$1:B2;B2)=1;MAX($A1:A$1)+1;"");INDEX($A$1:A1;EQUIV(B2;$B$1:B2;0))) تفضل جرب اخي OfficinaExample(3).xlsx
  14. الصورة ماخوذة من النموذج Contact Details موجود ياعزيزي
  15. السلام عليكم ورحمة الله وبركاته اخوتي لدي هذا الملف ازرار التنقلات لاتعمل على وندوز 10 عند الضغط على الزر تظهر نافذه فيها تعذر العثور على وحدات الماكرو بينما تعمل على وندوز 7 بدون مشاكل فما هو الحل علما اني فعلت وحدات الماكرو لكن دون جدوى . وكذلك الكتابة في النافذة غير مفهومة لا هي عربية ولا هي باللغة الانكليزية.لكم كل الاحترام والتقدير ‫الصف الاول.xlsm
  16. الامتداد ليس له علاقة ولكن يجب ان تكون خلفية الصورة بنفس خلفية النموذج ... بالنسبة لك ان لم تظهر القائمة او لم تجدها هناك حل بدائي وهو مسح مربعات النص المعمولة لديك ... وابدأ بادراج الصورة اولا ثم قم بادراج مربعات النص لديك بهذا الشكل تصبح الصورة خلف المربعات
  17. أستاذي الكريم / هذه الصورة ليست في اكسس 2003 ولكن في أكسس ما فوق 2003 معلش أنا أسف سؤال اخر هل يجب ان تكون الصورة في امتداد معين (GPJ ) أو أي نوع من الامتدادات
  18. المثال المرفق غير الموجود في الصورة ... تأكد منه
  19. طيب تفضل ... التعديلات ::::::: 1- اضفنا حق ch في الجدول 2- عملنا استعلام بالسجلات المختارة 3- ادرجنا زر وبه الامر التالي ::::: 4- جرب المرفق .. Dim DTPath As String DTPath = CreateObject("WScript.Shell").SpecialFolders("Desktop") & "\salim07- " & Format(Date, "dd-mm-yyyy") & ".xlsx" DoCmd.OutputTo acOutputQuery, "استعلام1", acFormatXLSX, DTPath, False MsgBox "لقد تم تصدير البيانات بنجاح" TEST 12.accdb
  20. استاذي الكريم / جزاكم الله خيرا ولكن في اوفيس 2003 في خصائص الصورة لم تظهر نفس القائمة ولكن ظهرت كما في الثورة المرسلة لكم
  21. شكرا جزيلا للمبدع الاستاذ Mohamed Hicham هذا هو المطلوب بالضبط بارك الله بك وبهذا المنتدى الرائع وفقكم الله تعالى .
  1. أظهر المزيد
×
×
  • اضف...

Important Information