Помогите с Excel ! - VB

Формулировка задачи:

Вобщем делаю из хитрой таблицы плоскую, потом я ее залью в БД. Сама програмлю на делфине, поэтому в ВБА не сильна, но для нормализации табличек и подготовки к заливке удобнее помоему пользоваться ВБА. Есть несколько простых вопросов.
1.Как отпределить цвет ячейки в следующем коде (не назначить, а узнать) ? имется ввиду в конструции If.

arba = 
Sheets().
    y =   
   
      ActiveSheet.Cells(arba, ).???????  
      ??????????   
      
     arba = arba + 
    y

2. Как удалить строку по признаку первой пустой ячейки? Все в той же конструкции If.
Заранее всем благодарна!

Решение задачи: «Помогите с Excel !»

textual
                            Листинг программы 
                        

                            <font color="blue">If</font> IsEmpty(cell) <font color="blue">Then</font> 
  cell.Delete Shift:=xlShiftUp
<font color="blue">End</font> <font color="blue">If</font>
                        