Excel允许您仅通过确保在“选项”对话框的“视图”选项卡上选中了“公式”复选框,即可在工作表中显示公式。这是打印显示用于创建工作表的公式的工作表的便捷方法。

但是,仅当工作表中使用的公式很短时,此方法才有效。如果公式较长,那么了解显示了公式的工作表可能很快就会变得很麻烦。

一种解决方案是从Excel中提取公式并将其放在诸如Word之类的程序中。为什么要单词?因为您可以轻松设置文本属性的格式(例如字体和磅值),以最好地显示公式。如果需要,还可以添加其他文本来解释公式。

将公式从Excel导入Word的最简单方法是遵循以下步骤:

。显示“ Excel选项”对话框。 (在Excel 2007中,单击Office按钮,然后单击Excel选项。在Excel 2010中,显示功能区的“文件”选项卡,然后单击“选项”。)

。在对话框的左侧,单击“高级”。

。滚动浏览选项列表,直到看到标题为“此工作表的显示选项”的部分。 (请参见图1。)

。确保选中“在单元格中显示公式而不是它们的计算结果”复选框。

。单击确定。 Excel现在应该显示公式。

。选择要将其公式复制到Word的单元格。

。按Ctrl + C将单元格复制到剪贴板。

。切换到Word。

。将插入点放置在要添加信息的位置。

。显示功能区的“主页”选项卡。

。单击“粘贴”工具下的向下箭头,然后选择“选择性粘贴”。 Word将显示“选择性粘贴”对话框。

。选择“无格式文本”选项。

。单击确定。

此时,您的公式已在Word中,您可以根据需要使用它们。尽管此方法效果很好,但是如果要复制大量公式,一遍又一遍地执行此操作可能会很麻烦。

如果遇到这种情况,则可以受益于一个宏,该宏可以实际提取公式并将其放置在Word文档中。下面的Excel宏可以做到这一点:

Sub WriteFormulasToWord()

Dim Wrd As New Word.Application     Dim CellTxt As String     Dim CellAddr As String     Dim SRow As Long     Dim SCol As Long

Wrd.Visible = True     Wrd.Documents.Add

Wrd.Selection.TypeText Text:="List of the Formulas of Sheet """ _       & ActiveSheet.Name & """ in Workbook """ _       & ActiveWorkbook.Name & """."

Wrd.Selection.TypeText Text:=vbCrLf & vbCrLf

'Change the following line to pick the number of columns     For SCol = 1 To 5         'Change the following line to pick the number of rows         For SRow = 1 To 10             If Cells(SRow, SCol).HasFormula Then                 CellAddr = Chr(64 + SCol) & Trim(Str(SRow)) & vbTab                 CellTxt = ActiveSheet.Cells(SRow, SCol).Formula                 Wrd.Selection.TypeText Text:=CellAddr & CellTxt                 Wrd.Selection.TypeText Text:=vbCrLf             End If         Next SRow         Wrd.Selection.TypeText Text:=vbCrLf     Next SCol End Sub

在此宏中有几件事要注意。首先,您可以通过更改同时使用SCol和SRow的For语句来更改宏工作的行和列的范围。在上面显示的示例中,宏从第1到5列(A到E)和第1到10行提取公式。

此外,除非您设置Excel宏来处理对Word对象的引用,否则此宏将无法正常工作。您可以通过在VBA编辑器中按照以下步骤进行操作:

。从工具菜单中选择引用。 VBA显示“引用”对话框。 (请参见图2。)

。滚动引用列表,直到看到一个称为Microsoft Word对象库的对象。 (参考名称中可能包含版本号,例如Microsoft Word 12.0 Object Library。)

。确保选中对象库左侧的复选框。

。单击确定。

使用宏实际提取公式的一个优点是,您可以完全自定义Word文档中的内容。对于此宏,将插入单元格的地址,然后插入一个制表符,然后是实际公式。您可以轻松地将插入的信息更改为特定实例中所需的任何信息。

注意:

如果您想知道如何使用此页面(或_ExcelTips_网站上的任何其他页面)中描述的宏,我准备了一个特殊页面,其中包含有用的信息。

链接:/ excelribbon-ExcelTipsMacros [点击此处在新的浏览器标签中打开该特殊页面]。

_ExcelTips_是您进行经济高效的Microsoft Excel培训的来源。

本技巧(6233)适用于Microsoft Excel 2007和2010。您可以在以下版本的Excel的较旧菜单界面中找到本技巧的版本:

链接:/ excel-Pulling_Formulas_from_a_Worksheet [从工作表中提取公式]。