|
|
|
Не обычная задача
|
|||
|---|---|---|---|
|
#18+
У меня есть список файлов в Excel около 4 тысяч записей (только имена без расширений). Все эти файлы лежат в одной папке, но примерно 10% процентов отсутствует. Нужно выяснить какие отсутствуют. Помогите с написанием скрипта на Excel. ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.02.2010, 09:57 |
|
||
|
Не обычная задача
|
|||
|---|---|---|---|
|
#18+
Sub rr() Dim Directory As String Dim f As String Dim i As Integer Directory = "e:\VBA_2002\" f = Dir(Directory) Do While f <> "" i = i + 1 Range("a" & i) = f f = Dir() Loop End Sub получение имен всех файлов из папки e:\VBA_2002\ без Вашего примера помочь Вам больше - довольно сложно :) ... |
|||
|
:
Нравится:
Не нравится:
|
|||
| 13.02.2010, 11:01 |
|
||
|
|
start [/forum/topic.php?fid=61&msg=36468239&tid=2178492]: |
0ms |
get settings: |
7ms |
get forum list: |
16ms |
check forum access: |
3ms |
check topic access: |
3ms |
track hit: |
178ms |
get topic data: |
9ms |
get forum data: |
2ms |
get page messages: |
44ms |
get tp. blocked users: |
1ms |
| others: | 235ms |
| total: | 498ms |
| 0 / 0 |
