نمایش نمودار اکسل درون فرم
در پیوست این مقاله فایلی برای شما ارائه شده است که نمودار های رسم شده در یک صفحه اکسل را بر روی یک فرم نمایش می دهد.
برای آشنایی با نحوه کار آن به کد های VBA درج شده در فایل مراجعه کنید. مهمترین کد مربوط به تابعی به نام updatechart است که کد و توضیح آن به شرح زیر می باشد :
Private Sub UpdateChart()
Set CurrentChart = Sheets("Charts").ChartObjects(ChartNum).Chart
CurrentChart.Parent.Width = 300
CurrentChart.Parent.Height = 150
Fname = ThisWorkbook.Path & Application.PathSeparator & "temp.gif"
CurrentChart.Export FileName:=Fname, FilterName:="GIF"
Image1.Picture = LoadPicture(Fname)
End Sub
روش کار به این صورت است که ابتدا نموداری که می خواهید در فرم دیده شود را به صورت یک تصویر با نام temp.gif درون پوشه محل خود فایل اکسل ذخیره می شود و سپس برای نمایش آن در فرم از یک کنترل Image استفاده شده است و شما در واقع عکس نمودار را بر روی فرم مشاهده می کنید !
نویسنده :
وحید فرزام
تاریخ انتشار :
1394-04-16 04:30:00
1245
0 نظر
تازه ترین ها