使用VBA將活動的Word文檔復制並粘貼到活動的Excel文檔中

Question

是否可以使用VBA將Word文檔（打開的文檔）的內容復制到活動的excel文檔中？

我正在使用Excel / Word 2013

Answer 1

嗨，我找到了解決自己問題的方法。

在Excel工作簿中，您必須設置以下內容

“工具->引用-> Microsoft Forms 2.0對象庫”，否則您將收到“編譯錯誤：未定義用戶定義的類型”

       Sub ClipboardToExcel()

       Dim MyData As DataObject
       Dim strClip As String


       Set MyData = New DataObject
       MyData.GetFromClipboard
       strClip = MyData.GetText

       Sheets("sheet2").Select
       Range("A1").Select
       ActiveSheet.PasteSpecial Format:="HTML", Link:=False, DisplayAsIcon:= 
       _
       False, NoHTMLFormatting:=True

      End Sub