2016-05-18 29 views
2

正如標題狀態,我還沒有找到一種方法以檢索嵌入對象的名稱或它的路徑(附加圖像)Sample ScreenshotExcel的OLE對象嵌入式路徑位置

在所提供的例子中,我想至少得到完整路徑位置或67CE8 ...名稱 - 因爲我知道那些存儲在Temp文件夾中 - 所以我可以通過VBA自動保存它們。 我試過「.SourceName」,沒有運氣,因爲它似乎只得到超鏈接(但沒有真正的超鏈接,因此錯誤1004)。
編輯爲代碼在評論

ActiveSheet.OLEObjects.Add(Filename:= _ "https://...dummylink" _ , Link:=False, DisplayAsIcon:=False).Select x = Selection.Name Selection.Verb Verb:=xlPrimary 
+0

您的意思是超鏈接,如\t 用於嵌入式圖片或來自PC的形狀。 – skkakkar

+0

請發表您使用的密碼 –

+0

對不起!代碼是:ActiveSheet.OLEObjects.Add(Filename:= _ 「https://...dummylink」_ ,Link:= False,DisplayAsIcon:= False)。選擇 x =選擇名稱 Selection.Verb動詞:= xlPrimary @skkakkar這種類型,我發現在回顧對象後存儲在臨時文件夾中。 – Sgdva

回答

0

似乎沒有其他辦法,而不是解決與臨時文件,我在這裏得到了一個解決辦法代碼(click)的回答,再次感謝!

3

看在你的形象的圖標,你插入的對象,它是一個文件,未選中「鏈接到文件」的含義(如您參考)它是嵌入的,它沒有路徑,因爲它存在於文件中。

我發現了一個以前的問題回答here,但不能彈出一個對話框不能讓我運行。

沒有比可能另一種方式做到這一點,但在Word中也有類似的問題,我解決它使用下面的步驟更多: -

  1. 選擇並複製對象
  2. 創建一個新文檔(工作簿)
  3. 保存新文檔(工作簿)作爲HTML對象粘貼
  4. 去翻包保存爲唯一的映像文件(因爲它是在文件中的唯一的事情)
  5. 此舉的位置,所以我可以在其他地方使用它
  6. 刪除新文件(工作簿)和HTML複製它
+0

我嘗試了鏈接中提供的解決方案,但是,我一直得到'1004無法獲得OLEObject類的對象屬性' – Sgdva

+0

嗯,你有一個有趣的對象。我會建議工作的步驟,而不是追求這個選項。但是,如果其他人可能會有答案,那麼瞭解您的問題會更有幫助。您能否寫出將對象放入Excel文件所需的步驟。 –

+0

我用下面的代碼得到它:ActiveSheet.OLEObjects.Add(Filename:= _「https://...dummylink」_,Link:= False,DisplayAsIcon:= False).Select x = Selection.Name Selection。動詞動詞:= xlPrimary有趣的是,我剛剛發現,如果我單獨運行它,它不會檢索對象,但是,我需要從同一個域中收集一些其他數據,並在首先運行該對象時可以運行這一個。 – Sgdva