Hi,

I am trying to paste 6 Charts as bitmap from VB.Net to one Word page. I can do this from Excel to Word by using Excel Macro. But the code does not work in VB.NET:

wdApp = CreateObject("Word.Application")

wordD = wdApp.Documents.Add

For i = 0 To 5

My.Computer.Clipboard.Clear()

My.Computer.Clipboard.SetImage(ChartBitmap(i))

wordD.Sections.Item(1).Range.PasteSpecial()

'wordD.Sections.Item(1).Range.ShapeRange.Item(i).IncrementLeft( i * 10)

'wordD.Sections.Item(1).Range.ShapeRange.Item(i).IncrementTop(i * 10)

Next i

Thanks.




Coding4Fun - A Happy BackgroundWorker