Гость
Войти | Профиль | Очистить
Целевая тема:
Создать новую тему:
Автор:
Действия ...
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Переименовать форму в Экселе / 23 сообщений из 23, страница 1 из 1
16.12.2014, 13:46
    #38835027
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Не думал, что такая это серьезная проблема....
Как переименовать форму в Экселе?
2007, 7
Спасибо

Stepler (щёлк-щёлк!!)

Код: plaintext
 P.S.Чтобы наступила смерть - необходима жизненная сила !!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 13:53
    #38835039
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 13:55
    #38835041
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Shocker.Pro,

ООООООчень смешно, если бы так - я бы свой вопрос задал в МО.....


КОДОМ НАДА !!!
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:00
    #38835051
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Microsoft Visual Basic for Applications Extensibility

в референсы и работайте через VBE.ActiveVBProject
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:05
    #38835059
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
SteplerКОДОМ НАДА !!!накуя? не могу придумать, зачем это может понадобиться.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:10
    #38835068
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Shocker.Pro,

Извини, может резко тебе ответил...
Дело в том, что хочу автоматом при запуске книги для нескольких форм их зумировать, что для каждой енто не писать:
Код: vbnet
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
Sub ФормаВЭкран()
 'FIO -  имя формы
Kw = FIO.Width / Application.UsableWidth  'коэффициент ширины макета/ширине экрана
Min = IIf(100 / Kw > 400, 400, 100 / Kw)
Max = IIf(100 * Kw < 10, 10, 100 * Kw)
If FIO.Width - Application.UsableWidth > 0 Then
FIO.Zoom = Max
Else
FIO.Zoom = Min
End If
FIO.Width = Application.UsableWidth - 10
 FIO.Height = Application.UsableHeight
 FIO.Show
End Sub
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:13
    #38835072
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
см , что я написал. там не надо тебе переименовывать ничего, просто по компонентам пробежишься в цикле и поменяешь размер
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:16
    #38835075
Shocker.Pro
Shocker.Pro
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Steplerих зумироватькак это связано с переименованием?

ЗЫ: Костя ответил
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:16
    #38835076
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
если же и дальше страдать хочешь , то вот так

Код: vbnet
1.
ThisWorkbook.VBProject.VBComponents("Userform1").Name = "MyNewName"
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:22
    #38835079
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Konst_One,

Посмотрел, но не нашел оператора Rename.....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:27
    #38835087
Konst_One
Konst_One
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
SteplerKonst_One,

Посмотрел, но не нашел оператора Rename.....

=)
ещё раз почитай, что тут понаписали тебе и подумай
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:32
    #38835098
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Konst_One,
Спасибо,
попробовал, пишет что "Индекс вне диапазона".....
счас бьюсь с ентим...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
16.12.2014, 14:52
    #38835131
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Stepler,

интересно то, что переименование прошло, но что за фигня с моим предыдущим сообщением - не пойму...



Однако, всем большое спасибо...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2014, 10:47
    #38835759
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Konst_Oneесли же и дальше страдать хочешь , то вот так

Код: vbnet
1.
ThisWorkbook.VBProject.VBComponents("Userform1").Name = "MyNewName"



Страдаю.... в макросе запоминаю имя Формы, чтобы его после корректировок размера формы восстановить, но на этапе кода выше получается это (см.рисунок):
как уравновесить? Помогите, плз
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2014, 10:51
    #38835765
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
А тебя не учили в школе, что текстовые литералы надо в кавычки брать? я уж не говорю об обязательном определении переменных...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2014, 10:53
    #38835768
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Или у тебя в этом Public ап As Хрензнаетчто лежит неведомая хрень.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2014, 10:57
    #38835773
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Akina,
просто фотка первой попытки....пробовал и с кавычками и не с хренью и с определением переменных = тот же мячик, только в профиль....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2014, 11:12
    #38835790
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Akina,

Вот тебе профиль мячика...
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2014, 11:38
    #38835819
Akina
Akina
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Тебе точно надо форму переименовать? или достаточно изменить её Caption?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2014, 15:56
    #38836134
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
AkinaТебе точно надо форму переименовать? или достаточно изменить её Caption?
а как я через "Caption" смогу изменить параметры формы - все равно надо будет указывать имя формы... 17004325


Так и не понял почему выдает ошибку, пришлось шаманским способом через ячейки листа, где прописываются в цикле названия форм.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
17.12.2014, 16:49
    #38836179
The_Prist
The_Prist
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
Stepler,
попробуй так
Код: vbnet
1.
ThisWorkbook.VBProject.VBComponents(("Userform1")).Name = "MyNewName"


или
Код: vbnet
1.
ThisWorkbook.VBProject.VBComponents(CStr("Userform1")).Name = "MyNewName"



конечно, при условии, что форма с таким именем точно существует в книге с кодом.
А вообще мне не совсем ясно какие-такие параметры надо менять у формы, чтобы для этого пришлось такой изврат сотворять. Почему нельзя завести глобальную переменную, которой назначать ссылку на саму форму? Или для каждой формы, размеры которой необходимо менять назначить для свойства "tag" значение "change" и ориентируясь на него вызывать функцию изменения параметров для формы или нет. В саму функцию передавать ссылку на форму.
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.12.2014, 09:21
    #38836638
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
The_PristStepler,
конечно, при условии, что форма с таким именем точно существует в книге с кодом.

для уточнения имени я делаю проверку список существующих форм...
The_PristStepler,
Или для каждой формы, размеры которой необходимо менять назначить для свойства "tag" значение "change" и ориентируясь на него вызывать функцию изменения параметров для формы или нет. В саму функцию передавать ссылку на форму.
А вот енто интересно, поподробнее можно с тегом....(ни разу с ним не работал) изменить и что? вызывать функцию откуда и чем икакую ссылку?
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
18.12.2014, 09:24
    #38836642
Stepler
Stepler
Участник
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Переименовать форму в Экселе
The_PristStepler,
А вообще мне не совсем ясно какие-такие параметры надо менять у формы...
Мониторы у всех разные, некоторые формы почти в полный экран и могут не поместиться....
...
Рейтинг: 0 / 0
| Ответить | Цитировать | Написать  
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Переименовать форму в Экселе / 23 сообщений из 23, страница 1 из 1
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
созд. / загр.: 409ms
Закрыть
start [/forum/topic.php?fid=60&tablet=1&tid=2156094]:
 0ms
get settings:
 11ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 45ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 61ms
get tp. blocked users:
 2ms
others: 253ms
total:  409ms
x
x
Закрыть


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