BreakLinks method works when Stepping Through but not when Running!

  • Thread starter Thread starter WhytheQ
  • Start date Start date
W

WhytheQ

Dear All,
I have a worksheet with several graphs in it.
The sheet gets copied to create a new workbook then I've atempted to
Breaklinks to the original workbook by using the following code
(straight out of the online help!!).
If I step through the macro then it seems like the links are broken,
but if I just let it run then when I open the workbook (which has been
programmatically attached to and outlook mailitem) then the links still
exist and haven't been broken!!

Any help greatly appreciated,
Jason.


Dim astrLinks As Variant
' Define variable as an Excel link type.
astrLinks = ActiveWorkbook.LinkSources(Type:=xlLinkTypeExcelLinks)
' Break the first link in the active workbook.
ActiveWorkbook.BreakLink Name:=astrLinks(1), Type:=xlLinkTypeExcelLinks
 
It worked for me (like you indicate it does for you) for an unattached
workbook. Did you save the workbook after breaking the link?

I don't know your situation, but I would make all changes before doing the
attachment. If you want to preserve the original, then make a copy (work
with it), make the changes, do the attachment, send the email, delete the
copy.
 
Thanks are due, as per usual Tom! ... the little line
"Activeworkbook.Save" has made all the difference.

Jason
 
Back
Top