[問題] EXCEL VBA插入圖片

看板Office作者 (錯的時間對的人)時間5年前 (2020/04/23 16:31), 編輯推噓0(006)
留言6則, 1人參與, 5年前最新討論串1/2 (看更多)
軟體:EXCEL 版本:OFFICE 365 之前問過一個類似的問題,後來自己有嘗試成功 但是發現這其實只是LINK到自己電腦圖片的路徑 有沒有人可以教一下怎麼修正成真的夾帶圖片進EXCEL檔案 Private Sub CommandButton1_Click() X = ActiveCell.Width Y = ActiveCell.Height fufilename = Application.GetOpenFilename With ActiveSheet.Pictures.Insert(fufilename) .ShapeRange.LockAspectRatio = msoFalse .ShapeRange.Height = Y .ShapeRange.Width = X End With End Sub -- ※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 59.124.14.228 (臺灣) ※ 文章網址: https://www.ptt.cc/bbs/Office/M.1587630665.A.2E2.html

04/23 17:03, 5年前 , 1F
改以shapes.addpicture試試,測試更名後再開啟檔案,圖片
04/23 17:03, 1F

04/23 17:03, 5年前 , 2F
還是存在
04/23 17:03, 2F

04/23 17:08, 5年前 , 3F
SaveWithDocument的部分要與文件一同儲存的圖片,就以true
04/23 17:08, 3F

04/23 17:11, 5年前 , 4F
其他如要放置於作用儲手格left和top的部分就以activecell.
04/23 17:11, 4F

04/23 17:12, 5年前 , 5F
left和activecell.top來取得,長寬原巨集有,變數X和Y
04/23 17:12, 5F

04/23 17:16, 5年前 , 6F
"存"(錯字)
04/23 17:16, 6F
文章代碼(AID): #1UeL99BY (Office)
討論串 (同標題文章)
文章代碼(AID): #1UeL99BY (Office)