Добрый день.
Ваше решение работает, но оно копирует всё, форматы, формулы, а мне нужны только значения.
Смотрел про метод "Copy" у него вроде нельзя указать копирование и вставку значениями

Да можно и через диалоговое окно, но мой вариант позволит собрать данные если файлы лежат в разных папках.
Для этого сделать поиск по одной папке, потом по другой, список найденного не сбрасывается

Power Query там нет

В этой теме аналогичная задача решалась
Эта тема

Спасибо огромное!
Power Query буду пробовать, но так как данным файлом не только я буду пользоваться, то Power Query не подойдет так как не у всех может быть установлен

С примером будет легче думать.
А вообще закреплять формулу $

Формулой

В программировании есть понятие "человекупонятная сортировка", все языки программирования при работе с массивами этого понятия не придерживаются если в имени файлов присутствуют цифры, тем более с разделителями. Выход - изменить названия файлов, не применять цифры

Перед выводом результатов данные записываются в массив Array, затем из него выводятся, ищите информацию по сортировка массивов.
Возможно информация отсюда чем то поможет Пример сортировки

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

Karataev, Спасибо! Буду знать.

Здравствуйте, проблема в следующем: создал форму для добавления материалов в базу, объявил глобальные переменные в отдельном модуле, но все равно при добавлении появляется ошибка "Method 'Range' of object '_Global failed". В чем еще может быть проблема?

Здравствуйте.
Возникла следующая проблема.
Сейчас в vba использую следующий код

Который, если в диапазоне появляется буква "н" открывает определенную форму.
Как сделать так чтобы он искал по точному соответствию?
Так как сейчас если вписать любой текст где присутствует буква "н" код тоже сработает, а этого не надо

Вот файл примера, в красном диапазоне расписал какие значения нужно разрешить, какие запретить. Значения нужно вводить в сером диапазоне. Вверху формула которая сейчас получилась

все равно длинная, 316 символов, а нужно 255 с "="

и?

Здравствуйте,столкнулся с такой проблемой, делаю проверку чтобы нельзя было вводить в ячейку определенные значения, но когда вставляю формулу в проверку данных, она не вставляется, возможно превышен лимит длины формулы, как можно этот лимит обойти??
Сейчас формула такая:
ИЛИ(И(НЕ(ЕОШИБКА(НАЙТИ("/";E11;1)));ЕСЛИ(НЕ(ЕОШИБКА(НАЙТИ("/";E11;1)));ИЛИ(ЕСЛИ(ДЛСТР(E11)=3;И(ЗНАЧЕН(ЛЕВСИМВ(E11;1))>=ЗНАЧЕН(ПРАВСИМВ(E11;1));ЗНАЧЕН(ПРАВСИМВ(E11;1))<=8));ЕСЛИ(ДЛСТР(E11)=4;И(ЗНАЧЕН(ЛЕВСИМВ(E11;2))<=24;ЗНАЧЕН(ПРАВСИМВ(E11;1))<=8)))));НЕ(ЕОШИБКА(ПОИСКПОЗ(E11;Справочник!$A$1:$A$21;0)));ЕСЛИ(ЕЧИСЛО(ЗНАЧЕН(E11));ЗНАЧЕН(E11)<=24))

Она означает следующее: в ячейку можно вводить только: значения из диапазона
"Справочник!$A$1:$A$21", все цифры от 1 до 24, комбинации вида "8/7",
"8/8" .... (но в эти комбинациях первая цифра не может быть меньше
второй, первая цифра не может быть больше 24, и вторая цифра не может
быть больше 8
Но при этом формат ячейки должен оставаться текстовым (это для справки)

Здравствуйте, помогите реализовать такой функционал:
В файле таблица (что-то) типа табеля, при нажатии кнопки печать открывается окно, в котором можно будет выбирать какие именно фамилии (строки) печатать, список в окне должен расширяться и прокручиваться в зависимости от количества фамилий. Серой заливкой та область которую можно настраивать при печати, а зеленой та которая печатается всегда.
И в окне настройки если галочка стоит на "все" то выделены соответственно все значения, если галочку убрать то снимается выделение со всех

Спасибо, у вас мне действительно помогли!!!

и еще один вопрос.
Если я на листе выделяю диапазон и наживаю DELETE то выдает ошибку Run-time error 13, и выделяет строку If Target = "ДЦ" Or Target = "дц" Then
Но если удалять ячейки по одной, то все нормально. Как это можно решить?

ikki,огромное спасибо!!!

Можете подсказать как и где ее правильно объявить, просто недавно начал работать с VBA

Так и думал
Теперь оказывается проблема в другом
Приведу весь пример.
Код на целевом листе

Просматривает диапазон, и если в нем появилось значение
то показываем форму, код которой такой

Так вот здесь редактор ругается на Target, потому что он не определен.
Как его сделать видимым для формы?

Есть в макросе такой код Intersect(Rows(3), Target.EntireColumn).Address который возвращает абсолютный адрес ячейки, подскажите, как из этого вернуть значение ячейки?