| 
| 
 | Вопрос # 5 530/ вопрос открыт / | 
 |  Уважаемые эксперта!Подскажите, как решить следующую задачу.
 Имеется лист EXCEL с множеством записей одинаковой структуры.
 В приложении приведена форма одной записи по Иванову Ивану Ивановичу, аналогичные записи по Петрову Петру Петровичу и т.д.
 Как можно произвести поиск на листе EXCEL по ФИО  работника (в данном случае - Иванов Иван Иванович),
 выделить диапазон значений
 1. Ниже ячеек
 ///Наименование	дата списания	кол-во	Примечание  ///
 до первой пустой ячейки и скопировать выделенное в StringGrid1.
 2. Правее ячеек
 Основной режим
 Сверхурочно
 Итого
 и скопировать выделенное в StringGrid2.
 
 Заранеt благодарен
 Al_Sha
 К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса) 
|  |   Вопрос задал: Al_Sha (статус: Посетитель)Вопрос отправлен: 27 июля 2011, 14:09
 Состояние вопроса: открыт, ответов: 0.
 |  
 Мини-форум вопросаВсего сообщений: 6; последнее сообщение — 28 июля 2011, 07:25; участников в обсуждении: 2. 
|   | Вадим К (статус: Академик), 27 июля 2011, 14:27 [#1]:а просто с excel прочитать данные умеете? скопировав их в stringgrid? Галочка "подтверждения прочтения" - вселенское зло. |  
|   | Al_Sha (статус: Посетитель), 27 июля 2011, 14:30 [#2]:Но ведь нужно не просто скопировать 1. Найти запись по фамилии
 2.И уже скопировать данные в соответствии с указанным выше...
 |  
|   | Вадим К (статус: Академик), 27 июля 2011, 15:00 [#3]:Еще раз повторяю свой вопрос, вы можете просто прочитать данные с Excel и скопировать их в Stringgrid ? Галочка "подтверждения прочтения" - вселенское зло. |  
|   | Al_Sha (статус: Посетитель), 27 июля 2011, 16:40 [#4]:Не пойму к чему этот вопрос,однако... Да, я могу просто прочитать данные с Excel и скопировать их в Stringgrid
 |  
|   | Вадим К (статус: Академик), 27 июля 2011, 17:49 [#5]:то есть, фактически получается цикл, в котором копируются данные? И кто мешает в очередной иттерации цикла сверить текущую запись с условием и если подходит - копировать. Если нет - пропустить.
 
 Вариант два, более топорный, но ...
 вначале грузим в дополнительный striggrid. а потом делаем так
 
 j := 0; // для счета строк в результирующей таблице
for i := 0 to stringgrid.rowcount - 1 do begin
  if stringgrid.cells[0, i] = 'Иванов' then begin
    // тут код копирования в другой грид
    for k := 0 to stringgrid2.ColCount -1 do
      stringgrid2.cells[k,j] := stringgrid.cells[k, i];
    j := j + 1;
  end;
end;это такой набросок, исключительно для идеи, 100% компиляции не гарантирую. Но этот же код можно применить и для вытягивания сразу с excel'а.Галочка "подтверждения прочтения" - вселенское зло. |  
|   | Al_Sha (статус: Посетитель), 28 июля 2011, 07:25 [#6]:Спасибо, будем пробовать... |  Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте. |