اذهب الي المحتوي

essam rabea

الخبراء
  • Content Count

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

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

السمعه بالموقع

130 Excellent

4 متابعين

عن العضو essam rabea

  • الإسم الفعلي
    عصام عبدالحكيم ربيع
  • تاريخ الميلاد 02 أكت, 1962

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    محاسب
  • بلد الإقامة
    Cairo,Egypt
  • الإهتمامات
    Access,Excell

اخر الزوار

بلوك اخر الزوار معطل ولن يظهر للاعضاء

  1. اخى mhmadfarooq كلمة السر ايه او اعد الارفاق بدون كلمة سر عموما فى حدث on load للنموذج الرئيسى ضع تابع22.visible=false وفى حدث عند الضغط على زر البحث ضع فى آخر الكود تابع22.visible=true لعله يفيد
  2. أخى princmode جرب هذا عسى يفيد New Microsoft Access Database (2).accdb فقط قم بتغديل المسارات فى مربعات النص بين الأقواس
  3. الأخ hassan omara لفتح This Pc استخدم Shell "C:\Windows\explorer.exe shell:::{20D04FE0-3AEA-1069-A2D8-08002B30309D}", vbNormalFocus ولفتح Network Connection Shell "C:\Windows\explorer.exe shell:::{992CFFA0-F557-101A-88EC-00DD010CCC48}", vbNormalFocus ارجو ان يفى بالغرض
  4. الأخ الفاضل ahm2019 إلق نظرة على المرفق لعله المطلوب بالتوفيق Database2.zip
  5. نظراً لأن موضوع السؤال كان عن تحويل إستعلام الى إكسيل وقد تمت الإجابه عليه .. فيرجى إدراج موضوع جديد بسؤالك الآخر وإن شاء الله تجد الإجابة.
  6. وظيفة Echo هى إيقاف تحديث الشاشة أثناء تشغيل الماكرو
  7. Dim queryName As String Dim fileName As String queryName = "إسم الإستعلام" fileName = Application.CurrentProject.Path & "\" & "إسم ملف الإكسيل" & ".xlsx" DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, _ queryName, fileName, True
  8. ابوعبدالله_1972 جرب هذا الكود عسى أن يفى بالمطلوب Dim queryName As String Dim fileName As String queryName = "sales" fileName = Application.CurrentProject.Path & "\" & queryName & ".xlsx" DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel12Xml, _ queryName, fileName, True
  9. الأخ الفاضل ابوصلاح مع أنى مش فاهم قوى بس هذه محاولة أخرى على ما تقدم به أخى .. ابو عارف .. اجر وظيفي.rar
  10. أخى ابوعبدالله_1972 ما هو الكود الذى تستخدمه للتحويل الى إكسيل وماذا تحول هل تحول تقرير أم إستعلام وماهو إصدار نسخة الأوفيس لديك .. 2003 - 2007 - 2010 - 2016 - 2019 ؟
  11. أخى الفاضل nogom يجب أن يكون هناك مجلد بإسم "الكميات بالمخزن" فى مسار قاعدة بياناتك لكى يخزن الملف به Dim reportName As String Dim fileName As String reportName = "إسم التقرير" fileName = Application.CurrentProject.Path & "\" & "الكميات بالمخزن" & "\" & reportName & ".pdf" DoCmd.OpenReport reportName, acViewPreview, , , acHidden DoCmd.OutputTo acOutputReport, reportName, acFormatPDF, fileName DoCmd.Close acReport, reportName, acSaveNo
×
×
  • اضف...