Показать сообщение отдельно
  #2  
Старый 09.04.2012, 14:50
Аватар для Ildar-tsr
Ildar-tsr Ildar-tsr вне форума
Местный
 
Регистрация: 09.08.2011
Адрес: г.Сургут, ХМАО
Сообщения: 453
Репутация: 7402
По умолчанию


Код:
StringGrid2.Cells[12,i+3]:= IntToStr(StrToInt(VarToStr(Sheet1.Range['J' + IntToStr(i+3)])) + 3000)
?
__________________
Google в помощь
Ответить с цитированием