次の方法で共有

パワーポイントでのスライドショー中の操作

Anonymous
2023-05-17T13:05:29+00:00

パワーポイントに表を挿入し、スライドショー中に表の中の特定のセルをクリックすることでそのセルの色だけを変えるようにしたいです。

エクセルではダブルクリックで特定のセルの色を変えるマクロを見つけましたが、パワーポイントでも同じようにすることはできますか?

エクセルのマクロです↓

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
     With Target.Interior
          If .ColorIndex = xlNone Then
               .Color = vbRed
          Else
               .Color = xlNone
          End If
     End With
     Cancel = True
End Sub
Microsoft 365 と Office | PowerPoint | 家庭向け | Windows
Microsoft 365 と Office | PowerPoint | 家庭向け | Windows

プレゼンテーションを作成し、マルチメディア オブジェクトやテキストによる特殊効果などのグラフィック効果を追加するためのツールを提供する Microsoft プレゼンテーション グラフィック製品のファミリ。

ロックされた質問。 この質問は、Microsoft サポート コミュニティから移行されました。 役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。

0 件のコメント コメントはありません

1 件の回答

並べ替え方法: 最も役に立つ
  1. Anonymous
    2023-05-17T15:28:12+00:00

    親愛なるSka_522、

    私はイバディギです、そして私はあなたの質問を喜んで手伝います。このfdorumでは、私たちはあなたと同じようにマイクロソフトの消費者です。

    ExcelのようにPowerPointでマクロを実行することはできません。ただし、VBA (Visual Basic for Applications) を使用すると、PowerPoint で同様の効果を作成できます。スライドショー中にクリックしたときに表内の特定のセルの色を変更するVBAスクリプトを記述できます。

    テーブル内の選択したセルの塗りつぶしの色を変更するVBAコードの例を次に示します。

    Public Sub TblCellColorFill() 整数としての薄暗いXは 整数としての薄暗い Y テーブルとして薄暗い oTbl = ActiveWindow.Selection.ShapeRange(1) を設定します。テーブル X = 1 の場合、oTbl.Columns.Count Y = 1 から oTbl.Rows.Count の場合 With oTbl.Cell(Y, X) もし。選択 <> 偽 その後 .Shape.Fill.ForeColor.RGB = RGB(100, 150, 200) 終了する場合 次で終わる 次に 次に エンドサブ

    このコードは、選択したセルの塗りつぶしの色を RGB(100, 150, 200) に変更します。RGB値を変更して、色を目的の色に変更できます。このコードを変更して、セルが選択されたときではなくクリックされたときに塗りつぶしの色を変更することもできます。

    よろしくお願いいたします イバディギ

    この回答は自動翻訳されています。文法や表現の誤りが発生した場合はご容赦ください。

    この回答は役に立ちましたか?

    0 件のコメント コメントはありません