Гость
Целевая тема:
Создать новую тему:
Автор:
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Замена имени активной книги / 6 сообщений из 6, страница 1 из 1
20.04.2007, 21:53
    #34477593
alex281270
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Замена имени активной книги
Помогите ещё разобраться в таком вопросе.1.Мне нужно чтобы я мог менять имя открытой книги в Эксел. Допустим я имею кнопку на форме.Нажимая эту кнопку я меняю имя книги,которую я открыл.Имя берётся из одной из ячеек,допустим А1.В неё вписано какое-нибудь текстовое слово.И вот это слово должно появиться в имени открытой книги.Текст в А1 будет постоянно меняться ,поэтому имена соответственно также будут меняться.Книги потом сохранются уже под новыми именами 2.) дальше мне нужно ,чтобы я нашёл эим книги по их именам. Спасибо.
...
Рейтинг: 0 / 0
21.04.2007, 00:19
    #34477719
White Owl
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Замена имени активной книги
alex281270Мне нужно чтобы я мог менять имя открытой книги в Эксел. Допустим я имею кнопку на форме.Невозможно. В принципе.
Имя книги это имя файла в котором книга была сохранена. Хочешь поменять имя книги - переименуй файл.
...
Рейтинг: 0 / 0
21.04.2007, 13:24
    #34477965
alex281270
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Замена имени активной книги
хорошо.но тогда как мне поменять имя файла при сохранении ? я имею ввиду чтобы мне
его не самому прописывать , а чтобы оно бралось из ячейки
...
Рейтинг: 0 / 0
21.04.2007, 15:33
    #34478062
lena_####
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Замена имени активной книги
alex281270
В этом примере имя для книги берется из ячейки "A1" листа "Лист1". Книга сохраняется в том же каталоге, что и исходная (исходная должна быть хоть раз сохранена). При желании можно добавить валидатор имени и проверку на существование файла с таким именем.
Код: plaintext
1.
2.
3.
4.
Private Sub CommandButton1_Click()
  With ThisWorkbook
    .SaveAs .Path & "\" & .Worksheets("Лист1").Range("A1")
  End With
End Sub
...
Рейтинг: 0 / 0
22.04.2007, 21:34
    #34478963
alex281270
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Замена имени активной книги
Большое спасибо Леночка!!!
...
Рейтинг: 0 / 0
22.04.2007, 21:38
    #34478967
alex281270
Гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Замена имени активной книги
Ну тогда ещё как подключить валидатор имени и проверку...я думаю это будет не лишнее
...
Рейтинг: 0 / 0
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Замена имени активной книги / 6 сообщений из 6, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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