土木在线论坛 \ 商易宝社区 \ 行业脉动 \ 用VBA生成的块属性文字换行问题求助

用VBA生成的块属性文字换行问题求助

发布于：2008-05-12 10:00:12 来自：商易宝社区/行业脉动 [复制转发]

我的VBA程序通过判断字符串长度在中间加入 CHR(10) 来实现自动换行。可这么处理过的字符串填入块属性后，第二行字符会在第一行末尾出现，大概像下面这样：

xText = right(xText,4) & chr(10) & left(xText,3)
放入块属性后显式如下,（下划线部分显式是空格）
ABCD
____EFG
我希望的效果是
ABCD
EFG
不知道哪里出了问题，哪位高手能给解决下，万分感激～～

vba

0人已收藏
0人已打赏
免费
0人已点赞
分享

复制链接新浪微博微信扫一扫

全部回复（1 ）

只看楼主我来说两句 抢板凳

tongmingniao 沙发

Sub 换行()
xText = "EFGABCD"
xText = Right(xText, 4) & Chr(10) & Left(xText, 3)
Debug.Print xText
MsgBox xText
End Sub

经以上程序调试没有出现你所说的问题。你可以提供进一步的信息，以便判断错误所在。

2009-03-16 19:18:16
回复举报
赞同0