Bedingte Formatierung der PowerPoint-Tabelle

13506
eirikdaude

Im Zusammenhang mit dieser Frage frage ich mich, ob es eine Möglichkeit gibt, die bedingte Formatierung auf eine Tabelle in PowerPoint anzuwenden, ohne eine Excel-Tabelle zu importieren. Sie können beispielsweise die Hintergrundfarbe einer Zelle in der Tabelle in Abhängigkeit von ihrem Wert ändern.

1

1 Antwort auf die Frage

2
Steve Rindsberg

Ja, aber nur über Code / Makro. Sie durchlaufen die .Cell-Auflistung der Tabelle. Überprüfen Sie, ob in jeder Zelle Text vorhanden ist. Wenn dies der Fall ist und der in numerische Werte konvertierte Text <0 ist, legen Sie die .Shape-Füllung der Zelle so fest, wie Sie möchten. Übergeben Sie dazu einen Verweis auf die Tabelle:

Sub FormatTheTable(oTbl As Table) Dim x As Long Dim y As Long  With oTbl For x = 1 To .Rows.Count For y = 1 To .Columns.Count If .Cell(x, y).Shape.TextFrame.HasText Then If CDbl(.Cell(x, y).Shape.TextFrame.TextRange.Text) < 0 Then .Cell(x, y).Shape.Fill.ForeColor.RGB = RGB(255, 0, 0) End If End If Next ' Column Next ' Row End With ' otbl End Sub
Wie würden Sie Änderungen in der Tabelle feststellen? Wir haben uns etwas ähnliches angeschaut, was Sie beim Googeln vorschlagen, aber das Änderungsereignis des Tisches zu erfassen, wirkt wie ein absoluter Albtraum. Ich könnte natürlich falsch liegen. eirikdaude vor 8 Jahren 0
Du könntest falsch liegen. Vielleicht in einem alternativen Universum. In diesem Fall sind Sie absolut richtig. Es gibt kein Änderungsereignis für Tabellen oder andere spezifische Formen. Über das beste Ereignis, das Sie tun können, ist das Änderungsereignis Selection abzufangen. Wenn eine Form ausgewählt ist, überprüfen Sie, ob es sich um eine Tabelle handelt, und notieren Sie diese Tatsache (in einer Variablen oder einem anderen Element mit einem Bezug zur Form). Prüfen Sie dann beim nächsten Auswahländerungsereignis, ob die Auswahl nicht mehr dieselbe Tabelle ist, und führen Sie in diesem Fall den obigen Code aus, um die erforderlichen Formatierungsänderungen vorzunehmen. PowerPoint <> Excel. Steve Rindsberg vor 8 Jahren 0

Verwandte Probleme