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

تصدير البيانات الى اكسل


Khalid Jnb

الردود الموصى بها

السلام عليكم

هل يمكن اضافة استعلام توحيد (Query1) الى قائمة اختيار الجداول في النموذج المرفق وهو لاحد الاخوة بالموقع 

If Not IsNull(Me.ChooseTble) = True Then
If Me.ChooseTble = "tb1" Then
Me.Box.RowSource = "Table/Query"
Me.Box.RowSource = "SELECT tb1.[Ê], tb1.[ÇÓã ÇáãæÙÝ],tb1.[ÇáÚäæÇä ÇáæÙíÝí],tb1.[ÊÇÑíÎ ÇáÊÚííä],tb1.[ÇáãáÇÍÙÇÊ ]" & _
"FROM tb1;"
Box.Requery
End If

ليتم تصديره الى اكسيل مثل الجداول الموجودة بالنموذج (tb1,tb2,tb3) 

علما انني استخدمت الكود التالي

وشكرا لكم

test.rar

Untitled.jpg

تم تعديل بواسطه خالد سيسكو
رابط هذا التعليق
شارك

السلام عليكم استاذ ابو ياسبن

اولا شكرا لك

ثانيا  لايتم تصدير الاستعلام

ثالثا اريد ان يظهر الاستعلام (Query1) مع الجداول بنفس القائمه 

وشكرا مرة اخرى لك

رابط هذا التعليق
شارك

1 ساعه مضت, خالد سيسكو said:

السلام عليكم استاذ ابو ياسبن

اولا شكرا لك

ثانيا  لايتم تصدير الاستعلام

ثالثا اريد ان يظهر الاستعلام (Query1) مع الجداول بنفس القائمه 

وشكرا مرة اخرى لك

مشاركة مع أخي @ابو ياسين المشولي انظر المرفق ......

 

test.accdb

  • Like 1
  • Thanks 2
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information