добавление данных

Страница 1 из 1 1
Модератор форума: китин, _Boroda_, DrMini

добавление данных (Формулы/Formulas)

добавление данных

deathspirit

Дата: Пятница, 27.03.2015, 13:08 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 3

Репутация: 0 ±

Замечаний: 0% ±

Excel 2003

Есть два файла, 1 база основной BAZA.xls, в который нужно добавить недостающих людей находящихся в рабочем (Rabota.xls) файле при этом если найдены соответствия в 1 файле (BAZA.xls база основной) то такие строки пропускать , кто поможет ?

К сообщению приложен файл: BAZA.xls (15.0 Kb) · Rabota.xls (13.5 Kb)

Иван

Сообщение отредактировал deathspirit - Пятница, 27.03.2015, 13:52

Ответить

deathspirit

Дата: Пятница, 27.03.2015, 14:34 | Сообщение № 2

Группа: Пользователи

Ранг: Прохожий

Сообщений: 3

Репутация: 0 ±

Замечаний: 0% ±

Excel 2003

чтото типа Sub Макрос1()
'
' Макрос1 Макрос
' Макрос записан 27.03.2015 (Горелова Н. В.)
'
' Сочетание клавиш: Ctrl+z
'
Selection.Copy
Windows("H1_АПП_Регистр на 01.04.2015 года часть 4.xls").Activate
Cells.Find(What:="АБАЕВ", After:=ActiveCell, LookIn:=xlValues, LookAt:= _
xlWhole, SearchOrder:=xlByColumns, SearchDirection:=xlNext, MatchCase:= _
False, SearchFormat:=False).Activate
Windows("последнее.xlsx").Activate
Windows("H1_АПП_Регистр на 01.04.2015 года часть 4.xls").Activate
Rows("6681:6681").Select
Selection.EntireRow.Hidden = True
End Sub

только чтоб не прописывать а искал соответствия не только по строке фамилия но и имя отчество и дата рождения без указания инициалов
[moder]Тему переназвали не по Правилам форума, которые так и не прочитали, код не оформили тегами, тему создали не в том разделе.
Короче, тема закрыта, еще одно нарушение Правил - и я Вам все Ваши косяки отдельными замечаниями оформлю. Как раз хватит на полный бан.