我正在嘗試為我的表格行著色。為此,我使用:
Range("Table2[MyColumn]")(i).EntireRow.Interior.Color = RGB(0, 154, 265)
但這確實為整行著色(甚至在表格外)。看上面。

如何給表格的行著色?
uj5u.com熱心網友回復:
正確地解決串列物件而不是Range("Table2[MyColumn]")它會起作用:
ActiveSheet.ListObjects("Table2").ListRows(i).Range.Interior.Color = RGB(0,154,265)
我推薦:ListObject Excel 表格的 VBA 指南
不同之處在于Range.EntireRow將尋址作業表的整行,但ListRows僅尋址串列物件/表格的范圍。
uj5u.com熱心網友回復:
您特別提到要為整行著色:
Range("Table2[MyColumn]")(i).EntireRow.Interior.Color = RGB(0,154,265)
只需放下EntireRow零件,只有一列會被著色:
Range("Table2[MyColumn]")(i).Interior.Color = RGB(0, 154, 265)
評論后編輯
相交呢?(未測驗)
R1 = Range("Table2[MyColumn]")(i).EntireRow
R2 = Range("Table2[MyColumn]")
Application.Intersect(R1, R2).Interior.Color = ...
R1 是整行,甚至在表之外。
R2 是整個表。
交集是那一行,以表格的邊界為界。
轉載請註明出處,本文鏈接:https://www.uj5u.com/qukuanlian/314267.html
上一篇:將值從單獨的合并單元格復制到一個合并單元格中,作為以逗號分隔的坐標
下一篇:設定將粘貼范圍的輸入框
