返回列表 上一主題 發帖

[發問] excel 插入圖片後,別台電腦無法開啟

PKKO
　暱稱: PKKO

高中生Rank: 3Rank: 3

帖子
549 
主題
152 
精華
0 
積分
691 
點名
0  
作業系統
WIN7 
軟體版本
OFFICE 2010 
閱讀權限
50 
性別
男 
註冊時間
2013-8-10 
最後登錄
2022-9-7 

論壇榮譽勳章論壇贊助勳章
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-3-9 10:56 | 顯示全部帖子

[發問] excel 插入圖片後,別台電腦無法開啟

本帖最後由 PKKO 於 2015-3-9 10:58 編輯
  1. For Each h In arr2
  2.         '插入圖片
  3.        Set MyPic = ActiveSheet.Pictures.Insert(myfloder & "PIC\" & E & "\" & h)
  4.        '為何上面的方式只要換了原始圖片的位置就會無法顯示圖片
  5.        '要改為何種CODE才可以真正的複製照片至EXCEL?
  6. '------------------------------下面是我目前的補救方式----------------------------
  7.        Num = Num + 1
  8.        ActiveSheet.Shapes.Range(Array("Picture " & Num)).Select
  9.        Selection.Copy
  10.                                     
  11.        ActiveSheet.Pictures.Paste.Select
  12.        ActiveSheet.Shapes.Range(Array("Picture " & Num)).Delete
  13.        Num = Num + 1
  14. '-----------------------------------------------------------------------
  15.                             Next
複製代碼
收藏 分享
PKKO

PKKO
　暱稱: PKKO

高中生Rank: 3Rank: 3

帖子
549 
主題
152 
精華
0 
積分
691 
點名
0  
作業系統
WIN7 
軟體版本
OFFICE 2010 
閱讀權限
50 
性別
男 
註冊時間
2013-8-10 
最後登錄
2022-9-7 

論壇榮譽勳章論壇贊助勳章
2#
發表於 2015-3-9 17:17 | 顯示全部帖子
回復 2# lpk187


    這種方式要如何"事先"得知圖片的長與寬呢?
避免影響了照片原本的比例!
PKKO

TOP

        靜思自在 : 人的眼睛長在前面，只看到別人的缺點，絲毫看不到自己的缺點。
返回列表 上一主題