Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Run-time error 1004 при изменении пути к файлу - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Run-time error 1004 при изменении пути к файлу (Макросы/Sub)
Run-time error 1004 при изменении пути к файлу
ArkaIIIa Дата: Вторник, 30.09.2014, 10:16 | Сообщение № 1
Группа: Проверенные
Ранг: Ветеран
Сообщений: 894
Репутация: 115 ±
Замечаний: 0% ±

2010
Добрый день, господа!

Помогите, пожалуйста, разобраться в чем проблема.
Вот часть макроса, в которой возникает ошибка:
[vba]
Код
Sub Update_()
Workbooks("Тест123.xlsm").Activate
     Path_1 = "F:\! Папка1\Папка2\Папка3\Папка4\REPORT.xls"
     iFileDateTime_1 = FileDateTime(Path_1)
     Workbooks("Тест123.xlsm").Worksheets("РМ").Cells(27, 11) = iFileDateTime_1
     Workbooks("Тест123.xlsm").UpdateLink Name:= _
         "F:\! Папка1\Папка2\Папка3\Папка4\REPORT", Type:=xlExcelLinks
Workbooks("Тест123.xlsm").Activate
Dim R As Range
Dim rngX As Range
Dim X As Integer
[/vba]
При изменении пути с F:\! Папка1\Папка2\Папка3\Папка4\REPORT.xls, на полный путь где лежит файл: \\go.abc.ru\Папка\Папка\Папка\! Папка1\Папка2\Папка3\Папка4\REPORT.xls
т.е.
[vba]
Код
Sub Update_()
Workbooks("Тест123.xlsm").Activate
     Path_1 = "\\go.abc.ru\Папка\Папка\Папка\! Папка1\Папка2\Папка3\Папка4\REPORT.xls"
     iFileDateTime_1 = FileDateTime(Path_1)
     Workbooks("Тест123.xlsm").Worksheets("РМ").Cells(27, 11) = iFileDateTime_1
     Workbooks("Тест123.xlsm").UpdateLink Name:= _
         "\\go.abc.ru\Папка\Папка\Папка\! Папка1\Папка2\Папка3\Папка4\REPORT.xls", Type:=xlExcelLinks
Workbooks("Тест123.xlsm").Activate
Dim R As Range
Dim rngX As Range
Dim X As Integer
[/vba]
выползает ошибка: Run-time error 1004 Method UpdateLink of object _Workbook failed
Видимо, путь c полным адресом нужно указывать как-то иначе?

Файл не прикладываю - очень массивный и связан с другими сетевыми файлами, а вопрос, судя по всему, сугубо теоретический.
 
Ответить
СообщениеДобрый день, господа!

Помогите, пожалуйста, разобраться в чем проблема.
Вот часть макроса, в которой возникает ошибка:
[vba]
Код
Sub Update_()
Workbooks("Тест123.xlsm").Activate
     Path_1 = "F:\! Папка1\Папка2\Папка3\Папка4\REPORT.xls"
     iFileDateTime_1 = FileDateTime(Path_1)
     Workbooks("Тест123.xlsm").Worksheets("РМ").Cells(27, 11) = iFileDateTime_1
     Workbooks("Тест123.xlsm").UpdateLink Name:= _
         "F:\! Папка1\Папка2\Папка3\Папка4\REPORT", Type:=xlExcelLinks
Workbooks("Тест123.xlsm").Activate
Dim R As Range
Dim rngX As Range
Dim X As Integer
[/vba]
При изменении пути с F:\! Папка1\Папка2\Папка3\Папка4\REPORT.xls, на полный путь где лежит файл: \\go.abc.ru\Папка\Папка\Папка\! Папка1\Папка2\Папка3\Папка4\REPORT.xls
т.е.
[vba]
Код
Sub Update_()
Workbooks("Тест123.xlsm").Activate
     Path_1 = "\\go.abc.ru\Папка\Папка\Папка\! Папка1\Папка2\Папка3\Папка4\REPORT.xls"
     iFileDateTime_1 = FileDateTime(Path_1)
     Workbooks("Тест123.xlsm").Worksheets("РМ").Cells(27, 11) = iFileDateTime_1
     Workbooks("Тест123.xlsm").UpdateLink Name:= _
         "\\go.abc.ru\Папка\Папка\Папка\! Папка1\Папка2\Папка3\Папка4\REPORT.xls", Type:=xlExcelLinks
Workbooks("Тест123.xlsm").Activate
Dim R As Range
Dim rngX As Range
Dim X As Integer
[/vba]
выползает ошибка: Run-time error 1004 Method UpdateLink of object _Workbook failed
Видимо, путь c полным адресом нужно указывать как-то иначе?

Файл не прикладываю - очень массивный и связан с другими сетевыми файлами, а вопрос, судя по всему, сугубо теоретический.
Автор - ArkaIIIa
Дата добавления - 30.09.2014 в 10:16
ArkaIIIa Дата: Вторник, 30.09.2014, 10:49 | Сообщение № 2
Группа: Проверенные
Ранг: Ветеран
Сообщений: 894
Репутация: 115 ±
Замечаний: 0% ±

2010
Все, нашел где собака порылась. Топ можно крыть. Извиняюсь перед всеми у кого отнял время.
 
Ответить
СообщениеВсе, нашел где собака порылась. Топ можно крыть. Извиняюсь перед всеми у кого отнял время.
Автор - ArkaIIIa
Дата добавления - 30.09.2014 в 10:49
Rioran Дата: Вторник, 30.09.2014, 11:09 | Сообщение № 3
Группа: Авторы
Ранг: Ветеран
Сообщений: 903
Репутация: 290 ±
Замечаний: 0% ±

Excel 2013
ArkaIIIa, привет =)

Раз есть вопрос, то должен быть и ответ =) Отпиши, как решил вопрос - может, кому-то потом полезно будет.

Роман, Москва, voronov_rv@mail.ru
Яндекс-Деньги: 41001312674279
 
Ответить
СообщениеArkaIIIa, привет =)

Раз есть вопрос, то должен быть и ответ =) Отпиши, как решил вопрос - может, кому-то потом полезно будет.
Автор - Rioran
Дата добавления - 30.09.2014 в 11:09
ArkaIIIa Дата: Вторник, 30.09.2014, 11:59 | Сообщение № 4
Группа: Проверенные
Ранг: Ветеран
Сообщений: 894
Репутация: 115 ±
Замечаний: 0% ±

2010
Rioran
Да там глупость банальная.
У меня файл по связям тащил инфу из REPORT.xls в скрытые ячейки, я в макросе путь поменял, а связи обновить забыл (ячейки то скрыты, я про них совсем забыл), потом сидел тупил почему-же макрос не хочет работать.


Сообщение отредактировал ArkaIIIa - Вторник, 30.09.2014, 12:00
 
Ответить
СообщениеRioran
Да там глупость банальная.
У меня файл по связям тащил инфу из REPORT.xls в скрытые ячейки, я в макросе путь поменял, а связи обновить забыл (ячейки то скрыты, я про них совсем забыл), потом сидел тупил почему-же макрос не хочет работать.
Автор - ArkaIIIa
Дата добавления - 30.09.2014 в 11:59
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Run-time error 1004 при изменении пути к файлу (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!