EXCEL VBAで質問です。つぎのようなコードを作りました。 With ActiveSheet.Shapes(\u0026quot;xxx\u0026quot;).Fill.ForeColor.ObjectThemeColor = msoThemeColorAccent2 .ForeColor.Brightness = 0.8000000238 End With（長ーーーい処理） With ActiveSheet.Shapes(\u0026quot;xxx\u0026quot;).Fill .ForeColor.ObjectThemeColor = msoThemeColorAccent4 .ForeColor.Brightness = 0.8000000119 End With上記、長い処理の前後でオブジェクトxxxの色を変えたいのです。処理のあとの色はでますが、始めの色がうまく出ません。どうしてでしょう。何かオブジェクト処理のため必要な処理があるのでしょうか。お教え下さい。よろしくお願い致します。