[mhareek]

تشرفت اخى الغالى استاذى احمد منصور بمرورك انت واستاذي امير اكثر الله من امثالكم 

  لكن المثال يعطى خطاء عند التشغيل    ويقف على سطر   السب ريكورد

كود :

 

Private Sub ActiveReport_ReportStart()
'Paste this code into the ActiveReport_ReportStart event
 Me.Toolbar.Tools.Add "Export"
 
 Set SubReport1 = New ActiveReport2
 Set SubReport2 = New ActiveReport3
 Set SubReport3 = New ActiveReport4

ياتى خطا فى هذا السطر   اخى الحبييب الملون


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