Sub PDF() Selection.InlineShapes.AddOLEObject ClassType:="AcroExch.Document.7, _ FileName:="", LinkToFile:=False, DisplayAsIcon:=True, _ IconFileName:="C:\WINDOWS\Installer\{AC76BA86-7AD7-1033-7B44-AA1000000001}\PDFFile_8.ico" _ , IconIndex:=0, IconLabel:="" End Sub
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)