我有一个 excel 文件,里面有很多图像。
实际上,这个 excel 文件是使用转换为 excel 文件的 HTML 代码制作的,并且图像链接到它们各自的图像。 (我用excel制作文件的原因是因为大约有700多张图像,我不能从1手动制作。完成需要很长时间)
这是我的 excel 的 HTML 代码
<!DOCTYPE html>
<html>
<head>
</head>
<body>
<table>
<thead>
<tr>
<th>No</th>
<th>Image</th>
<th>Title</th>
</tr>
</thead>
<tbody>
<tr>
<td >1</td>
<td><img src="56.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >2</td>
<td><img src="57.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >3</td>
<td><img src="58.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >4</td>
<td><img src="59.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >5</td>
<td><img src="60.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >6</td>
<td><img src="61.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >7</td>
<td><img src="62.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >8</td>
<td><img src="63.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >9</td>
<td><img src="64.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >10</td>
<td><img src="65.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >11</td>
<td><img src="66.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >12</td>
<td><img src="67.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >13</td>
<td><img src="68.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >14</td>
<td><img src="69.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >15</td>
<td><img src="70.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >16</td>
<td><img src="71.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >17</td>
<td><img src="72.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >18</td>
<td><img src="73.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >19</td>
<td><img src="74.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >20</td>
<td><img src="75.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >21</td>
<td><img src="76.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >22</td>
<td><img src="77.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >23</td>
<td><img src="78.jpg" width="200px"/></td>
<td></td>
</tr>
<tr>
<td >24</td>
<td><img src="79.jpg" width="200px"/></td>
<td></td>
</tr>
</tbody>
</table>
</body>
</html>
问题是,当我保存它并将 excel 文件发送到其他人的 PC 时,图像将是空白的。这是屏幕截图
我试图用谷歌搜索这个问题,但我仍然找不到解决方案。
有什么方法可以将所有图像转换为嵌入图像?
谢谢
最佳答案
我编写了一个 VBA 脚本来将所有链接的图像转换为嵌入的图像。
如果存在不是图像的形状,此脚本将出现错误。它还假设嵌入式图像在其替代文本中具有链接,我发现在我的情况下就是这种情况。
Sub INSERT_PICS()
Dim shp As Shape
For Each shp In ActiveSheet.Shapes
Debug.Print shp.Name
Debug.Print shp.AlternativeText
ActiveSheet.Shapes.AddPicture Filename:=shp.AlternativeText, linktofile:=msoFalse, _
savewithdocument:=msoCTrue, Left:=shp.Left, Top:=shp.Top, Width:=shp.Width, Height:=shp.Height
shp.Delete
Next shp
End Sub
关于excel - 将链接图像转换为嵌入图像,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/46147800/