Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 06.10.2009, 21:49   #11
Teslenko_EA
Участник клуба
 
Регистрация: 10.08.2009
Сообщений: 1,796
По умолчанию

читайте выше (2 раза) "....в модуле открываемой книги..."
Евгений.
Teslenko_EA вне форума Ответить с цитированием
Старый 06.10.2009, 22:08   #12
segail
Форумчанин
 
Регистрация: 13.06.2009
Сообщений: 691
По умолчанию

Я вставил код в модуль. Дело в том что открываемая книга изначально была текущая книга, затем после сохранения она будет открываемая. Проше говоря после выполнения всех операций данный год будет как в текущей так и в открываемой книги. В принципе он работает, но на рабочем столе сейчас и текущая книга и открытая. Код который я предоставил не дает быть на рабочем столе двум книгам. Одно из условий кода открывает файл из текущей книге Workbooks.Open (path) вот тут и необходимо открыть форму1

Короче закольцованный процесс. Открытие книге создание сохранение и опять открытие (если необходимо) уже сохраненного. На рабочем столе всегда одна книга, или текущая для создания и сохранения, или открытая для добавления и сохранения.

Код в модуль вставил, начались сбои, противоречия с кодами которые уже есть.

Последний раз редактировалось segail; 06.10.2009 в 22:31.
segail вне форума Ответить с цитированием
Старый 06.10.2009, 22:49   #13
segail
Форумчанин
 
Регистрация: 13.06.2009
Сообщений: 691
По умолчанию

А нельзя в условие в место ячеек вставить имена файлов

Код:
Private Sub Workbook_Open()
    If ' Имя файла Then  ' Если при открытии файла (или открытый файл), имя файла...
        UserForm1.Show
    Else
    End If
End Sub

Последний раз редактировалось segail; 06.10.2009 в 23:00.
segail вне форума Ответить с цитированием
Старый 07.10.2009, 14:21   #14
Teslenko_EA
Участник клуба
 
Регистрация: 10.08.2009
Сообщений: 1,796
По умолчанию

Здравствуйте segail.
"...вставить имена файлов..." - такая конструкция будет неработоспособна, ведь If проверяет только истинность выражения (!), а какое логическое состояние у текста?
Евгений.
Teslenko_EA вне форума Ответить с цитированием
Старый 07.10.2009, 18:22   #15
segail
Форумчанин
 
Регистрация: 13.06.2009
Сообщений: 691
По умолчанию

Цитата:
Сообщение от Teslenko_EA Посмотреть сообщение
Здравствуйте segail.
"...вставить имена файлов..." - такая конструкция будет неработоспособна, ведь If проверяет только истинность выражения (!), а какое логическое состояние у текста?
Евгений.
Здравствуйте.
А если например происходит открытие файла с директории Мои документы\ с папки \UserForm3.Caption имя файла \ComboBox_Marka.Text & ".xls"
После открытие данного файла открывается Форма1 в данном файле.
Возможно по этим данным создать код в модули книги в виде условия или как то по другому?
segail вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Закрыть папку Kreadlling Общие вопросы C/C++ 1 08.09.2009 18:24
открыть книгу через vba ruavia3 Microsoft Office Excel 2 31.07.2009 16:39
Диалоги открыть/закрыть файл Altera Операционные системы общие вопросы 3 03.12.2008 01:18
Открыть кнопкой книгу по запросу имени! gavs Microsoft Office Excel 7 30.08.2008 18:06
закрыть программу Var17 Общие вопросы Delphi 1 20.12.2007 10:06