1
我想通过VBA在excel中插入多个逐项列出的对象
有没有办法可以设置这个代码让嵌入的图像进入一个单独的单元而不是相互叠加? 例如,我运行此宏来插入3个PDF。我想要这些3个PDF进入单元格A2,A3,A4。 我这样做的原因是因为我将在邮件合并中使用此电子表格将各个PDF发送到不同的电子邮件地址。 Sub AddOlEObject() 昏暗的mainWorkBook作为工作簿 设置mainWorkBook = ActiveWorkbook Folderpath =“C:\ Users \ jyousef \ Documents \ SL \ October15” 设置fso = CreateObject(“Scripting.FileSystemObject”) NoOfFiles = fso.GetFolder(Folderpath).Files.Count Set listfiles = fso.GetFolder(Folderpath).Files For Each fls In listfiles Counter = Counter + 1 Range("A" & Counter).Value = fls.Name strCompFilePath = Folderpath & "\" …