ExcelのリストPowerPointのスライドヘッダー

Question

私はすでに投稿されているたくさんの質問を見てきましたが、私が探しているものにはまったく適合しません。私はPPTスライドを作成するのに必要な750タイトルの異なるタイトル/ヘッダーのリストを持っています。タイトルのついた空白のPPTスライドを作成するだけです。私はコーディングに非常に新しいので、ソリューションのほとんどは必要な（つまり、チャートと写真のインポート）より複雑です。

Answer 1

エクセルデータを含む単一の列のテーブルにある最初のスライドのペーストで、空白のpptファイルを作成すると、Iveは必要なヘッダーが各行にあると見なします。テーブルに名前をつけてください（IveはHeadersTableを使用しています） - これを行うには、選択ペインを使用して、[ホーム]タブに表示します。

ppt-Alt + F11でVBAエディタを開き、新しいモジュールを追加して以下のコードを実行します。

Sub createHeaders() 

    Dim sl As Slide 
    Dim tbl As Table 
    Dim shp As Shape 
    Dim i As Long 

    Set sl = ActivePresentation.Slides(1) 
    Set tbl = sl.Shapes("HeadersTable").Table 

    For i = 1 To tbl.Rows.Count 

     Set sl = ActivePresentation.Slides.Add(i + 1, ppLayoutTitleOnly) 
     Set shp = sl.Shapes("Title 1") 
     shp.TextFrame.TextRange.Text = tbl.Rows(i).Cells.Item(1).Shape.TextFrame.TextRange.Text 

    Next i 

End Sub 

Answer 2

Excelからプレーンテキストファイルに保存します。 PPTはこれらの特定の数以上を一度に処理しないため、おそらくこれをいくつかのステップに分割する必要があります。

次に、PowerPointを起動し、[ファイル|開く、ファイルの種類：。 テキストファイルを選択し、PPTを開きます。

リンスして繰り返します。