Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Логин:
Пароль:
Регистрация | Забыли пароль?

Delphi.int.ru Expert

Другие разделы портала

Переход к вопросу:

#   

Статистика за сегодня:  


Лучшие эксперты

Подробнее »



Вопрос # 5 530

/ вопрос открыт /

Уважаемые эксперта!
Подскажите, как решить следующую задачу.
Имеется лист EXCEL с множеством записей одинаковой структуры.
В приложении приведена форма одной записи по Иванову Ивану Ивановичу, аналогичные записи по Петрову Петру Петровичу и т.д.
Как можно произвести поиск на листе EXCEL по ФИО работника (в данном случае - Иванов Иван Иванович),
выделить диапазон значений
1. Ниже ячеек
///Наименование дата списания кол-во Примечание ///
до первой пустой ячейки и скопировать выделенное в StringGrid1.
2. Правее ячеек
Основной режим
Сверхурочно
Итого
и скопировать выделенное в StringGrid2.

Заранеt благодарен
Al_Sha

К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)

Al_Sha Вопрос ожидает решения (принимаются ответы, доступен мини-форум)

Вопрос задал: Al_Sha (статус: Посетитель)
Вопрос отправлен: 27 июля 2011, 14:09
Состояние вопроса: открыт, ответов: 0.


Мини-форум вопроса

Всего сообщений: 6; последнее сообщение — 28 июля 2011, 07:25; участников в обсуждении: 2.
Вадим К

Вадим К (статус: Академик), 27 июля 2011, 14:27 [#1]:

а просто с excel прочитать данные умеете? скопировав их в stringgrid?
Галочка "подтверждения прочтения" - вселенское зло.
Al_Sha

Al_Sha (статус: Посетитель), 27 июля 2011, 14:30 [#2]:

Но ведь нужно не просто скопировать
1. Найти запись по фамилии
2.И уже скопировать данные в соответствии с указанным выше...
Вадим К

Вадим К (статус: Академик), 27 июля 2011, 15:00 [#3]:

Еще раз повторяю свой вопрос, вы можете просто прочитать данные с Excel и скопировать их в Stringgrid ?
Галочка "подтверждения прочтения" - вселенское зло.
Al_Sha

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

Al_Sha (статус: Посетитель), 28 июля 2011, 07:25 [#6]:

Спасибо, будем пробовать...

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.

Версия движка: 2.6+ (26.01.2011)
Текущее время: 22 февраля 2025, 11:54
Выполнено за 0.03 сек.