ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Excel Graph on web (https://www.excelbanter.com/excel-programming/288896-excel-graph-web.html)

Teppy

Excel Graph on web
 
Hi to all.
I'm a new user of this great forum.
Excuse me for my bad english, I hope that you can understand my post.
I try to make a search of my problem on your thread, but with 0
results...
I'm working on a analysis department of communication agency.
For share our information with other user we are using excel workook
with a series of graphics sheets, linked on data sheets automatically
refreshed by vba code.
The data sheets takes data from query created on a access db.
This workbook is opened by windows every 20 minute and , after refresh
it creates a web page only with graph sheets.

After this long introduction, my problem.
I'm bored with the problems of the graph interface, because it's
difficult to manage.
My idea is to export on gif or jpg files only the graph and, by asp
code or simple html, manage the position,description etc of single
graph.
I have this simple code:

Sub SaveGraph()
For i = 1 To Sheets.Count
If (Sheets(i).Visible = True) Then
Sheets(i).Select
SheetsName = Sheets(i).Name
k = 1
Do While (k <= ActiveSheet.ChartObjects.Count)
ActiveSheet.ChartObjects(k).Activate
ActiveSheet.ChartObjects(k).Chart.Export _
Filename:="c:\" & SheetsName & "_" & k & ".jpg"
k = k + 1
Loop
End If
Next i
End Sub

Now how I can manage the resoluction of every graph?
Can I change the dimension of graph?

Please can you help me?
Thanks to all...


---
Message posted from http://www.ExcelForum.com/



All times are GMT +1. The time now is 08:15 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com