vba中删除指定行如何弄啊_VBA

vba中删除指定行怎么弄啊？？
我想删除指定行
删除红色单元格所在的行与绿色单元格所在的行的全部内容？？？
怎么写啊？

另：怎么查单元格颜色的编号？？？

------解决方案--------------------------------------------------------

探讨
'以下程序为判断第一行至第1000行中有没有红色和绿色的行,有的话,就把该行删除.

Sub Macro1()

For i = 1 To 1000
If Rows(i).Interior.ColorIndex = 3 Or Rows(i).Interior.ColorIndex = 10 Then
Rows(i).Delete Shift:=xlUp
i = i - 1……