problem with shapes.nodes collection in excel 2007
Hi,
Has anyone come across the following problem? The code below works fine with Excel 2003, but in 2007 nodes.count always returns zero. Any hints appreciated! Many thanks, Tim Dim o As Shape For Each o In ActiveSheet.Shapes If o.Type = msoLine Then If o.Nodes.Count = 2 Then ..etc |
problem with shapes.nodes collection in excel 2007
To clarify further, if I run the following from VBA in a clean Excel
2007 worksheet it still returns 0 instead of 2. dim o as Shape set o=ActiveSheet.shapes.addline (0,0,400,400) ? o.Nodes.Count 0 wrote: Hi, Has anyone come across the following problem? The code below works fine with Excel 2003, but in 2007 nodes.count always returns zero. Any hints appreciated! Many thanks, Tim Dim o As Shape For Each o In ActiveSheet.Shapes If o.Type = msoLine Then If o.Nodes.Count = 2 Then ..etc |
problem with shapes.nodes collection in excel 2007
Thanks for the reply - wasn't sure though what you meant by "parsing it
to a cell"? Incidentally, I just tried doing exactly the same in Word 2007 and in this environment everything behaves as it should. This seems to confirm that its an Excel 2007 bug. Any ideas Dim o as shape set o= ActiveDocument.shapes.addline (0,0,400,400) ? o.Nodes.Count 2 Regards, Tim Duncan wrote: Hi Tim, I ran this on 2002 SP3 and got a count of 2, so unsure why in 2007 it would return 0. Is it to do with how you are calling the count? Have you tried parsing it to a cell? Regards Duncan wrote: To clarify further, if I run the following from VBA in a clean Excel 2007 worksheet it still returns 0 instead of 2. dim o as Shape set o=ActiveSheet.shapes.addline (0,0,400,400) ? o.Nodes.Count 0 wrote: Hi, Has anyone come across the following problem? The code below works fine with Excel 2003, but in 2007 nodes.count always returns zero. Any hints appreciated! Many thanks, Tim Dim o As Shape For Each o In ActiveSheet.Shapes If o.Type = msoLine Then If o.Nodes.Count = 2 Then ..etc |
All times are GMT +1. The time now is 02:47 PM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com