Страницы: 1
RSS
Выбор макросом - случайного из нескольких файлов.
 
Здравствуйте, программисты. Обращаюсь за помощью насчет макроса.
У меня есть макрос.
Этот макрос работает как гиперссылка, открывая одно окно и закрывая прежнее.
Но там есть небольшая проблема. Этот макрос ищет слово или текст по точному совпадению.

Как его изменить, чтобы макрос искал файл для открытия не по точному совпадению, а просто по наличию такого текста внутри названия файла (а если подходящих файлов - несколько, то выбирал бы случайный из них) ?
 
Цитата
RagnarLodbrokovitch написал:
Этот макрос ищет слово или текст по точному совпадению.
Это не совсем так
Вот в этой строке
Код
If fil.Name Like "*" & filenamefind & ".xls*" Then
указано, что нужно открывать файл, в КОНЦЕ имени которого (кроме расширения) есть название фигуры.
Если переписать эту строку так (добавить звездочку и в конце имени)
Код
If fil.Name Like "*" & filenamefind & "*.xls*" Then

то будет открываться файл, с названием фигуры в любом месте. Но только первый найденный, соответствующий этому условию.
А вот про
Цитата
RagnarLodbrokovitch написал:
а если подходящих файлов - несколько, то выбирал бы случайный из них
тут сложнее. Нужно считать имена всех файлов из нужной папки в массив, проверить их на соответствие маске отбора и уже потом выбрать случайный. Это совсем другая история. Макрос нужно полностью переписать
Согласие есть продукт при полном непротивлении сторон.

Контакты, благодарности
 
См.файл
Согласие есть продукт при полном непротивлении сторон.

Контакты, благодарности
 
Sanja, спасибо за ответ.
Страницы: 1
Наверх