1

我有一个访问数据库,其中有一个带有备注字段的表。已以这种格式插入字段。

4 月 2 日 - 一些文字
2 月 20 日 - 一些文字

我想颠倒插入的顺序,所以上面是:

2 月 20 日 - 一些文字
4 月 2 日 - 一些文字

我正在考虑使用正则表达式逐行阅读,任何人都有更好的途径来实现这一点

4

1 回答 1

2

您的备注字段包含 2 行文本,您想颠倒它们的顺序。您可以使用不需要正则表达式的简单 VBA 过程来做到这一点。

这是一个示例即时窗口会话,它演示了您可以在 VBA 过程中使用的技术。

MyText = "Apr 02 - some text" & vbcrlf & "Feb 20 - some text"
? MyText
Apr 02 - some text
Feb 20 - some text
? Split(MyText, vbcrlf)(1)
Feb 20 - some text
? Split(MyText, vbcrlf)(0)
Apr 02 - some text

如果备注字段可以包含两行以上的文本,您可以加载一个包含结果的数组Split(),然后以相反的顺序循环遍历该数组。

于 2013-04-09T17:17:20.177 回答