Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как по данным одного листа заполнить колонку на другом? / 9 сообщений из 9, страница 1 из 1
12.01.2007, 14:30:34
    #34251816
srxp1154
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как по данным одного листа заполнить колонку на другом?
Добрый день!
Помогите решить задачу, на которую моих знаний о VB явно недостаточно. Дано: два листа, на них по таблице. Общие у них 2 колонки. Но на листе2 одна из двух колонок заполнена неполностью.
Требуется: Используя ячейки второй колонки (заполненной) листа2 найти соответствующее значение на листе 1 и заполнить незаполненную колонку листа2.
Примерный алгоритм я написал в прилагаемом файле. А вот как его реализовать...?
Надеюсь на вашу помощь.
Спасибо.
...
Рейтинг: 0 / 0
12.01.2007, 17:07:46
    #34252540
srxp1154
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как по данным одного листа заполнить колонку на другом?
Можно бы было использовать функцию ВПР, но там таблица д.б. по возрастанию, а это не наш случай.
...
Рейтинг: 0 / 0
12.01.2007, 17:42:42
    #34252628
klen_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как по данным одного листа заполнить колонку на другом?
вот файлик твой. Зайди в меню сервис . Выбери Макросы . Затем Изменить .
Короче заменилось только 9 значений, если считать ключом какие ММ????
...
Рейтинг: 0 / 0
15.01.2007, 10:40:56
    #34254904
klen_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как по данным одного листа заполнить колонку на другом?
Интересно, а как без помощи макроса это сделать? Должен же быть какой-то способ!
...
Рейтинг: 0 / 0
15.01.2007, 11:12:41
    #34255012
srxp1154
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как по данным одного листа заполнить колонку на другом?
Спасибо klen_, воде работает, по-позже проверю уже "в промышленных" масштабах. У меня тут таблицы доходят до 1500 строк. В связи с этим возник вопрос.

Dim a As Integer: a = 3 ' начало листа1
Dim b As Integer: b = 107 ' конец листа1
Dim An1(1000), Bn1(1000)
Const c As Integer = 4 ' начало листа2
Const d As Integer = 111 ' конец листа2

Как данный макрос подправить, чтобы значения "начало листа" и "конец листа" для каждого листа брались из ячейки, например, F1?
Спасибо.
...
Рейтинг: 0 / 0
15.01.2007, 12:32:21
    #34255343
klen_
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как по данным одного листа заполнить колонку на другом?
srxp1154чтобы значения "начало листа" и "конец листа" для каждого листа брались из ячейки, например, F1
Код: plaintext
1.
a = Range("F1").Value
b = Range("F2").Value
или так
Код: plaintext
1.
a = Val(Range("F1").Value)
b = Val(Range("F2").Value)
потом надо какие-нибудь проверки прописать, например пользователь ничего не указал и т.д.
а затем создаёшь массив
Код: plaintext
1.
Dim massiv()
ReDim massiv(b - a +  1 )
...
Рейтинг: 0 / 0
15.01.2007, 13:47:05
    #34255625
apl
apl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как по данным одного листа заполнить колонку на другом?
srxp1154Можно бы было использовать функцию ВПР, но там таблица д.б. по возрастанию, а это не наш случай.

Если последний необязательный параметр в впр будет ЛОЖЬ или 0, то от таблицы не требуется быть сортированной.
...
Рейтинг: 0 / 0
15.01.2007, 15:37:50
    #34256109
srxp1154
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как по данным одного листа заполнить колонку на другом?
Спасибо klen_, все отлично работает.
apl, спасибо, не знал, принято к сведению.
...
Рейтинг: 0 / 0
23.01.2007, 16:10:59
    #34275890
srxp1154
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Как по данным одного листа заполнить колонку на другом?
В продолжение темы.
Возникла подобная задача, только теперь в исходных ячейках содержится не одно значение, а текст. (в файле лист 3 (источник данных), Лист 4 - заполняемый лист). Задача, на основе общих значений в колонке Е, заполнить колонку F (Текст). Имеющийся макрос выполняет перенос только если в ячейке Лист3!Fn содержится число. Подскажите, Что надо изменить в макросе?
Спасибо.
...
Рейтинг: 0 / 0
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Как по данным одного листа заполнить колонку на другом? / 9 сообщений из 9, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]