Excel에서 글 머리 기호를 PowerPoint VBA로 서식을 지정하여 글 머리 기호 앞에 단락이 나타나도록하는 방법

Im VBA 코드를 작성하여 Excel VBA에서 PowerPoint 프레젠테이션을 만들고 시작하십시오.Excel에서 글 머리 기호를 PowerPoint VBA로 서식을 지정하여 글 머리 기호 앞에 단락이 나타나도록하는 방법

사실 저는 Excel에서 제공하는 텍스트가있는 슬라이드에 텍스트 상자를 추가하고 글 머리 기호를 갖도록 구성했습니다. 그러나 제 문제는 pharagraphs 사이에 공백이있는 경우에도 글 머리 기호가 텍스트 상자의 모든 줄에 있도록 코드를 설정한다는 것입니다. 글 머리 기호가 공백이 아닌 텍스트 앞에 만 나타나도록 설정하려면 어떻게해야합니까?

내가 사용하고있는 코드는 다음과 같습니다

Set pptSlide = pptPres.Slides.Add(10, ppLayoutCustom) 
SlideTitle = "Noticias Relevantes" 
pptSlide.Shapes.Title.TextFrame.TextRange.Text = SlideTitle 
pptSlide.Shapes.Title.TextFrame.TextRange.Font.Size = 22 

Set pptTextbox = pptSlide.Shapes(1) 

pptTextbox.TextFrame.TextRange.Text = ThisWorkbook.Sheets("PPT").Range("B143").Value 
pptTextbox.Top = 83 
pptTextbox.TextFrame.TextRange.Paragraphs.ParagraphFormat.Alignment = ppAlignJustify

PD는 다음 PPT는 다음과 같습니다 당신이 공백을 부르는 ImagePPT

출처

2017-01-13 thePB

실제로 단락입니다. 따라서 전체 텍스트 프레임에 글 머리 기호를 적용하면 모두 텍스트가없는 단락도 글 머리 기호가됩니다.

이 문제를 해결하려면 TextRange의 단락을 반복하고 텍스트의 길이를 테스트해야합니다. 그런 다음 글 머리 기호를 텍스트가있는 단락에 적용 할 수 있습니다.

출처

2017-01-14 09:30:28

감사합니다! 어떤 기능이나 코드를 사용 하시겠습니까? (예를 들어, .LoopThrough 또는 그와 비슷한) 나는 모든 코드를 모르기 때문에 VBA에서 새로 도입되었습니다. 또한, 새 텍스트 상자를 만드는 대신 사용자 정의 슬라이드 레이아웃 (더 이상 Title Only 레이아웃을 사용하지 않음)과 함께 제공되는 텍스트 프레임에 텍스트를 삽입하지만 여전히 글 머리 기호 문제가 발생하도록 코드를 변경했습니다. 감사! 새 코드를 편집했습니다. – thePB

Excel에서 글 머리 기호를 PowerPoint VBA로 서식을 지정하여 글 머리 기호 앞에 단락이 나타나도록하는 방법

답변

관련 문제