power pointについてです。

全てのURLがダミーですみません。

①私は「編集」-「形式を選択して貼り付け」の中の、テキスト（書式なし）を選び貼り付けています。

②「標準ツールバー」の中にある「Excelの表を挿入」ボタンでExcelの表を出して、その中にタブ区切りの文字を、クリップボード経由で貼り付けるとうまくいくと思います。

③テキストエリアの「改行の高さ」は、「書式」-「行間」で設定できます。「タブ」は、「表示」-「ルーラ」でルーラを表示すると、MsWordなどと同様に設定が可能です。「インデント」は、「書式」-「箇条書きと段落番号」で、設定しています。箇条書きをしない場合も（つまり文頭の●とか数字とかを外す場合もここで設定できます。）

①「形式を選択して貼り付け」で実現できると思います。

②タブ区切りのデータと同じ要素数文選択して張り付けると出来ます。

③書式バーを使用すると出来ます。（メニューバーを2行で表示するとよく使う機能が前面にでて使いやすくになります。）

もう少し楽な、①の解決策。

［ツール］の［オプション］の［編集］タグにて、「貼り付けオプションボタンを表示する。」にチェックを入れておきます。

実際にペーストすると、ペーストした場所にアイコンが現れますから、クリックして、テキストのみを保持。を選ぶとテキストのみがペーストされます。

一部しか答えていませんし、ＵＲＬがだみーですから、ポイントいりません。

URLは参考にしたサイトで関係ないです

あんまりパワーポイント使わないので

とりあえず１のマクロだけ作ってみました

一部”や’が化けると思うので修正して使ってください。PowerPoint９７で確認しました

Declare Function GetCursorPos Lib ”user32” (lpPoint As POINTAPI) As Long

Type POINTAPI

XZ As Long

YZ As Long

End Type

Sub Macro1()

Dim CB As New DataObject

Dim P As POINTAPI

CB.GetFromClipboard

’マウスの位置取得

GetCursorPos P

’テキストボックス作成 サイズは調整して下さい

’定位置に出す場合 ActiveWindow.Selection.SlideRange.Shapes.AddTextbox(msoTextOrientationHorizontal, 100, 100, 14.5, 36).Select

ActiveWindow.Selection.SlideRange.Shapes.AddTextbox(msoTextOrientationHorizontal, P.XZ / 2, P.YZ / 2, 14.5, 36).Select

ActiveWindow.Selection.ShapeRange.TextFrame.WordWrap = msoFalse

ActiveWindow.Selection.ShapeRange.TextFrame.TextRange.Characters(Start:=1, Length:=0).Select

’クリップボードからコピー

ActiveWindow.Selection.TextRange.Text = CB.GetText

End Sub

Alt+Eキー→Sキー→ENDキー→ENTERキー

ではどうですか。

こんな回答ばかりですいません。

ポイントはいらないので。