|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
24.08.2007, 18:03 | #1 |
Новичок
Джуниор
Регистрация: 24.08.2007
Сообщений: 2
|
выборка
Как можно исключить данные одного столбца из другого (все данные числа) и вывести результат в другой столбец? Пояснение: в первом столбце содержатся числа, в другом часть чисел из первого столбца, нужно исключить эти числа (второго столбца) и вывести в третий. Пытался это сделать через специальный фильтр, не получается, может, что-то не правильно делаю? Подскажите, плиз.
|
24.08.2007, 20:49 | #2 |
Новичок
Джуниор
Регистрация: 24.08.2007
Сообщений: 2
|
Не стал заморачиваться, набросал макрос, кому интересно см. ниже:
n = InputBox("Номер строки", " ", 1) If n <= 0 Then GoTo 1 m = n n_k = n m_k = m t = n i = 1 Do While i <> 0 i = Cells(n_k, 1) n_k = n_k + 1 Loop n_k = n_k - 2 i = 1 Do While i <> 0 i = Cells(m_k, 2) m_k = m_k + 1 Loop m_k = m_k - 2 For i = n To n_k S = Cells(i, 1) For j = m To m_k If S = Cells(j, 2) Then GoTo 2 Next Cells(t, 3) = S t = t + 1 2: Next 1: End Sub Код конечно так себе, но зато работает |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Выборка по среднему | Kip | Microsoft Office Access | 3 | 11.08.2008 21:56 |
ADO, выборка из таблицы. | Roof | БД в Delphi | 2 | 09.07.2008 18:51 |
Выборка данных из StringGrid | quqer | БД в Delphi | 1 | 14.03.2008 12:56 |
Выборка из таблицы | ivp88 | БД в Delphi | 5 | 12.01.2008 14:36 |
Выборка | John_chek | БД в Delphi | 10 | 27.06.2007 08:43 |