Страницы: 1
RSS
Загрузка данных с переменным именем на новый лист.
 
Добрый день, Буду благодарен, если поможете решить задачу.
Задача в следующем, нужно осуществить загрузку данных из файла csv который находится в папке мои документы, файл который нужно загружать имеет переменное имя и указан в ячейке листа. Возможно ли каким-то образом осуществить загрузку данных на новый лист , меняя в ячейке название и подтягивая таким образом каждый раз новый файл?  
 
Код
Dim WbFile As Workbook
Set WbFile = Workbooks.Open("Путь к вашему файлу" & "\" & Range("C7") & ".csv")
Изменено: asesja - 26.02.2024 22:57:15
 
Это в стандартный модуль.
Скрытый текст

Это в модуль листа Данные.
Код
Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("C7")) Is Nothing Then
        Load_CSV Range("C7").Value, Range("A20")
    End If
End Sub
Страницы: 1
Наверх