我要求用户从服务器上的指定文件夹中选择一个txt文件[这是在PowerPoint 2007中],但我需要给他们选择多个选项,所以我有一些条件代码确定这一点。
选择的一个文件使用此代码:
oShape.TextFrame.TextRange.Text = Text
目前选择了多个文件:
oShape.TextFrame.TextRange.Text = oShape.TextFrame.TextRange.Text & vbCrLf & vbCrLf & Text
...但是这会在字段中产生额外的返回空间,这有点不整洁。
有没有人可以告诉我如何修改它只能获得两个文本之间的回报,而不是在开头?
答案 0 :(得分:0)
我不完全确定我遇到了问题,但我相信这样做会:
oShape.TextFrame.TextRange.Text = iif(oShape.TextFrame.TextRange.Text <> "", oShape.TextFrame.TextRange.Text & vbCrLf & vbCrLf, "") & Text