PowerPoint VBAセルシェーディング

Question

PowerPointのVBAコードをプログラムして、その値に応じて表内のセルの色を変更したいと考えています。

たとえば、「-2」が赤、「0」が黄、「+1」が緑になります。これらの条件が満たされない場合は、色を変更しないでください。

ありがとうございました！

Answer 1

あなたはあなたが必要とする全体のコードは、このようなものをない使用することができますが、これはあなたを助ける必要があります。私たちの細胞のすべてを

With With ActivePresentation.Slides(1).Shapes(3).Table 
    If .Cell(y, x).Shape.Fill.BackColor.RGB <> -2 And .Cell(y, x).Shape.Fill.BackColor.RGB <> 0 _ 
    And .Cell(y, x).Shape.Fill.BackColor.RGB <> 1 Then  'You might have to check an other BackGround property 
     .Cell(y, x).Shape.Fill.ForeColor.ObjectThemeColor = 'something 
    End If 
End With 

だけループ（最大にxとyを増やすcoloumnsの値行）