2017-09-11 126 views
2

我有一個內部有很多圖像的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時,圖像將是空白的。下面是截圖

enter image description here

我試圖谷歌這個問題,但我仍然找不到解決辦法呢。

任何將所有圖像轉換爲嵌入圖像的方法?

謝謝

+0

如何將HTML文件轉換爲Excel? – peakpeak

回答

0

我寫了一個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