"Breaklink Problem"

Background...Win XP...Xcel 2002....WB1 stores data on WS "DATA", reports and
charts are generated on quarterly WS's then saved off to new individual
WB's...the link should be broken to the original WB but this is where the
program halts with this msg..

"Run-time error '1004'
Method 'Breaklink' of Object'_Workbook' Failed"

The code below....

'WB1 is the active WB at this point.."C:\************\LEADS _
'PROGRAM 2007-2008.xls"

Sheets("1ST QTR MAXIN CHART").Select 'chart is generated on this WS
ActiveWindow.SelectedSheets.PrintOut 'printed
ActiveWindow.SelectedSheets.Copy 'copied

' next the new WB is saved with it's own File Name

ActiveWorkbook.SaveAs Filename:="C:\*************\1st _
Qtr Maxin.xls" , FileFormat:=xlNormal, Password:="", _
WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False'

' and next is where I want to break the link to the original WB1

ActiveWorkbook.BreakLink Name:= "C:\************\LEADS _
PROGRAM 2007-2008.xls", Type:= xlExcelLinks
ActiveWindow.Close


Any help would be greatly appreciated,

Don

Jim
Fri May 09 19:09:57 CDT 2008


I haven't used the BreakLink method.
However, reviewing BreakLink in the help file reveals that "Name" should
refer to the name of the link. Also, the LinkSources method for a workbook
returns an array of all of the link names in the workbook...
--
Jim Cone
Portland, Oregon USA
http://www.realezsites.com/bus/primitivesoftware
(Excel Add-ins / Excel Programming)



"Don" <BRNER2@AOLDOTCOM>
wrote in message
Background...Win XP...Xcel 2002....WB1 stores data on WS "DATA",
reports and charts are generated on quarterly WS's then saved off to
new individual WB's...
the link should be broken to the original WB but this is where the
program halts with this msg..
"Run-time error '1004'
Method 'Breaklink' of Object'_Workbook' Failed"
The code below....
'-snip-
' and next is where I want to break the link to the original WB1

ActiveWorkbook.BreakLink Name:= "C:\************\LEADS _
PROGRAM 2007-2008.xls", Type:= xlExcelLinks
ActiveWindow.Close

Any help would be greatly appreciated,
Don

BRNER2
Sat May 10 01:09:01 CDT 2008

Thanks Jim...you pointed me in the right direction. I had moved the file to
a flash drive off the ops computer and was working at home off that flash
drive ("E"). My macro defined "Name" as being on "C" drive.....duhh...feel
sort of dumb now, going to go to my corner and pout....lol But the good news
is "problem solved"...:)

Thanks again and have a great weekend,

Don

"Jim Cone" wrote:

>
> I haven't used the BreakLink method.
> However, reviewing BreakLink in the help file reveals that "Name" should
> refer to the name of the link. Also, the LinkSources method for a workbook
> returns an array of all of the link names in the workbook...
> --
> Jim Cone
> Portland, Oregon USA
> http://www.realezsites.com/bus/primitivesoftware
> (Excel Add-ins / Excel Programming)
>
>
>
> "Don" <BRNER2@AOLDOTCOM>
> wrote in message
> Background...Win XP...Xcel 2002....WB1 stores data on WS "DATA",
> reports and charts are generated on quarterly WS's then saved off to
> new individual WB's...
> the link should be broken to the original WB but this is where the
> program halts with this msg..
> "Run-time error '1004'
> Method 'Breaklink' of Object'_Workbook' Failed"
> The code below....
> '-snip-
> ' and next is where I want to break the link to the original WB1
>
> ActiveWorkbook.BreakLink Name:= "C:\************\LEADS _
> PROGRAM 2007-2008.xls", Type:= xlExcelLinks
> ActiveWindow.Close
>
> Any help would be greatly appreciated,
> Don
>