Новости:

Новая редакция правил форума: 2.4. Если вопрос или ответ содержится во вложенном файле, все-равно кратко описывайте в сообщении вопрос или суть решения. Это необходимо, чтобы тему можно было найти через поиск.

Главное меню

Макрос для ввода данных одновременно в несколько рабочих книг

Автор Tatyana_Arkhipoff, 18.03.2012, 22:39

« назад - далее »

Tatyana_Arkhipoff

Задача такая: есть папка "Индекс" с 25-ю файлами (все с разным названием). Требуется проставить определенную дату в ячейке С1 листа 1 (не текущую!) в каждой из рабочих книг.
Получилось только так:
Sub Индекс()

    Sheets("Лист1").Select
    Range("C1").Select
    ActiveCell.FormulaR1C1 = "3/15/2012"
   
End Sub

Подскажите, как прописать такой запрос ко всем файлам данной папки?(возможно ли это вообще?)
Спасибо заранее!!! ::)

sergo44441

Попробуйте такой вариант, поместите файлик в папку с файликами и нажмите на кнопку в этом файле на листе управление
Не торопись, и все успеешь намного быстрее