اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

ابو البشر

الخبراء
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    717

  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    11

 نوع المحتوي 

كل منشورات العضو ابو البشر

  1. ابو البشر
    هل جربت الكود يا اخ محمد ليس الجميع بل يقوم بتحديث الحقل حسب رقم البيان في الجدول tag1 تمع في الكود
  2. ابو البشر
    زيادة في الاثراء ... انظر هنا
  3. ابو البشر
    شكرا جزيلا لكما .... كتب الله اجركما ....
  4. ابو البشر
    اشكرك اخي الكريم .... بارك الله فيك ...
  5. ابو البشر
    الطريقة هذه جربتها من قبل .... ولغيت العمل بها لانها تظهر المتصفح امام المستخدم ... جزاك الله خيرا .... وايضا هذه الطريقة تظهرها ... غير مرغوب فيها .... Dim IEE As Object Set IEE = CreateObject("InternetExplorer.Application") 'Create object IEE IEE.navigate "https://wa.me/" & txtNumbers
  6. ابو البشر
    ظهرت هذه الرسالة .....
  7. ابو البشر
    نعم اخي يفتح موقع الواتس بعد تمرير الرقم والرسالة يتم فتح برنامج الواتس .... ولكن يفتح المتصفح في الخلفية دون ان تظهر امام المستخدم .... فيبدوا وكأن برنامج الاكسس يتعامل مباشرة مع برنامج الواتس .... بارك الله فيك على التفاعل ... جاري التجربة استاذي الفاضل ......
  8. ابو البشر
    اشكرك على الرد ...... بارك الله فيك لكن يفتح لي متصفح الاكسبلورر .... المفروض يفتح موقع الواتس
  9. ابو البشر
    كيف يتم التطبيق على هذا الارتباط ...... ABO.mdb
  10. ابو البشر
    كما هو واضح من السؤال كيف يمكن ايقاف هذه الرسالة ؟؟؟ بارك الله فيكم ....
  11. ابو البشر
    جرب استخدم هذا ....................... Function ClearClipboardData_clt() As Boolean On Error GoTo err_ClearClipboardData_clt Dim lngTemp As Long ' If clt_OpenClipboard(0&) <> 0 Then ' lngTemp = clt_EmptyClipBoard() ' lngTemp = clt_CloseClipboard() ' End If ClearClipboardData_clt = True exit_ClearClipboardData_clt: Exit Function err_ClearClipboardData_clt: ClearClipboardData_clt = False Resume exit_ClearClipboardData_clt End Function
  12. ابو البشر
    جرب الملف .... 1.rar
  13. ابو البشر
    اصنع مثل هذا افضل للمستخدم .....
  14. ابو البشر
    اصنع زر سجل جديد وضع فيع هذا ... Me.Requery DoCmd.GoToRecord , , acNewRec
  15. ابو البشر
    تفضل ملفك .... واعلمنا بالنتيجة ... 1.rar
  16. ابو البشر
    اقرأ هذا الموضوع ......
  17. ابو البشر
    @ابو جودي ههههههه .... مثلا هذا الملف .... ‎.rar
  18. ابو البشر
    بالتوفيق .....
  19. ابو البشر
    طيب يكفي تقرير واحد لكل هذه العمليات الثلاث ... انظر جرب ..... فلتر وتصفية ثلاث معيار (2).accdb
  20. ابو البشر
    ولماذا ثلاث ازرة للطباعة ... ؟؟؟؟
  21. ابو البشر
    وهذه مشاركة مع اخي أحمد ..... فلتر وتصفية ثلاث معيار.accdb
  22. ابو البشر
    اضف هذا الكود تحت امر عند فتح النموذج الرئيسي لديك .... Set rst = CurrentDb.OpenRecordset("pu_inv8") With rst .AddNew .Fields("as_a1") = Forms!pu_inv8.as_a1.Value .Fields("as_a2") = Forms!pu_inv8.as_a2 .Update End With
  23. ابو البشر
    بارك الله فيك اخي الكريم .... ولكن تظهر رسالة شبيه لرسالة الدكتور .... الاوفيس 16 - 32 bit
  24. ابو البشر
    هل البرنامج لك فعلا اخي الكريم ... كيف حولته الى accdr ... اصدقني القول وساجيبك
  25. ابو البشر
    جاري التجربة ... احسنت
×
×
  • اضف...

Important Information

  I accept