• 0
zakrimas

معرفة عدد صفحات ملف اكسل عن طريق الاكسس

سؤال

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

اريد معرفة عدد صفحات ملف اكسل عن طريق عمل كود بالاكسس

 

 

 

ولكم جزيل الشكر

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

4 إجابة على هذا السؤال .

  • 0

عزيزي

تفضل مع ملاحظة إضافة مرجع لمكتبة الاكسل من خلال محرر الاكواد >> أدوات >> مراجع

وحسب اصدار الاوفيس لديك

 

Microsoft Excel xx.x Object Library

وكذلك ملاحظة تغيير المسار الملف الصحيح

Private Sub أمر1_Click()Dim xl As Excel.ApplicationDim xlwb As Excel.WorkbookSet xl = New Excel.ApplicationSet xlwb = xl.Workbooks.Open("C:\Users\Mohammed\Desktop\mm.xlsx")  MsgBox (xlwb.Worksheets.Count)xlwb.Closexl.QuitSet xlwb = NothingSet xl = NothingEnd Sub

بالتوفيق

1

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

اشكرك اخي فعلا هو المطلوب 

جزاك الله خيرا 

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه
  • 0

الكود جميل اخي

جميل

0

شارك هذا الرد


رابط المشاركة
شارك الرد من خلال المواقع ادناه

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

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



سجل دخولك الان

  • يستعرض القسم حالياً   0 members

    لا يوجد أعضاء مسجلين يشاهدون هذه الصفحة .