Office関連

PowerPoint 2013で追加された図形関連のイベント

What’s new for PowerPoint 2013 developers」でも紹介されていますが、PowerPoint 2013ではApplicationオブジェクトに「AfterShapeSizeChange」と「AfterDragDropOnSlide」という2つの図形関連のイベントが追加されました。

AfterShapeSizeChangeイベントはスライド上の図形のサイズが変更されたときに、AfterDragDropOnSlideイベントはスライド上に図形がドロップされたときに発生するイベントで、使い方は下記のコードのようになります。

'Slide1モジュール
Option Explicit

Private WithEvents App As PowerPoint.Application

Public Sub Sample()
  Set App = Application
End Sub

Private Sub App_AfterShapeSizeChange(ByVal shp As Shape)
  Debug.Print shp.Name
End Sub

Private Sub App_AfterDragDropOnSlide(ByVal Sld As Slide, ByVal X As Single, ByVal Y As Single)
  Debug.Print Sld.Name, X, Y
End Sub

※ Slideモジュールの使い方は「[PowerPoint]Applicationオブジェクトのイベントを利用する」参照。

ただ、PowerPoint MVPのShyam Pillai氏も自身のサイトで仰っているのですが、AfterShapeSizeChangeイベントの方は上手く動作するのですがAfterDragDropOnSlideイベントの方は上手く動作しません

私の方でもイメージファイルをスライド上にドラッグ&ドロップしたり、色々と試してみたのですが、イベントが発生しないのでこのイベントをどのように利用するのか分からないのが現状です。
動作させる条件か何かがあるのかもしれませんが、そちらについては引き続き調べていきたいと思います。

Microsoft Office 2010 Service Pack 2が公開されました。前のページ

[Office用アプリ]日本語版Office ストアが正式オープンになりました。次のページ

関連記事

  1. Office関連

    [Office]WordやPowerPointで画像の画質が悪くなった時の対処方法

    WordやPowerPointで画像を貼りつけたときやファイルを保存し…

  2. Office関連

    PowerPointのマクロを共有化して使う方法

    記事のタイトルだけ見るとちょっと分かりづらいですが、要するにWordの…

  3. Office関連

    マクロに割り当てたショートカットキーをCSVファイルとして出力するWordマクロ

    Word MVPの新田さんが書かれた以下の記事を見て思いついたマクロで…

  4. Office関連

    Google翻訳で文字列を翻訳するVBAマクロ(IE操作版)

    下記記事にあるように、ニューラルネット機械翻訳の導入によって、Goog…

  5. アイコン一覧

    Office 365アイコン(imageMso)一覧(K,L)

    Office 365のデスクトップ版Officeアプリケーション(Wo…

  6. Office関連

    Google TTSで文字列を読み上げるExcelアドイン

    前回の記事で書いたGoogle TTSで文字列を読み上げるマクロ(言語…

コメント

  1. この記事へのコメントはありません。

  1. この記事へのトラックバックはありません。

Time limit is exhausted. Please reload CAPTCHA.

※本ページはプロモーションが含まれています。

Translate

最近の記事

アーカイブ

PAGE TOP