alexsamurai Prizivnik - draftee

Зарегистрирован: 09.01.2009 Сообщения: 1
|
Добавлено: Пт Янв 09, 2009 9:51 pm Заголовок сообщения: Вопрос о циклах |
|
|
Коллеги, добрый день!
Есть таблица сотрудников которым нужна доверенность: фамилия, телефон и т.д.
Есть доверенности на этих сотрудников в формате .xls, которые находятся в папке Х.
Нужно чтобы при нажатии кнопки Excel, проверял столбец, например, А4 считывал фамилию и по этой информации открывал одноименный файл, распечатовал его, сохранял и закрывал. Потом проверял А5, А6 и т.д.
LResult = VBA.Trim(Range("А4"))
ChDir "Х:\Доверенность"
Workbooks.Open Filename:="Х:\Доверенность\" & LResult & ".xls"
ActiveWindow.SelectedSheets.PrintOut Copies:=1
Workbooks(LResult & ".xls").Close savechanges:=True
А на цикле, что то меня заклинило. Подскажите пожалуйста. |
|