VBA - 새 줄 명령 (\ n) 또는 탭 명령 (\ t)을 textbox.textrange.text로 보내는 방법은 PowerPoints 모양의 텍스트를 보냅니다.

Question

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"은 내가 편집하고있는 텍스트 상자에 새 줄을 시작하게합니다.가능합니까?해당 맥락에서 코드는 완벽하게 작동합니다.정확한 텍스트는 두 줄의 텍스트가 아닌 텍스트 상자로 전송됩니다.

Answer 1

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

.