Not sure how this looks in Excel forum, but here in the newsgroup the
period/fullstops have been removed

with ActiveSheet.ChartObjects("mychart")
.top=range("D3").top
.left=range("D3").Left
end with

also, .left=range("D3").top was a typo - corrected above.


--
Regards,
Tom Ogilvy


"i-Zapp " wrote in message
...
with ActiveSheet.ChartObjects("mychart")
top=range("D3").top
left=range("D3").top
end with


---
Message posted from http://www.ExcelForum.com/