Lex4990, спасибо большое, что откликнулись! Но, к сожалению, макрос не сработал.
Возможно я не достаточно четко указала, что именно я хочу получить на выходе. Из рабочего файла я запускаю макрос на открытие другой книги с данными, где и находятся листы, именованные как месяцы: ЯНВ, ФЕВ, МАР, ... НОЯ, ДЕК. Нужно, чтобы эта книга открылась именно на актуальном листе. То есть, сейсас август, значит она должна открыть лист АВГ. А дальше уже идет следующи цикл операций по копированию информации с этого листа.
Вот начало кода, который мне удалось написать:
Код |
---|
Sub OpenF()
Dim a As String 'путь к родительской папке
Dim b As String 'путь к папке, где находится файл
Dim c As String 'имя файла, который нужно открыть
a = Sheets("Адрес").Range("B1") 'указываем значение переменной а, которое является путем к родительской папке
b = Sheets("Адрес").Range("B2") 'указываем значение переменной b, которое является путем к папке, где находится файл
c = Sheets("Адрес").Range("B3") 'указываем значение переменной c, которое является названием файла
Application.Workbooks.Open a & b & c 'открываем файл
End Sub
|