powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Boock1
30 сообщений из 30, показаны все 2 страниц
Boock1
    #36264671
GiOH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
При откритии Екселовского файла открывается и файл Boock1. Что надо сделать чтобы Boock1 осавыл в покое?
...
Рейтинг: 0 / 0
Boock1
    #36264800
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Может попросить его?..
...
Рейтинг: 0 / 0
Boock1
    #36266314
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Просьба не поможет. приклеился как банный лист. Сидит в VBA Editore в месте с открывшим файлом и удалить из списка не удаётся :(
...
Рейтинг: 0 / 0
Boock1
    #36266383
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А как он, ни с того ни с сего стал появляться ? Может он в папке автозагрузке там же где и Personal.xls сидит ?
...
Рейтинг: 0 / 0
Boock1
    #36268269
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В окне автозагрузки VBA Editor-а выводится -
Project Visual Basic - PERSONAL.xls [Sheet1 (Code)]

Project - VBA Project

+ VBA Project (Book.xls)
+ VBA Project (Debitori.xls) - Файл основной
+ VBA (Personal.xls)
...
Рейтинг: 0 / 0
Boock1
    #36268366
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Поищите этот Book1 в c:\Program Files\Microsoft Office\Office\Library\
Ну и в Add-Ins ничего лишнего нет?
...
Рейтинг: 0 / 0
Boock1
    #36268381
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
И ключ гляньте, у меня такой:
HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Excel\Options
Там есть Open, Open1, Open2 и т.д.
...
Рейтинг: 0 / 0
Boock1
    #36269003
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
В HKEY_CURRENT_USER\Software\Microsoft\Office\9.0\Excel\Options - Запись с именем Open не нашёл.
Когда открывается новая книга - Открывается только Book1, С новой книгой открываются уже существующие файлы. Кстати в Add-Ins тоже нечего лишнего нет.
Надо как то убрать этот Book1 из VBA Project
...
Рейтинг: 0 / 0
Boock1
    #36269062
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ну давайте сначала попробуем узнать где лежит Ваша чудо книга через FullName...
Код: plaintext
Debug.Print Workbooks("Правильное название ЧудоКниги включая расширение, если установлено").FullName
Ее видно? Ее можна активировать? Попробуйте:
Workbooks("Правильное название ЧудоКниги включая расширение, если установлено").Activate
...
Рейтинг: 0 / 0
Boock1
    #36269312
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Insert-ом ввожу процедуру - Debug.Print Workbooks("Правильное название ЧудоКниги включая расширение, если установлено").FullName (Имя процедуры ms) Запускаю через Tools-Macro_Macroses-msg Ответ отрицательный - Run-Time Error '9', Subsscrpt out of range.
...
Рейтинг: 0 / 0
Boock1
    #36269360
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GioCHInsert-ом ввожу процедуру - Debug.Print Workbooks("Правильное название ЧудоКниги включая расширение, если установлено").FullName (Имя процедуры ms) Запускаю через Tools-Macro_Macroses-msg Ответ отрицательный - Run-Time Error '9', Subsscrpt out of range.
Не понял... Вы вставили в модуль и во внутрь процедуры?
Выложите весь код и не говорите что Вы так Workbooks(" Правильное название ЧудоКниги включая расширение, если установлено ") и вставили...
...
Рейтинг: 0 / 0
Boock1
    #36269479
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Я тоже не понял куда вставить это выражение как отдельную процедуру или как?
...
Рейтинг: 0 / 0
Boock1
    #36269559
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Название книги, которая открывается Book.xls ? Если другое, то Вам нужно заменить название в скобках на правильное...
Вот это добавляете в модуль:
Код: plaintext
1.
2.
Sub FindPath()
Аctivesheet.Сells( 1 , 1 ).value = Workbooks("Book.xls").FullName
End Sub
Далее закрываете редактор. Сервис-Макрос-Макросы... И выбираете макрос FindPath.
В ячейка А1 активного листа должно добавиться строка пути к книге... Если не получится, выложите код...
...
Рейтинг: 0 / 0
Boock1
    #36269782
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сделал как вы писали, но результат -Run_Time Error 424, Object recured, а код я скопировал в модуль с именем FindPath. Посмотрите скриншот
...
Рейтинг: 0 / 0
Boock1
    #36269850
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Не то написали, надо было Book1.xls.
Попробуй поменяй на
Код: plaintext
1.
2.
3.
Sub FindPath()
Debug.Print Workbooks("PERSONAL.xls").FullName
End Sub

если в Immediate Window написало путь (Ctrl+G показать это окно), то затем на

Код: plaintext
1.
2.
3.
Sub FindPath()
Debug.Print Workbooks("Book1.xls").FullName
End Sub
...
Рейтинг: 0 / 0
Boock1
    #36269851
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сорри, код измените. Сделайте вот так:
Код: plaintext
1.
2.
Sub FindPath()
Application.ActiveSheet.Cells( 1 ,  1 ).Value = Workbooks("Здесь название Лишней книги").FullName
End Sub
Не пойму какая книга лишняя... Какая лишняя, ту и пишете в название книги в коде.
С Вашего рисунка понял что лишняя не Book1.xls а другая...
...
Рейтинг: 0 / 0
Boock1
    #36270543
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Я думаю что на оборот книга Book1 лишная. Потому что когда открывается любая уже существующая книга, Book1 не должно присутствовать в VBA Project-e. В понедельник на работе посмотрю что получится.
...
Рейтинг: 0 / 0
Boock1
    #36272424
GioCh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Записал код, с начала с именем Book1, при запуске макроса в А1 C:\Documents and Settings\Administrator\Application Data\Microsoft\Excel\XLSTART\Book1.xls
потом вписал название самой книги -"bbb" - C:\Documents and Settings\Administrator\My Documents\Raboch\bbb.xls
bbb.xls на месте а в C:\Documents and Settings\Administrator-е \Application Data\ отсутствует
...
Рейтинг: 0 / 0
Boock1
    #36272455
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Я думаю что на оборот книга Book1 лишная
C:\Documents and Settings\Administrator\Application Data\Microsoft\Excel\XLSTART\Book1.xls
- так эта книга лишняя или нет? Её мы ищем, или нет? Зачем потом ещё bbb писать? (если потестить, так наверное bbb.xls надо было писать правильно, чтоб в А1 вывело)
...
Рейтинг: 0 / 0
Boock1
    #36272464
GioCh
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Сам Book1.xls открывает - "C:\Program Files\Microsoft Office\OFFICE11\EXCEL.EXE"
...
Рейтинг: 0 / 0
Boock1
    #36272478
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Book1 лежит в C:\Documents and Settings\Administrator\Application Data\Microsoft\Excel\XLSTART\, поэтому и открывается (XLSTART не зря так названа). Если не надо - перемести/удали этот файл.
...
Рейтинг: 0 / 0
Boock1
    #36272485
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Этот bbb.xls для примера, когда открывается любой Екселосский файл то сперва открывается Book1.xls а потом нужный файл, а в bbb.xls записал код для просмотра где лежат эти книги
...
Рейтинг: 0 / 0
Boock1
    #36272502
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Я же писал что в компе в C:\Documents and Settings\Administrator не нашёл Application Data
...
Рейтинг: 0 / 0
Boock1
    #36272546
MaximuS_G
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я уже ничего не понимаю :)... Наверное просто ТС сам не знает, что ему надо...
...
Рейтинг: 0 / 0
Boock1
    #36272561
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
в C:\Documents and Settings\Administrator не нашёл Application Data - отобразить скрытые и системные файлы...
...
Рейтинг: 0 / 0
Boock1
    #36272578
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
К стати, у Book1.xls и у bbb.xls когда смотрю в Tools-Options-General- Default file location Одинаковый C:\Documents and Settings\Administrator\My Documents
Этот Бук прилепился когда я с этого форума для просмотра скачал файл
...
Рейтинг: 0 / 0
Boock1
    #36272614
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Hugo121 а как это сделать поясни плз....
...
Рейтинг: 0 / 0
Boock1
    #36272678
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Всё ОК! из XLSTART убрал Book1. Спасибо всем!!!
...
Рейтинг: 0 / 0
Boock1
    #36272681
Hugo121
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Насчёт hidden files спрашиваешь?
...
Рейтинг: 0 / 0
Boock1
    #36273970
GioCH
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Спасибо Hugo121! Разобрался, всё Ок!
...
Рейтинг: 0 / 0
30 сообщений из 30, показаны все 2 страниц
Форумы / Microsoft Office [игнор отключен] [закрыт для гостей] / Boock1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]