The following code changes the colour for each shape in the active sheet.Code:Sub ch_shape_Color() For Each sh In ActiveSheet.Shapes sh.
確定! 回上一頁