視聴者のフィードバックに基づいて、プレゼンテーションの途中でPowerPointスライドを更新する方法を見つける必要があります(つまり、視聴者が画像に投票し、その画像は後でスライドに配置されます)。
プレゼンテーションモードで編集した場合のリスクと、プレゼンテーションの途中で編集者が誤ってスライドショーを終了してしまうことについて心配しています。
PowerPointで、プレゼンテーションの途中でスライドを編集/変更しながら、可能な場合はライブプレゼンテーションをめちゃくちゃにするリスクを防ぐために使用できるアドオンなどはありますか?
これまでのアイデア:
これまでに誰かがこのようなことをしたことがありますか?ライブプレゼンテーションで機能させるために何をしましたか?
PowerPoint 2013では、非常にシンプルです。
プレゼンタービューで、タスクバーの表示(左上隅)をクリックします。
画面下部にタスクバーが開いたら、PowerPointタブをクリックし、
表示されている3つのビュー(エディター、プレゼンター、スライドショー)で、エディタービューをクリックします。
変更を加えながら視聴者に見てもらいたい場合は、3つのビューすべてに同じスライドを表示します。
完了するまで視聴者に変更を表示させたくない場合は、プレゼンタービューの黒い画面アイコン(斜めの線が横になっているモニター)をクリックしてから、変更を開始する前にORに変更Presenterビューの別のスライド。
スライドショーを開くと、変更したスライドが大画面に表示されます。
ハッピーパワーポイント!
これは実際には非常に簡単です。特に、現在表示されていないスライドを変更したい場合(一部のPPTバージョン)のバグが原因でトリッキーになる可能性があります)。
これをプレゼンテーションのVBAモジュールに追加します。
プレゼンテーションをPPTX/PPTXではなくPPTMまたはPPSMとして保存する必要があります。
コメントとして含まれているinstruxに従ってください:
Option Explicit
' We'll modify slide #4 ... change as needed
' Make sure that the slide has no empty content or picture placeholders on it
Const lSlideNum As Long = 4
Sub AddAnImage()
' add a shape to any slide you like
' assign the shape an Action Setting of Run Macro: AddAnImage
Dim oSl As Slide
Dim oSh As Shape
Set oSl = ActivePresentation.Slides(lSlideNum)
' bring in the image; setting width/height to -1 ensures that you
' don't distort it
Set oSh = oSl.Shapes.AddPicture("c:\temp\photo.jpg", msoFalse, msoTrue, 0, 0, -1, -1)
With oSh
.LockAspectRatio = msoTrue ' to make sure it stays undistorted
' change its position/size as you wish
' for example, let's make it the full width of the slide:
.Width = ActivePresentation.PageSetup.SlideWidth
End With
End Sub
MDTは彼が考えるよりも近いです。ショーの間に編集されていたプレゼンテーションのスタックを簡単に説明していました。重要なのは、プレゼンテーションのコレクションへのスムーズなインターフェイスとしてマスタープレゼンテーションを作成することです。私はこれをOffice 97で行っていました。私はそれが今できると確信しています。それがあなたのニーズに合っているなら、揮発性のあるプレゼンテーションへの静的リンク(ただし、安定したファイル名を持つ)が適切かもしれません。
Option Explicit
' We'll modify slide #4 ... change as needed ' Make sure that the slide has no empty content or picture placeholders on it Const lSlideNum As Long = 4
Sub AddAnImage()
' add a shape to any slide you like
' assign the shape an Action Setting of Run Macro: AddAnImage
Dim oSl As Slide
Dim oSh As Shape
Set oSl = ActivePresentation.Slides(lSlideNum)
' NEW: Delete any existing image we may have added previously
On Error Resume Next
Set oSh = oSl.Shapes("MagicImage")
If Err.Number = 0 Then
oSh.Delete
End If
' bring in the image; setting width/height to -1 ensures that you
' don't distort it
Set oSh = oSl.Shapes.AddPicture("c:\temp\photo.jpg", msoFalse, msoTrue, 0, 0, -1, -1)
With oSh
' NEW: Name it so we can locate it easily later:
.Name = "MagicImage"
.LockAspectRatio = msoTrue ' to make sure it stays undistorted
' change its position/size as you wish
' for example, let's make it the full width of the slide:
.Width = ActivePresentation.PageSetup.SlideWidth
End With
End Sub
カスタムショーについて考えたことはありますか? 1つのPPTファイルをさまざまな組み合わせで作成します。スライドをクリックして、適切な画像を含むカスタムショーへの画像ハイパーリンクを選択します。少し考えて、ツリーですべての可能な組み合わせを追跡し、あなたはあなたがやりたいことを行うことができます。
これは非常に古いですが、現在のショーを中断せずに将来のスライドを更新できる必要がある人として、Powershowは私が必要とする方法とまったく同じように機能することがわかりました。 2013年の変更はすばらしいものですが、ユーザーが視聴者に表示する内容に影響を与えずに番組を編集することはできません。
私が働いているダンススクールでは、リサイタルの際にスライドを使用し、時には映画を使用しています。別のスライドをクリックして、ショーが途切れるので、ビデオ表示の音声が途切れることが何度かありました。私はいくつかの調査を行い、Powershowを見つけました。慣れるには少し時間がかかりましたが、まさに私が必要としていたことです。
ショーがPowerPointの別のセッションに表示されている間、更新や再配置、次のスライドの削除など、好きなように操作できます。