Interior.Color = Sheets("A0").Cells(j, k).Interior.Color Next k Next j Next i End Sub. This does a cell-by-cell color copy.
確定! 回上一頁