如果您使用IntellijIDEA，只需从IDE复制代码并将其粘贴到word文档中即可。

2019年试图解决这个问题的人的答案：

这个问题的大多数答案现在已经过时了。我希望有一种方法可以时不时地重新检查以前的问题和答案！

我为这个问题找到的适用于Office 365及其相关程序的方法可以在这里找到。

如果您不想安装沉重的IDE，也可以使用SciTE粘贴代码，然后下载所有代码的插件。只需从语言菜单中选择您的语言，键入您的代码，高亮代码，选择编辑->复制为RTF，粘贴到带有格式的Word中（默认粘贴）。

SciTE支持以下语言，但可能支持其他语言：Abaqus*、Ada、ANS.1 MIB定义文件*、APDL、汇编程序（NASM、MASM）、渐近线*、AutoIt*、Avenue*、批处理文件（MS-DOS）、Baan*、Bash*、BlitzBasic*、Bullant*、C/C++/C#、Clarion、cmake*、conf（Apache）、CSound、CSS*、D、diff文件*、E-Script*、Eiffel*、Erlang*、Flagship（Clipper/XBase）、Flash（ActionScript）、Fortran*、，Forth*、GAP*、Gettext、Haskell、HTML*、带嵌入式JavaScript的HTML、VBScript、PHP和ASP*、Gui4Cli*、IDL-MSIDL和XPIDL*、INI、财产*和类似文件、InnoSetup*、Java*、JavaScript*、LISP*、LOT*、Lout*、Lua*、Make、Matlab*、Metapost*、MMIXAL、MSSQL、nnCron、NSIS*、Objective Caml*、Opal、Octave*、Pascal/Delphi*、Perl，除某些模糊情况外的大多数情况*、PL/M*、Progress*，PostScript*、POV Ray*、PowerBasic*、PowerShell*、PureBasic*、Python*、R*、Rebol*、Ruby*、Scheme*、scriptol*、Specman E*、Spice、Smalltalk、SQL和PLSQL、TADS3*、TeX和LaTeX、Tcl/Tk*、VB和VBScript*、Verilog*、VHDL*、XML*、YAML*。

确实没有一种干净的方法可以做到这一点，而且根据您的确切风格设置，它仍然可能看起来很可疑。

您可以尝试做的是首先运行代码到HTML的转换（有很多程序可以这样做），然后尝试用word打开HTML文件，这可能会为您提供格式化和漂亮的代码，然后将其复制并粘贴到文档中。

这是我遵循的最简单的方法。考虑我要粘贴java代码。

我将代码粘贴在这里，以便空格、制表符和花括号格式整洁http://www.tutorialspoint.com/online_java_formatter.htm然后我将步骤1中得到的代码粘贴到这里，以便将颜色、字体添加到代码中http://markup.su/highlighter/然后将步骤2得到的预览代码粘贴到MS单词上。最后会变成这样

答案中似乎还没有提到Hilite，因此：Hilite支持多种语言（20+），也可以通过API在线使用，并且位于Github上（因此，如果您不信任在线服务，您可以自行克隆、修改和运行它）。在线版本也可以通过CSS规则根据自己的需要进行调整。

我几分钟前刚找到它，因为我需要一个将xQuery复制到Word中的工具，但找不到合适的工具。源程序是baseX，由于某种原因，它的格式无法传输到Word（粘贴时也不能通过Keep格式等）。此外，许多给出的答案现在，即2019年6月，不再工作或不支持xQuery。然而，希莉特做得很好。

编辑：不幸的是，代码块不是结果的一部分，只是突出显示。然而，这总比什么都没有好，通过在周围添加一个块来调整结果仍然比手动格式化每一行要少