VBA在活动的Word文档光标处粘贴选中的Excel工作表范围

概述VBA在活动的Word文档光标处粘贴选中的Excel工作表范围

下面是内存溢出 jb51.cc 通过网络收集整理的代码片段。

内存溢出小编现在分享给大家，也给大家做个参考。

Sub Rangetodocument()' Set a VBE reference to Microsoft Word Object libraryDim WDApp As Word.ApplicationDim WDDoc As Word.document' Make sure a range is selectedIf Not Typename(Selection) = "Range" Then    MsgBox "Please select a worksheet range and try again.",vbExclamation,_        "No Range Selected"Else    ' Reference existing instance of Word    Set WDApp = Getobject(,"Word.Application")    ' Reference active document    Set WDDoc = WDApp.Activedocument    ' Reference active slIDe        ' copy the range    Selection.copy    ' Paste the range    WDApp.Selection.PasteSpecial link:=False,DataType:=wdPasteRTF,_        Placement:= wdInline,displayAsIcon:=False    ' Clean up    Set WDDoc = nothing    Set WDApp = nothingEnd IfEnd Sub

以上是内存溢出(jb51.cc)为你收集整理的全部代码内容，希望文章能够帮你解决所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。

总结

以上是内存溢出为你收集整理的VBA在活动的Word文档光标处粘贴选中的Excel工作表范围全部内容，希望文章能够帮你解决VBA在活动的Word文档光标处粘贴选中的Excel工作表范围所遇到的程序开发问题。

如果觉得内存溢出网站内容还不错，欢迎将内存溢出网站推荐给程序员好友。