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

Вход

Регистрация

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

 

= Мир MS Excel/Открыть другой документ Excel - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
Страница 1 из 11
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK 
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Открыть другой документ Excel (Макросы/Sub)
Открыть другой документ Excel
ant6729 Дата: Среда, 31.08.2016, 11:39 | Сообщение № 1
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 244
Репутация: 0 ±
Замечаний: 60% ±

Excel 2010
Раньше открывал документ Excel на рабочем столе макросом из другого документа Excel. Создавал новые документы макросами.

Сейчас создал руками документ на рабочем столе. Написал макрос в другом документе Excel, чтобы его открыть . И данный макрос не видит этот новосозданный документ на рабочем столе, однако успешно продолжает выполнять операции внутри себя самого.

Как вернуть возможность открытия конкретных документов via VBA.

???
 
Ответить
СообщениеРаньше открывал документ Excel на рабочем столе макросом из другого документа Excel. Создавал новые документы макросами.

Сейчас создал руками документ на рабочем столе. Написал макрос в другом документе Excel, чтобы его открыть . И данный макрос не видит этот новосозданный документ на рабочем столе, однако успешно продолжает выполнять операции внутри себя самого.

Как вернуть возможность открытия конкретных документов via VBA.

???

Автор - ant6729
Дата добавления - 31.08.2016 в 11:39
buchlotnik Дата: Среда, 31.08.2016, 11:40 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 2616
Репутация: 746 ±
Замечаний: 0% ±

2010, 2013, 2016 RUS / ENG
ant6729, пример в студию


платная помощь:
ЯД: 410012595572239; WM: 311017577133
buchlotnik@mail.ru
 
Ответить
Сообщениеant6729, пример в студию

Автор - buchlotnik
Дата добавления - 31.08.2016 в 11:40
sboy Дата: Среда, 31.08.2016, 11:58 | Сообщение № 3
Группа: Проверенные
Ранг: Ветеран
Сообщений: 590
Репутация: 155 ±
Замечаний: 0% ±

Excel 2010
не видит этот новосозданный документ

а как Вы его показываете макросу?
пример кода нужен
 
Ответить
Сообщение
не видит этот новосозданный документ

а как Вы его показываете макросу?
пример кода нужен

Автор - sboy
Дата добавления - 31.08.2016 в 11:58
ant6729 Дата: Среда, 31.08.2016, 12:03 | Сообщение № 4
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 244
Репутация: 0 ±
Замечаний: 60% ±

Excel 2010
[vba]
Код


Sub Макрос1()
'
' Макрос1 Макрос
'

'
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "цукцукец"
    Range("C4").Select
    ActiveWorkbook.Save
    ActiveWindow.Close
End Sub

[/vba]

По факту я находился в документе 2, открывал документ 1.
Писал в 1 цукцукец сохранял, закрывал его.
 
Ответить
Сообщение[vba]
Код


Sub Макрос1()
'
' Макрос1 Макрос
'

'
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "цукцукец"
    Range("C4").Select
    ActiveWorkbook.Save
    ActiveWindow.Close
End Sub

[/vba]

По факту я находился в документе 2, открывал документ 1.
Писал в 1 цукцукец сохранял, закрывал его.

Автор - ant6729
Дата добавления - 31.08.2016 в 12:03
ant6729 Дата: Среда, 31.08.2016, 12:05 | Сообщение № 5
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 244
Репутация: 0 ±
Замечаний: 60% ±

Excel 2010
Раньше на другом компе была директория документа.

То есть VBA мог её как-то прописывать в код.

Сейчас то-ли версия Excel другая, то ли компьютер другой.
 
Ответить
СообщениеРаньше на другом компе была директория документа.

То есть VBA мог её как-то прописывать в код.

Сейчас то-ли версия Excel другая, то ли компьютер другой.

Автор - ant6729
Дата добавления - 31.08.2016 в 12:05
sboy Дата: Среда, 31.08.2016, 12:09 | Сообщение № 6
Группа: Проверенные
Ранг: Ветеран
Сообщений: 590
Репутация: 155 ±
Замечаний: 0% ±

Excel 2010
[offtop]мда[/offtop]
этим макросом Вы другой файл никак не показываете... цукцукец будет в активную книгу вноситься
 
Ответить
Сообщение[offtop]мда[/offtop]
этим макросом Вы другой файл никак не показываете... цукцукец будет в активную книгу вноситься

Автор - sboy
Дата добавления - 31.08.2016 в 12:09
ant6729 Дата: Среда, 31.08.2016, 12:19 | Сообщение № 7
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 244
Репутация: 0 ±
Замечаний: 60% ±

Excel 2010
блин, а я думал...
 
Ответить
Сообщениеблин, а я думал...

Автор - ant6729
Дата добавления - 31.08.2016 в 12:19
ant6729 Дата: Среда, 31.08.2016, 12:23 | Сообщение № 8
Группа: Проверенные
Ранг: Форумчанин
Сообщений: 244
Репутация: 0 ±
Замечаний: 60% ±

Excel 2010
[vba]
Код

Workbooks.Add
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "йцукцук"
    Range("B3").Select
    ChDir "C:\Users\1234\Desktop"
    ActiveWorkbook.SaveAs Filename:="C:\Users\1234\Desktop\Книга1.xlsx", _
        FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
    ActiveWindow.Close
    Range("I10").Select

[/vba]

Ладно, пойду другим путём. Буду постоянно создавать новый документ. И туда писать.


Сообщение отредактировал ant6729 - Среда, 31.08.2016, 12:42
 
Ответить
Сообщение[vba]
Код

Workbooks.Add
    Range("A1").Select
    ActiveCell.FormulaR1C1 = "йцукцук"
    Range("B3").Select
    ChDir "C:\Users\1234\Desktop"
    ActiveWorkbook.SaveAs Filename:="C:\Users\1234\Desktop\Книга1.xlsx", _
        FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False
    ActiveWindow.Close
    Range("I10").Select

[/vba]

Ладно, пойду другим путём. Буду постоянно создавать новый документ. И туда писать.

Автор - ant6729
Дата добавления - 31.08.2016 в 12:23
sboy Дата: Среда, 31.08.2016, 14:52 | Сообщение № 9
Группа: Проверенные
Ранг: Ветеран
Сообщений: 590
Репутация: 155 ±
Замечаний: 0% ±

Excel 2010
постоянно создавать новый документ

так если нужно в записывать в уже созданный, то зачем новый?
[vba]
Код

Workbooks.Open("C:\Users\1234\Desktop\Книга1.xlsx").Activate
    Range("A1").FormulaR1C1 = "йцукцук"
    ActiveWorkbook.Save
    ActiveWindow.Close
    Range("I10").Select
[/vba]
 
Ответить
Сообщение
постоянно создавать новый документ

так если нужно в записывать в уже созданный, то зачем новый?
[vba]
Код

Workbooks.Open("C:\Users\1234\Desktop\Книга1.xlsx").Activate
    Range("A1").FormulaR1C1 = "йцукцук"
    ActiveWorkbook.Save
    ActiveWindow.Close
    Range("I10").Select
[/vba]

Автор - sboy
Дата добавления - 31.08.2016 в 14:52
Мир MS Excel » Вопросы и решения » Вопросы по VBA » Открыть другой документ Excel (Макросы/Sub)
Страница 1 из 11
Поиск:

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