|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
12.07.2010, 12:45 | #31 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Цвета я не определял,но слияние работает.Посмотрите-у вас такой финал
Анализ,обработка данных Недорого
|
13.07.2010, 10:00 | #32 |
Регистрация: 30.12.2009
Сообщений: 7
|
Так я и не разобрался...
К сожалению рабочий интеренет не позволяет делать вложения и работать с файлообменниками, поэтому попробую изложить вопрос так: Код:
Код:
|
13.07.2010, 10:55 | #33 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Попробуйте так
Код:
Анализ,обработка данных Недорого
|
13.07.2010, 11:32 | #34 |
Регистрация: 30.12.2009
Сообщений: 7
|
Работает!
Объясните пожалуйста как работает вот эта часть: Sheets("Лист1").UsedRange.Row - 1 + Sheets("Лист1").UsedRange.Rows.Coun t |
13.07.2010, 11:47 | #35 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
UsedRange — прямоугольная область, включающая все заполненные ячейки и незаполненные, в промежутках между заполненными ячейками, на листе. Координаты области не обязательно начинаются в ячейке A1
Sheets("Лист1").UsedRange.Row -координаты строки начала области Sheets("Лист1").UsedRange.Rows.Coun t количество строк в области поэтому координаты последней строки= начальная координата-1 + количество строк
Анализ,обработка данных Недорого
Последний раз редактировалось doober; 13.07.2010 в 12:01. |
13.07.2010, 12:07 | #36 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Ещё можно использовать
Cells.SpecialCells(xlLastCell).Row Sub tt() x = Cells.SpecialCells(xlLastCell).Row End Sub Но это считает и форматы (без данных) тоже.
webmoney: E265281470651 Z422237915069 R418926282008
|
19.07.2010, 11:51 | #37 |
Пользователь
Регистрация: 06.07.2010
Сообщений: 13
|
Простите, что потерялась - было много работы.
Ваше видео сравнила со своим - отрабоатывает на тестовых файлах нормально. Но когда подкладываешь 2 реальных файла - строки задваиваются. В файлах добавлены в конце по 3 столбца. В первом файле в столбцах стоят даты, во втором - столбцы пустые. В итоговом файле получается, что если строки совпадают, то он их дублирует и ставит 2 строки - отличаются они между собой данными в столбцах "добавлен"\"удален". Если строки в первом файле не было, то он успешно ее добавляет. |
19.07.2010, 14:36 | #38 |
Старожил
Регистрация: 02.05.2009
Сообщений: 3,907
|
Отписался в личку
Анализ,обработка данных Недорого
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Сравнение данных из двух и более книг Excel 2003 | Елена20.12.1987 | Microsoft Office Excel | 0 | 20.04.2010 18:56 |
сравнение двух строк | aza_kaz | Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM | 3 | 01.01.2010 23:40 |
Сравнение строк, добавление если false | Des | Общие вопросы Delphi | 6 | 20.08.2009 12:32 |
сравнение данных в двух столбцах в Excel 2003 | grinders | Microsoft Office Excel | 4 | 25.11.2008 16:58 |
Сравнение данных из двух книг Excel 2003 | ast1r | Microsoft Office Excel | 2 | 24.11.2008 21:39 |