Alsmile的专栏

在word的宏中运行如下函数即可Sub ShowFaceIDs()    Dim NewToolbar As CommandBar    Dim NewButton As CommandBarButton    Dim i As Integer, IDStart As Integer, IDStop As Integer    '   Delete existing Fac

// 就是最后两个参数（红色显示）传-1即可，在excel2007中验证通过，其他未验证。CComPtr pShape = pShapes->AddPicture(bstrPicName, msoFalse, msoCTrue, 0, 0,-1, -1);    项目中，需要向office中插入一个图片，但是同事的代码总是会有缩放，不是原始大小。我查看了他的代码，最后两个参数写