Login
Необъяснимая проблема в VBA Excel
390 просмотров
Перейти к просмотру всей ветки
in Antwort AlexNek 10.07.14 07:49
Сделал маленькую тестовую функцию:
Public Const SheetCfg As String = "cfg"
Sub Test()
Dim Target As Excel.Worksheet
Dim Source As Excel.Worksheet
ClientName = ActiveWorkbook.Name
'куда копировать
Set Target = Workbooks(ClientName).Worksheets(SheetCfg)
'откуда копировать
Set Source = Workbooks(ClientName).Worksheets(SheetCfg)
'Копирование листа
Source.Copy Before:=Target
End Sub
проблемная красная строка.
ошибка Run-Error 1004 метод Copy не может быть выполнен.
т.е. теперь ничего не открывается и не закрывается.
просто внутри книги копируется существующий лист.
у меня работает, на том компе нет.
чиню их комп. пока не чинится.
есть идеи?
Public Const SheetCfg As String = "cfg"
Sub Test()
Dim Target As Excel.Worksheet
Dim Source As Excel.Worksheet
ClientName = ActiveWorkbook.Name
'куда копировать
Set Target = Workbooks(ClientName).Worksheets(SheetCfg)
'откуда копировать
Set Source = Workbooks(ClientName).Worksheets(SheetCfg)
'Копирование листа
Source.Copy Before:=Target
End Sub
проблемная красная строка.
ошибка Run-Error 1004 метод Copy не может быть выполнен.
т.е. теперь ничего не открывается и не закрывается.
просто внутри книги копируется существующий лист.
у меня работает, на том компе нет.
чиню их комп. пока не чинится.
есть идеи?
Чем дольше тут живу, тем больше убеждаюсь, что одаренность немцев не знает границ.