Using Macro to publish Excel workbook to Intranet site.

Hello, Iam a newbie to Macros and VBA.....I have an excel workbook that has a macros that will publish to an Intranet site. This is in Excel 2016, it was working while I used Excel 2010 on an XP machine. I am now on Windows 10. The code in the Macro hasnt changed. When I run the Macro it comes back with a run-time error 1004 "The Specified Dimension is not valid for the current chart type" If I select end it shows my active worksheet with a moving box around one of the cells. If I choose the debug option it shows my macro with my code highlighted yellow:

ActiveWorkbook.PublishObjects.Add(xlSourceSheet, _
        "http://discovery/PPS/links/Page.htm", "NewHC&Census2", "", xlHtmlStatic, _
        "Census_26279", "").Publish (True)

Any Ideas on whats causing this or am I right thinking its Windows 10 that doesnt like it?
Thanks for any help anyone can give me