0

V6ユーザーです。

Powerpoint操作(テキスト挿入)で自分で文字フォントをArialに指定してテキスト挿入をしたいと考えています。

下記のコメントアウトした行を、コメントなしにして実行したら、ステートメントエラーになりました。

どう修正すれば動くか教えてください。

---<start of code>-----
Set targetPptObj = objPpt.ActivePresentation

Set text = targetPptObj.Slides(num_slide).Shapes.AddTextbox(1,x, y, w, h)
 text.TextFrame.TextRange.Text = str_text
' text.TextEffect.Font.Name = Arial
 text.TextEffect.FontSize = 18

---<end of code>-----

この質問は解決済みのためクローズされています。
gorby5775 ベストアンサーとして選択しました
回答とコメントは、会員登録(無料)で閲覧できるようになります。