Question

我有来自Access的报告，我将打印预览中的行空间格式设置为0＆＃34;。您可以在页面设置或列下找到它。但是，当它在MS Word中输出文件时，似乎有额外的间距，我无法从调整Ms Access中的行空间中删除，并且必须在另一个字处理器中手动更改。有人可以编写一个示例宏VBA代码来执行此操作吗？

以下是一些示例代码，如果可以将其添加到MS Word的单个空格格式中：

    'newsletter
  DoCmd.OpenForm "Reports Menu", acNormal, "", "", , acNormal
  DoCmd.SetWarnings False
  Forms("Reports Menu").Date.SetFocus
    DoCmd.OpenReport ("ContributorList"), acViewPreview
    DoCmd.SetWarnings True
    stDocName = "ContributorList"
    DoCmd.OutputTo acReport, stDocName, acFormatRTF
  MsgBox "A copy of project contributors was made in MS Word file..."

以下代码是来自参考的代码段 https://msdn.microsoft.com/en-us/library/office/ff193108.aspx

我很好奇是否有人认为这可以用来制作单个空间文件？

 With Selection.ParagraphFormat 
     .LineSpacingRule = wdLineSpaceAtLeast 
     .LineSpacing = 24 
    End With

MS Access：在MS Word中使用单个空格行输出和格式化文件

0 个答案: