Question

我有一个由段落标记分隔的文本字符串。我正在尝试使用段落标记进行拆分，但不断出现类型不匹配错误。我尝试过以下代码，但没有运气。任何建议都将不胜感激。

vData1 = Split(vData, vbcr)
vData1 = Split(vData, vbCrLf)
vData1 = Split(vData, vbLf)

这些行都没有奏效。

Answer 1

我打算走出困境，并建议你将 pilcrow 字符（例如¶）与换行和回车混淆。

回车符是ASCII字符13.它通常与换行符配对，并通过点击Enter↵键完成。
换行符是vData1 = Split(vData, Chr(182))的一半，是ASCII字符10.合并 Shift + Enter↵或 Alt + Enter↵通常会完成换行。
pilcrow 字符（¶）是ASCII字符182.它在MS Word中用于直观地说明回车符或段落终止符，但除了作为可视指示符之外没有任何功能属性。

我的建议是分开一个朝圣。

MCRYPT_RIJNDAEL_128

Answer 2

在我的情况下，我曾在MS-Word中

一些Text1

一些Text2

一些Text3

使用以下代码就可以正常打印一些Text3

Sub Demo()
Dim StrTxt As String
With ActiveDocument.Range
         With .Find
              .ClearFormatting
              .Replacement.ClearFormatting
              .Format = False
              .Forward = True
              .Wrap = wdFindStop
              .MatchWildcards = True
              .Text = "<[A-Z]*^13*^13*^13"
              .Execute
        End With
StrTxt = Split(.Text, vbCr)(2)
MsgBox (StrTxt)
End With
End Sub

在Paragraph标记上拆分一个字符串

2 个答案: