| {\rtf1\ansi\ansicpg1252\deff0\deflang1044{\fonttbl{\f0\fnil\fcharset0 MS Sans Serif;}} \viewkind4\uc1\pard\f0\fs17 'Insert pictures into row of a table into Word 2000 Document programmatically using VB6- Word Automation. \par \par Dim oWord As Word.Application \par Dim oDoc As Word.Document \par Dim oTable As Word.Table \par Set oWord = CreateObject("word.application") \par oWord.Visible = True \par Set oDoc = oWord.Documents.Add \par \par Dim r As Integer, c As Integer \par \par Set oTable = oDoc.Tables.Add(oDoc.Bookmarks("\\endofdoc").Range, 3, 4) \par oTable.Range.ParagraphFormat.SpaceAfter = 6 \par For r = 1 To 3 \par For c = 1 To 4 \par oTable.Cell(r, c).Range.FormattedText.InlineShapes.AddPicture FileName:="Path\\Filename.bmp", linktofile:=False, _ \tab savewithdocument:=True \par Next \par Next \par oTable.Rows(1).Range.Font.Bold = True \par } |
Inserting pictures to certain row in a Word table |
India web developer web development India | India web development company India ecommerce web developer