主页 / computer / 问题 / 1843826
Accepted
Joseph Hansen
Asked: 2024-05-27 14:15:27 +0800 CST

Word 中的文本（特别是文件路径）被移动到新行

  • 772

如何防止长字符串开始自己的行？

我经常使用引用文件路径的文档。通常，文件路径比页面的文本宽度长。文件路径最终会使某些行变得非常短且难看，因为 Word 在意外的位置中断了路径。当使用“justify”进行格式设置时，它看起来特别糟糕。

如果文件路径有中断字符（如空格或连字符），则字符串会在奇怪的位置中断，并且格式会很丑陋。

It        looks        like        this        /my/file/path/is/really_kind_of
long/and/it keeps going/version3/computer42/somewhere/in/the/world.txt

如果文件路径没有不间断字符（就像我将连字符换成“不间断”破折号），则整个文件路径将移动到新行，并且该行在末尾处“中断”宽度和路径的其余部分位于其下方的线上。

It                    looks                      like                     this
/my/file/path/is/really_kind_of long/and/it keeps going/version3/computer42/so
mewhere/in/the/world.txt

我真的很希望它能做更多类似这样的事情：

It looks like this /my/file/path/is/really_kind_of long/and/it keeps going/ver
sion3/computer42/somewhere/in/the/world.txt

有谁知道实现这一目标的秘密咒语吗？

microsoft-word

1 个回答

  1. Best Answer

    不太好，并且它不会缩放，但是您可以在路径中的每个字符后面添加一个非常薄的空格。例如，插入空格，然后使用“字体”->“高级”->“间距”，压缩 3pt 使其变窄，然后在路径中的每个字符后面复制/粘贴。

    这很乏味，但使用 VBA 宏就不那么麻烦了，例如选择路径并运行

    Sub addVeryThinSpaces()
Dim i As Long
With Selection.Range
  For i = .Characters.Count - 1 To 1 Step -1
    .Characters(i).InsertAfter " "
    .Characters(i + 1).Font.Spacing = -3
  Next
End With

    结束子

    如果您想删除它们，请选择路径（或整个文档，如果您知道没有任何其他 3pt 压缩空格），然后运行，例如

    Sub removeVeryThinSpaces()
Dim i As Long
''Dim r As Word.Range
With Selection.Range
  For i = .Characters.Count - 1 To 1 Step -1
    If (.Characters(i).Text = " ") And (.Characters(i).Font.Spacing = -3) Then
      .Characters(i).Delete
    End If
  Next
End With
End Sub

    如果您不熟悉 VBA 宏，我会让您研究一下如何安装和运行 VBA 宏。

    • 2

相关问题