|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
23.09.2011, 17:05 | #1 |
Пользователь
Регистрация: 22.09.2011
Сообщений: 33
|
макрос различает .xls и .XLS
есть один макрос
Sub processFolder() Dim fso As Object, file As Object, wb As Workbook, fName As String fName = "D:\_ОПЕР\ОПЕР\" Set fso = CreateObject("scripting.filesystemo bject") Set fso = fso.getfolder(fName) For Each file In fso.Files If file.Name Like "????0?.xls" Then Set wb = Workbooks.Open(file) End If Next End Sub он открывает файлы 408205.xls, 489205.xls но не открывает 459205.XLS, 478207.XLS Странно, разве макрос различает каким регистром написаны буквы расширения файла? |
23.09.2011, 17:08 | #2 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Да, если не позаботиться.
Приём в лоб - перевести оба сравниваемых в один регистр: Код:
webmoney: E265281470651 Z422237915069 R418926282008
|
23.09.2011, 17:12 | #3 |
Участник клуба
Регистрация: 02.05.2010
Сообщений: 1,390
|
option compare text
mailto: kuklp60@gmail.com, ящики для благодарностей:
WM Z206653985942, R334086032478, U238399322728 |
23.09.2011, 17:36 | #4 |
Старожил
Регистрация: 11.05.2010
Сообщений: 5,166
|
Я же написал - в лоб,
А это уже другой приём Но может быть не нужно, чтоб все сравнения в модуле были без учёта регистра?
webmoney: E265281470651 Z422237915069 R418926282008
|
23.09.2011, 18:36 | #5 |
Участник клуба
Регистрация: 02.05.2010
Сообщений: 1,390
|
А кто против? Оба варианта сгодятся.
mailto: kuklp60@gmail.com, ящики для благодарностей:
WM Z206653985942, R334086032478, U238399322728 |
25.09.2011, 10:11 | #6 |
Пользователь
Регистрация: 22.09.2011
Сообщений: 33
|
но когда вводишь в действие обычный макрос который состоит ну допустим из одной строки:
workbooks.open(...troyak.xls) он открывает файл нормально, и в случае когда файл называется troyak.xls, и в том случае когда файл называется troyak.XLS а предыдущий макрос различает регистр. В чём разница? |
25.09.2011, 12:34 | #7 | |
Старожил
Регистрация: 15.05.2008
Сообщений: 2,058
|
Цитата:
или - Оператор Like а что сделать - выше Вам уже ответили.
"Дайте людям рыбы, и вы накормите их на весь день; научите их ловить рыбу - и вы накормите их на всю жизнь"
"Большое спасибо" - Z261597841314, R208907249777, U447361470499 |
|
26.09.2011, 18:16 | #8 | |
Пользователь
Регистрация: 22.09.2011
Сообщений: 33
|
ВИКТОР
Цитата:
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Макрос в эксел или PHP обработчик данных для формата .xls | panashka | Microsoft Office Excel | 2 | 02.11.2009 15:56 |
Как посмотреть макрос в *.xls | Dosugx | Microsoft Office Excel | 6 | 05.10.2009 12:42 |
xls-> xls с измененными полями | falcon-x | Общие вопросы C/C++ | 1 | 22.01.2008 02:25 |
как присвоить значение ячейки R1C1 из 1.xls, допустим какой-нибудь любой ячейке из 2.xls ? | diabloskrk | Microsoft Office Excel | 3 | 08.10.2007 12:27 |