Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: HELP!!! Перебор файлов внутри каталога. Добавлено: 23.06.08 07:45  

Автор вопроса:  ALEX | ICQ: 235006748 
Вобщем проблема такая. Нужно в определенном каталоге перебрать все файлы и изменить значение одной из ячеек. Затем сохранить файлы. Эта ячейка завязана в формуле вычисления. Поэтому при сохранении нужно соответственно чтоб все пересчиталось. Вот.

Ответить

  Ответы Всего ответов: 8  

Номер ответа: 1
Автор ответа:
 ALEX



ICQ: 235006748 

Вопросов: 2
Ответов: 6
 Профиль | | #1 Добавлено: 23.06.08 07:53
В частности интересует как организовать цикл перебора файлов в каталоге.

Ответить

Номер ответа: 2
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #2
Добавлено: 23.06.08 09:44
Тут возникла идея банить за вопросы, подобные #1.

Ответить

Номер ответа: 3
Автор ответа:
 ALEX



ICQ: 235006748 

Вопросов: 2
Ответов: 6
 Профиль | | #3 Добавлено: 23.06.08 10:17
А что не так с этим вопросом ?

Ответить

Номер ответа: 4
Автор ответа:
 Jasmin



Вопросов: 23
Ответов: 417
 Профиль | | #4 Добавлено: 23.06.08 11:59
a=Dir("Диск:\Каталог\маска файлов";)
do while a <> "" then
  <Открытие файла, изменение, пересчет, сохранение, закрытие>
  a=Dir
loop

Ответить

Номер ответа: 5
Автор ответа:
 ALEX



ICQ: 235006748 

Вопросов: 2
Ответов: 6
 Профиль | | #5 Добавлено: 24.06.08 04:55
Спасибо, Jasmin . Все работает. Тока then для этого цикла не нужен. А так все ОК.

Ответить

Номер ответа: 6
Автор ответа:
 ALEX



ICQ: 235006748 

Вопросов: 2
Ответов: 6
 Профиль | | #6 Добавлено: 24.06.08 04:59
Еще вопросик есть. Когда сохраняю измененый файл:
ActiveWorkbook.SaveAs Filename:=a, FileFormat:= _
        xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
        , CreateBackup:=False
то программа каждый раз спрашивает "Заменить этот файл ?". А как сделать чтоб просто сохраняла. Что за параметр за это отвечает ?

Ответить

Номер ответа: 7
Автор ответа:
 ALEX



ICQ: 235006748 

Вопросов: 2
Ответов: 6
 Профиль | | #7 Добавлено: 24.06.08 05:50
Все спасибо . Нашел .

Ответить

Номер ответа: 8
Автор ответа:
 Jasmin



Вопросов: 23
Ответов: 417
 Профиль | | #8 Добавлено: 24.06.08 08:22
Тока then для этого цикла не нужен
Сорри. Это просто кусок от If остался из моего кода. :-)

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам