Saturday 15 November 2014

Embed Word Document Excel

Sub EmbedWordDocument()

ActiveSheet.OLEObjects.Add(ClassType:="Word.Document.12", Link:=False, DisplayAsIcon:=False).Activate

End Sub

No comments:

Post a Comment