*كود* طباعة هيكل الجداول و الاستعلام و الحقول

السلام عليكم ورحمة الله وبركاته

من القائمة العلوية Tools - Analyze -Documenter

Option

تختار Names ,Data,Types And Size ثم OK

نعلم على الجداوال المراد اختيارها ثم OK

يظهر تقرير Preview يمكنك طباعته

الموت لليهود ولمن ولاهم ........

شكرآ جزيلآ للرد وسرعة الرد الحقيقة أن الواحد قوي بإخوانه جزاكم الله خيرآ

هل أجد من يذكر لي هذه الخطوات ( باللغة العربية ) بدلاً من (الإنجليزية)

__________

من القائمة العلوية Tools - Analyze -Documenter

Option

تختار Names ,Data,Types And Size ثم OK

نعلم على الجداوال المراد اختيارها ثم OK

يظهر تقرير Preview يمكنك طباعته

______________

وشكراً للجميع

السلام عليكم

اخى سعودى

اختار

------

> ادوات

> تحليل

> توثيق

> نعلم على الجداوال المراد اختيارها ثم OK

> يظهر تقرير Preview يمكنك طباعته

بالتوفيق

أخــــBengaــــوك (f)

لطباعة الجداول و الاستعلامات و الحقول

Sub EnumerateTables()
  Dim dbsLocal As Database
  Dim tblLocal As TableDef

  Set dbsLocal = CurrentDb
  For Each tblLocal In dbsLocal.TableDefs
    Debug.Print tblLocal.Name
  Next tblLocal
End Sub

Sub EnumerateQueries()
  Dim dbsLocal As Database
  Dim qryLocal As QueryDef

  Set dbsLocal = CurrentDb
  For Each qryLocal In dbsLocal.QueryDefs
    Debug.Print qryLocal.Name
    Debug.Print qryLocal.SQL
  Next qryLocal
End Sub

Sub EnumFields()
  Dim dbsLocal As Database
  Dim tblLocal As TableDef
  Dim fldLocal As Field
  Set dbsLocal = CurrentDb
  For Each tblLocal In dbsLocal.TableDefs
    For Each fldLocal In tblLocal.Fields
      Debug.Print fldLocal.Name
      Debug.Print fldLocal.Type
    Next fldLocal
  Next tblLocal
End Sub

شكرا لك أخوي benga على ترجمة الكلام بارك الله فيك

_______

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

______

وللجميع تحياتي

الاكواد توضع فى أي موديول و هي مجهزة لتعطي الناتج فى ال

immediate window

فمن نافذى تصميم الكود فى ضع مؤشر الماوس داخل الدالة التي تريد ثم اضغط علي زر التشغيل أو Run

فتظهر النتيجة داخل ال Debug Window

أو ما يسمي بال immediate window

و هي تظهر بالضغط علي CTR + G

فيظهر فيها ناتج الدالة

و هو ما ينتج عن الامر Debug.print