by Manouvrier Gilles (1 Submission)
Category: OLE/COM/DCOM/Active-X
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Fri 17th November 2000
Date Added: Mon 8th February 2021
Rating: (1 Votes)
This code creates a "sticker"(from VB) on a word document using COM
API Declarations
dim Box as Word.Shape
'don't forget to reffer word object Library :)
'[email protected]
Set WordApp = GetObject(, "Word.Application")
Set Box = WordApp.ActiveDocument.Shapes.AddShape(1, 10, 10, 100, 100)
Box.TextFrame.TextRange.Text = "what a beautiful document"
Box.Fill.BackColor = 16777215
Box.Fill.ForeColor = 10092543
Box.Fill.Transparency = 0.5
End Sub
No comments have been posted about This code creates a sticker(from VB) on a word document using COM. Why not be the first to post a comment about This code creates a sticker(from VB) on a word document using COM.