[Alex7]

lmikle спасибо огромное! Но уже решил вопрос немного по другому, просто запутался в ячейках сначала. Сделал так:

Код:

For i:=0 to ListBox1.Items.Count-1 do
  begin
  Apex.Range[ListBox2.Items[i] + EdtL2S.Text] := '=Лист1!' + EdtL1D.Text + ListBox5.Items[i]; //-1- -1-
  end;