Vba - Как отправить новую строку команду (\ n) или команду вкладки (\ t) в текстовое поле. Rectextrange.text формы PowerPoints
Вопрос
SlideNumber = 1
Set oPPTSlide = oPPTFile.Slides(SlideNumber)
For y = 1 To oPPTSlide.Shapes.Count
MsgBox oPPTSlide.Shapes(y).Name
Next
With oPPTSlide.Shapes("Title 1")
.TextFrame.TextRange.Text = _
"Operations Monthly Report\n" & _
"April " & _
"2014"
End With
.
Это код, который у меня есть сейчас.«\ N» вызывает редактирование текстовой коробки, чтобы начать новую строку.Является ли это возможным?Код в его контексте работает отлично работает.Точный текст отправляется в текстовое поле, хотя, не две строки текста.
Решение
Нет «\ n» в VBA вместо этого вы должны использовать VBNEWLINE или VBCRLF или VBLF
Заменить это
SlideNumber = 1
Set oPPTSlide = oPPTFile.Slides(SlideNumber)
For y = 1 To oPPTSlide.Shapes.Count
MsgBox oPPTSlide.Shapes(y).Name
Next
With oPPTSlide.Shapes("Title 1")
.TextFrame.TextRange.Text = _
"Operations Monthly Report" & VbCrLf & _
"April " & _
"2014"
End With
. Не связан с StackOverflow