|
28.07.2015 11:55:42
JayBhagavan,на третьей строке ошибку выдает expected expression
|
|
|
|
|
|
28.07.2015 11:04:08
Sanja,спасибо, теперь хоть из вашего цикла смогу по эксперементировать.
с Н/Д понятно с формулами на значения я поменяю как поставить условия на замену, всех дат ниже 2009 года на пустые значения? |
|
|
|
|
|
28.07.2015 10:53:07
JayBhagavan,я ранее писал, что цикл у меня не получается сделать, умел бы делать цикл, не писал сюда бы
|
|
|
|
|
|
28.07.2015 10:45:54
JayBhagavan,записывал, только он делает это только на активном листе
|
|
|
|
|
|
28.07.2015 09:55:08
Catboyun, пока так и пользуюсь)) хотелось бы это сделать макросом
Также еще необходимо сделать чтобы во всем документе, формулы заменялись на значения, чтобы вручную не делать |
|
|
|
|
|
28.07.2015 09:41:44
Саня, цикл я пытался сделать, но почему-то не работает -_-
Формат поменять не могу, т.к. ети ячейки должны быть в формате даты. Просто нужно заменить бесполезные ячейки на пусто, т.к. по етим дата считаются значения и итоги в других ячейках, а 0 тоже учитывается в формате даты О_О |
|||
|
|
|
|
01.07.2015 12:52:18
Юрий М, все проверил отлично работает. на цвет не реагирует) что-то другое наверно мешало
|
|
|
|
|
|
01.07.2015 12:47:46
Юрий М, о вроде работает, только мне пришлось почему-то создать доп. строчку, не закрашенная чтобы была. Хотя предыдущие строки были пустые, но закрашенные. Плюс еще на третий какой-то глюк случился, ща еще более детально проверю, а так, да все вроде круто, то что мне нужно, спасибо!
|
|
|
|
|
|
01.07.2015 12:28:51
Юрий М, ))) ВПР вставляю во второй или 40 столбец и под этими внизу, есть дурацкие заметки, примечания и тд., а под первым ничего нет. В первом столбце у меня уникальные значения, на основании которых и завязаны по сути все связи, формулы и функции с другими вспомогательными файлам. Так вот, мне нужно, чтобы макрос делал функцию ВПР не больше, чем строк в первом столбце с уникальными значениями.
Первый столбец Второй столбец Третий столбец Дом1 =впр(и тд.) Дом2 =впр(и тд.) Дом3 =впр(и тд.) пусто =впр(и тд.) ?! // если в первом столбце нет, строк, то ВПР уже выполнять не нужно, поэтому я думаю, что надо на основании проверки) пусто пусто пусто Надо купить хлеба да, нет?! |
|
|
|
|
|
01.07.2015 11:04:20
Юрий М, в основном. Я же туда вставляю ВПР. он у меня эту функцию по циклу вниз прогоняет и итоги в самом низу и всякие примечания убивает
|
|
|
|
|
|
01.07.2015 10:56:37
CAHO,
Что этот код не сработал. У меня внизу таблицы три пустые строчки, но он все равно делает ВПР и на них) Помогите плс) может нужно сделать проверку по наличию строк в первом столбце? Мне нужно чтобы он не выполнял цикл больше, чем есть строк в первом столбце. Там спустя несколько строк нах-ся итоги |
|||
|
|
|
|
01.07.2015 08:57:08
Юрий М, Блин спасибо, заработало наконец
|
|
|
|
|
|
01.07.2015 07:59:01
Юрий М, Что-то я не понял, как макрос вставлять) макрос в самом файле
Изменено: - 01.07.2015 08:07:43
|
|||
|
|
|
|
01.07.2015 06:20:39
Юрий М, он подставил значения только в первую вкладку, активную, а там есть еще 17 вкладок. Мне нужно во всех вкладках документа
JayBhagavan, после чего это вставлять? Кучу всяких вариантов перепробовал, не получается сделать так, чтобы он вставлял только значения
Изменено: - 01.07.2015 06:55:02
|
|
|
|
|
|
30.06.2015 14:36:48
CAHO, Оо помогло)))) круть отработал один столбец в 17 вкладках за 5 секунд))) (пока с одного файла) Ура ура ура
|
|
|
|
|
|
30.06.2015 14:33:37
CAHO,строки кстати не одинаковые. Они разделены просто строками которые залиты цветом для глаза. Под столбцом 40 считает суммарные итоги с столбца 25,26,27 к примеру. Под столбцом 50 сумму значений своего столбца. Под этими итогами еще всякие примечания, что означает, какой цвет))) короче всякая всячина внизу. А уникальные значения в первом столбце уже давно закончились к примеру на строке 1000, а внизу есть еще в перемешку всякие записи и примечания под разными столбцами))) Как это учесть и сделать, чтобы он подсчитал кол-во строк только первого столбца и выполнял vlookup столько, сколько строк в первом столбце?
|
|
|
|
|
|
30.06.2015 14:23:29
CAHO,спасибо большое за поддержку, сейчас попробую. Так как я новичок в этом деле, может занять время)
|
|
|
|
|
|
30.06.2015 13:58:44
Smiley, ай ладно)) в этом я уже разобрался
Как сделать, чтобы цикл функции ВПР заканчивался, после окончания уникальных значений или после появления внизу пустых строк, а то у меня спустя 3-4 строки идут уже итоги, помогите плс))) И еще сейчас все работает, кроме вопроса чуть выше конечно, но почему-то все происходит каааапееец медленно может что-то с циклом? он смотрит лишнюю информацию? я запускаю только с одного файла и только заполнить один столбец и на это уходит у моего компьютера минут 15. Обычным ВПРом и то быстрее было бы в миллион раз))) help help help |
|
|
|
|
|
30.06.2015 13:13:59
Smiley,
- Все файлы собирать в один и потом из него уже что-то лепить, то слишком большой файл получится))) - В вспомогательных файлах строк около 4000 - Значения всегда есть уникальные, но в вспомогательном файле они могут быть, не в самом первом столбце Hugo, MISSING в референсах VBA... что это?!) я думаю, все дело было в том, что в оригинале основной файл в формате xlsb, а вспомогательные в xlsx и они не поддерживают макрос? Сейчас занимаюсь проверкой, вроде по чуть, чуть со скриптом разобрался, немного меняю его под себя. ОДИН вопрос! Как сделать, чтобы цикл функции ВПР заканчивался, после окончания уникальных значений или после появления внизу пустых строк, а то у меня спустя 3-4 строки идут уже итоги, помогите плс))) |
|
|
|
|
|
30.06.2015 11:27:10
For a = 2 To Sheets(Shet.Name).UsedRange.Row + Sheets(Shet.Name).UsedRange.Rows.Count - 1
Подскажите почему выдает ошибку на букву "а" expected function or variable на этой строчке, весь скрипт выше. В оригинальном файле (отличается от примеров) 70 столбцов и несколько тысяч строк и вкладок 15 штук. Этот макрос работает на книгах примера, а на оригинале выдает на этой строчке ошибку, менял уже на всякие разные цифры))) что означает эта строчка?
Изменено: - 30.06.2015 11:27:44
|
|
|
|
|
|
28.06.2015 22:59:12
CAHO,а если мне нужно заполнять данные в определнные листы в основном файле?
Можете в Ваш пример добавить еще один вспомогательный файл для примера (чисто гипотетически  , для моего понимания. Как я буду добавлять в реальном примере еще 20 файлов, для заполнения всех 70 столбцовP.S. Данный макрос классно работает, только он немного другой. Нужно в определенный столбец вставлять и вкладку, я чет пока не понял как и где он определяет, куда и как =( такое ощущение, что в весь файл, по уникальному значению)
Изменено: - 28.06.2015 23:11:53
|
|
|
|
|
|
28.06.2015 22:46:21
Sanja, Спасибо большое, да я видел ваш ответ в другой теме, еще не проверял. Я плохо в макросе разбераюсь, сейчас сижу разбираюсь с тем, что САНО написал
vikttur, да, я понимаю. Я смотрю вы оставили уже эту) CAHO, не могли бы написать разъяснения по вашему макросу (что делает каждая строчка), т.к. в основном файле есть 18 вкладок в которые нужно вносить файлы и еще одна вкладка, куда уходят итоги со всех листов (т.е туда ненадо). |
|
|
|
|
|
28.06.2015 22:32:17
vikttur,эту тему я создал первой, извиняюсь. Тут я расписал ее, но походу перемудрил, никто ничего не писал. После нескольких раздумий решил попросить помощи, немного изменить вопрос, как создать цикл, а не полное решение проблемы, а потом все закрутилось и одновременно в двух темах, получилось дублирование, в общем полный провал =ъ
CAHO, вроде ОНО!))) ща я пока не хочу торопиться с выводами, посмотрю, как работает на оригинале. Сразу не понял, что нужно вспомогательный открывать vikttur, я извиняюсь, что создал путоницу, ща проверю, помогло решение САНО и отвечу, а пока незнаю, какую закрывать из них =\ |
|
|
|
|
|
28.06.2015 22:26:48
b = Workbooks("Вспомогательный файл откуда берутся данные.xlsx").Worksheets(1).UsedRange.Row + Workbooks("Вспомогательный файл откуда берутся данные.xlsx").Worksheets(1).UsedRange.Rows.Count - 1
Ошибка в этой строчке Run Time Error 9 . Может проблема в том, что файлы лежат в другом месте? |
|
|
|
|
