Solved

Reference Excel Chart in Access Unbound Object Frame using Sourceitem property

Posted on 2010-08-12
18
2,589 Views
Last Modified: 2013-11-27
I can't for the life of me figure out to reference an Excel chart in my Access form Unbound Object Frame using the "Sourceitem" property. I need to embed multiple charts (not just pictures of the chart)into my Access form using the OLE Unbound Object Frame. I have the "SourceDoc" property correct as this is just the filepath to my Excel file. However I can't seem to reference the specific charts on the worksheets (Which are seperate chart sheets from the actual data). Attached is an example of the non-workng code. It currently returns only the active cells in the worksheet. I've been struggling with this for days !!! Thanks.

*The Excel File Name = Spend Management 7-19-2010.xlsx
*The Worksheet(Chart Sheet) Name = Direct-Charts
*Chart Name = Chart 35
With dtb

'.Visible = True
     ' Enable control.
     '.Enabled = True
     ' Set Locked property to False.
     '.Locked = False
     ' Allow embedded objects only.
     '.OLETypeAllowed = acOLEEmbedded
     ' Specify the OLE server and the type of object.
     '.Class = "Excel.Chart.8"
     ' Specify the file to be embedded.
     '.SourceDoc = "G:\000_Supply Chain\Procurement-Corporate\Spend Management\Spend Management 7-19-2010.xlsx"
     ' Specify the Worksheet Item
     '.SourceItem = "Direct - Charts![Spend Management 7-19-2010.xlsx].Chart 35"
     ' Create the embedded object.
     '.Action = acOLECreateEmbed
 ' End With

Open in new window

0
Comment
Question by:RichBLACKIII
  • 6
  • 3
  • 3
  • +2
18 Comments
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 33426178
Have you tried simply copying the Excel chart, then on the Access form, Select:
Paste Special-->Microsoft Office Excel Chart?

This works fine for me...

;-)

JeffCoachman
0
 

Author Comment

by:RichBLACKIII
ID: 33426617
No, that's not going to work. I have multiple charts that need to be loaded into the same unbound object frame at different times when I run a different macro through command buttons on my form.

Gosh, I didn't think this question would be this hard ???...I guess it must be if google couldn't provide an answer :\

 
0
 
LVL 44

Expert Comment

by:GRayL
ID: 33442720
Although it says worksheet, it is actually a workbook.  You have to start from there.  What is the workbook(sheet) name?
0
Use Case: Protecting a Hybrid Cloud Infrastructure

Microsoft Azure is rapidly becoming the norm in dynamic IT environments. This document describes the challenges that organizations face when protecting data in a hybrid cloud IT environment and presents a use case to demonstrate how Acronis Backup protects all data.

 

Author Comment

by:RichBLACKIII
ID: 33442755
*The Excel File Name = Spend Management 7-19-2010.xlsx
*The Worksheet(Chart Sheet) Name = Direct-Charts
*Chart Name = Chart 35

I have this in the question already.
0
 
LVL 59

Expert Comment

by:Kevin Cross
ID: 33498411
I believe your issue to be here:

.SourceItem = "Direct - Charts![Spend Management 7-19-2010.xlsx].Chart 35"

Since the names have spaces in them, I believe you will want to surround them with []. But as I believe was GrayL's point here - http:#a33442720 - you will want to start with the Excel sheet name.

.SourceItem = "[Direct - Charts]![Chart 35]"
or
.SourceItem = "[Direct - Charts].[Chart 35]"

You are already opening the Excel workbook as the source document.
0
 

Author Comment

by:RichBLACKIII
ID: 33504675
SourceItem = "[Direct - Charts]![Chart 35]"
or
.SourceItem = "[Direct - Charts].[Chart 35]"

The syntax you gave is still incorrect. The Excel file opens but just embeds the active workbook cells.
0
 
LVL 44

Expert Comment

by:GRayL
ID: 33504842
Open the form in design view, display Properties, click Data tab, click SourceItem, press F1 and you get a detailed explanation of how to reference the elements in Excel.
0
 

Author Comment

by:RichBLACKIII
ID: 33505376
Yes, GRayL I know how to use the Sourceitem property. The exact problem I am having is how to reference an Excel Chart on a Excel Chart Sheet. The help menu does not give the syntax for that situation.
0
 
LVL 59

Expert Comment

by:Kevin Cross
ID: 33505512
VBA > Worksheets("{sheetname}").ChartObjects(n).Chart
http://msdn.microsoft.com/en-us/library/aa213725(office.11).aspx
0
 

Author Comment

by:RichBLACKIII
ID: 33515482
VBA > Worksheets("{sheetname}").ChartObjects(n).Chart
http://msdn.microsoft.com/en-us/library/aa213725(office.11).aspx

This does not work with the sourceitem property.
0
 
LVL 44

Expert Comment

by:GRayL
ID: 33524927
I got from the Help extract that the SourceItem had to be a cell or cell range.  ie.  It could not be a chart.
0
 
LVL 17

Accepted Solution

by:
calacuccia earned 500 total points
ID: 33537682
In this thread, the syntax is slightly differenet http://www.pcreview.co.uk/forums/thread-1154811.php
Of course, there it's referring to a sheet embedded chart, maybe wort a try to place the Chart in a worksheet and do it this way?

Also here, it is mentioned to be working I believe http://forums.techguy.org/business-applications/568565-open-excel-chart-access-2003-a.html

Have you tried much shorter statements?

'.SourceItem = "Direct - Charts"
(eventually wit [] or '   ' around them?
0
 
LVL 59

Expert Comment

by:Kevin Cross
ID: 33703772
Think GrayL is right here: http:#a33524927
0
 

Author Closing Comment

by:RichBLACKIII
ID: 33727532
It's close enough
0

Featured Post

Complete VMware vSphere® ESX(i) & Hyper-V Backup

Capture your entire system, including the host, with patented disk imaging integrated with VMware VADP / Microsoft VSS and RCT. RTOs is as low as 15 seconds with Acronis Active Restore™. You can enjoy unlimited P2V/V2V migrations from any source (even from a different hypervisor)

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Some code to ensure data integrity when using macros within Excel. Also included code that helps secure your data within an Excel workbook.
Phishing attempts can come in all forms, shapes and sizes. No matter how familiar you think you are with them, always remember to take extra precaution when opening an email with attachments or links.
This Micro Tutorial will demonstrate in Google Sheets how to use the HYPERLINK function to create live links inside your spreadsheet.
This lesson covers basic error handling code in Microsoft Excel using VBA. This is the first lesson in a 3-part series that uses code to loop through an Excel spreadsheet in VBA and then fix errors, taking advantage of error handling code. This l…

829 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question