私はテーブルを持つ複数のスライドを持っている、各テーブルは3列を持っている、最後の列は "参照値"であり、プレゼンテーション中に非表示にしてボタンやハイパーリンクを押すだけで、各行は個別に私はそれが可能だと私は本当にコーディングで新しいので、私はテーブルの背景色である白(テーブルの背景色)から赤にセルのテキスト形式を変更することによってそれを行うことができたと思うが、私は一度にすべてのテーブルのためにそれを行うことができます私はそれらのそれぞれについて個別の値が必要です。 (私は自分自身を明確にしたいと思う)。これは私がこれまでにやっていることです:Powerpointのテーブルからデータを表示/非表示にする方法は?
Sub format()
Dim s As Slide
Dim oSh As Shape
Dim oTbl As Table
For Each s In ActivePresentation.Slides
For Each oSh In s.Shapes
If oSh.HasTable Then
Set oTbl = oSh.Table
With oTbl.Cell(2, 3).Shape.TextFrame.TextRange
.Text = "4500-9000"
.Font.Size = 12
.Font.Color = vbRed
End With
End If
Next
Next s
End Sub
をしかし、これは彼らのすべてが大切異なる持っているので、私は、それが特定のテーブル内の特定の細胞を一つずつ変更したい、私が持っているすべてのテーブルの上に同じセルを変更します。私はアニメーションでこれを行うことができることを知っていますが、私はむしろこのようにしたいと思います。
EDIT:ボタンを押す代わりに、ポインタを空のセルに重ねることでデータを取得し、カーソルをセルの上に置いたときに再び非表示にするとよいでしょう。
スライドショー中にプレゼンテーションに何か変更を加えても、最後に変更が残っています。つまり、一度しか動作しない場合、すべての値を修正して再度非表示にする必要があります。終了時にプレゼンテーション中に行われた変更を復元する方法はありますか?
私はそれを動作させることができません – acm0420
エラーが表示されます "シェイプコレクションにMyテーブルが見つかりません" – acm0420
私が与えた例では、コードで識別されるようにテーブルの名前を付けたと仮定します。これを行うには、Alt + F10を押して選択ペインを開きます。テーブルを選択し、選択ペインでコードと同じ名前を設定します。 "MyTable"(またはあなたが望むもの)。シェイプは名前プロパティまたはインデックスで参照できます。名前を使用する際の問題は、ユーザーがそれを変更して100%ばかげたことではないということです。あなたはコードを介してのみアクセス可能なタグを使用することができますが、もう少し複雑です。 –