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

Вход

Регистрация

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

 

= Мир MS Excel/Изменить цвет заголовка интерфейса - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Изменить цвет заголовка интерфейса
BeerPetroVa Дата: Вторник, 18.05.2021, 12:14 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Добрый день форумчане!

Ходил, бродил я по форумам, пока не нашел работу администратора Pelena по теме "Изменение кода модуля книги для скрытия не нужных параметров" этого форума.
И задался вопросом, а можно ли поменять цвет интерфейса шапки заголовка всего файла, через VBA при изменение цвета с помощью RGB, в модуле ? Очень интересное задание на мой взгляд)

Заранее спасибо за Ваши конструктивные ответы, дорогие форумчане.

Работу Pelena с той темы прикрепил к описанию.
К сообщению приложен файл: 8391732.xlsm (24.2 Kb)


Сообщение отредактировал BeerPetroVa - Вторник, 18.05.2021, 12:17
 
Ответить
СообщениеДобрый день форумчане!

Ходил, бродил я по форумам, пока не нашел работу администратора Pelena по теме "Изменение кода модуля книги для скрытия не нужных параметров" этого форума.
И задался вопросом, а можно ли поменять цвет интерфейса шапки заголовка всего файла, через VBA при изменение цвета с помощью RGB, в модуле ? Очень интересное задание на мой взгляд)

Заранее спасибо за Ваши конструктивные ответы, дорогие форумчане.

Работу Pelena с той темы прикрепил к описанию.

Автор - BeerPetroVa
Дата добавления - 18.05.2021 в 12:14
BeerPetroVa Дата: Вторник, 18.05.2021, 12:17 | Сообщение № 2
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Если вдруг будет вопрос. Вот именно этого заголовка.
К сообщению приложен файл: 9044612.jpg (1.9 Kb)
 
Ответить
СообщениеЕсли вдруг будет вопрос. Вот именно этого заголовка.

Автор - BeerPetroVa
Дата добавления - 18.05.2021 в 12:17
BeerPetroVa Дата: Вторник, 18.05.2021, 13:25 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Нашел интересных код, может Вам поможет?
[vba]
Код
Dim f
For Each f In CurrentProject.AllForms
On Error Resume Next
DoCmd.OpenForm f.name, acDesign, , , , acHidden
If (Forms(f.name).Header) Then
Forms(f.name).Section(1).BackColor = RGB(53, 153, 57)
End If
if Err.Number<>0 then
'Делаем чего-нибудь, если хотим обработать ошибку
end if
Err.Clear
Next f
[/vba]


Сообщение отредактировал Serge_007 - Вторник, 18.05.2021, 13:34
 
Ответить
СообщениеНашел интересных код, может Вам поможет?
[vba]
Код
Dim f
For Each f In CurrentProject.AllForms
On Error Resume Next
DoCmd.OpenForm f.name, acDesign, , , , acHidden
If (Forms(f.name).Header) Then
Forms(f.name).Section(1).BackColor = RGB(53, 153, 57)
End If
if Err.Number<>0 then
'Делаем чего-нибудь, если хотим обработать ошибку
end if
Err.Clear
Next f
[/vba]

Автор - BeerPetroVa
Дата добавления - 18.05.2021 в 13:25
BeerPetroVa Дата: Вторник, 18.05.2021, 21:33 | Сообщение № 4
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Вот день и прошёл, а ответа никакого нет и нет) Интересно сколько понадобиться времени, чтобы хоть один человек написал сообщение?))
На данный момент посмотрело данную тему 45 человек раз)))
 
Ответить
СообщениеВот день и прошёл, а ответа никакого нет и нет) Интересно сколько понадобиться времени, чтобы хоть один человек написал сообщение?))
На данный момент посмотрело данную тему 45 человек раз)))

Автор - BeerPetroVa
Дата добавления - 18.05.2021 в 21:33
Pelena Дата: Вторник, 18.05.2021, 22:09 | Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 19404
Репутация: 4555 ±
Замечаний: ±

Excel 365 & Mac Excel
Ну, давайте я напишу)
Насколько я знаю, цвет строки заголовка определяется выбранной темой оформления. Сомневаюсь (могу ошибаться), что изменить его можно макросом.
Можно узнать, зачем это Вам?


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеНу, давайте я напишу)
Насколько я знаю, цвет строки заголовка определяется выбранной темой оформления. Сомневаюсь (могу ошибаться), что изменить его можно макросом.
Можно узнать, зачем это Вам?

Автор - Pelena
Дата добавления - 18.05.2021 в 22:09
bmv98rus Дата: Вторник, 18.05.2021, 22:31 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4115
Репутация: 769 ±
Замечаний: 0% ±

Excel 2013/2016
Лучше я напишу. Лен а чего это 4 сообщения с бредом в одной теме от автора , подряд, в течении одного дня - и норм?

а можно ли поменять цвет интерфейса шапки заголовка всего файла,
а вы думаете кому-то хочется тратить время назадачу не имеющую практического смысла?


Замечательный Временно просто медведь , процентов на 20.
 
Ответить
СообщениеЛучше я напишу. Лен а чего это 4 сообщения с бредом в одной теме от автора , подряд, в течении одного дня - и норм?

а можно ли поменять цвет интерфейса шапки заголовка всего файла,
а вы думаете кому-то хочется тратить время назадачу не имеющую практического смысла?

Автор - bmv98rus
Дата добавления - 18.05.2021 в 22:31
Pelena Дата: Вторник, 18.05.2021, 22:42 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 19404
Репутация: 4555 ±
Замечаний: ±

Excel 365 & Mac Excel
4 сообщения с бредом
не поняла, что тебя так возмутило?


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
4 сообщения с бредом
не поняла, что тебя так возмутило?

Автор - Pelena
Дата добавления - 18.05.2021 в 22:42
BeerPetroVa Дата: Вторник, 18.05.2021, 22:56 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Pelena, Да, конечно я Вам расскажу.
На самом деле всё очень просто, хотел сделать книгу с листами и строкой заголовка одного цвета и корректировать далее её с помощью RGB показателей цвета.
Наткнулся на Вашу работу как Вы убрали все панели и меня заинтересовало, а возможно убрать этот не красивый серый заголовок? и сделать что то более радующего глаз.
 
Ответить
СообщениеPelena, Да, конечно я Вам расскажу.
На самом деле всё очень просто, хотел сделать книгу с листами и строкой заголовка одного цвета и корректировать далее её с помощью RGB показателей цвета.
Наткнулся на Вашу работу как Вы убрали все панели и меня заинтересовало, а возможно убрать этот не красивый серый заголовок? и сделать что то более радующего глаз.

Автор - BeerPetroVa
Дата добавления - 18.05.2021 в 22:56
BeerPetroVa Дата: Вторник, 18.05.2021, 23:01 | Сообщение № 9
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Pelena, Честно, поискал ответ по форуму, ничего не нашёл, но за то заметил, что Вы очень хороший человек и хороший специалист, так как очень много отвечаете и помогаете людям!
 
Ответить
СообщениеPelena, Честно, поискал ответ по форуму, ничего не нашёл, но за то заметил, что Вы очень хороший человек и хороший специалист, так как очень много отвечаете и помогаете людям!

Автор - BeerPetroVa
Дата добавления - 18.05.2021 в 23:01
BeerPetroVa Дата: Вторник, 18.05.2021, 23:11 | Сообщение № 10
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

bmv98rus, Извините, если как то Вас огорчил и не предоставил Вам практический смысл!
 
Ответить
Сообщениеbmv98rus, Извините, если как то Вас огорчил и не предоставил Вам практический смысл!

Автор - BeerPetroVa
Дата добавления - 18.05.2021 в 23:11
bmv98rus Дата: Среда, 19.05.2021, 07:13 | Сообщение № 11
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4115
Репутация: 769 ±
Замечаний: 0% ±

Excel 2013/2016
так возмутил
все можно было в первом написать дополнив.
BeerPetroVa, как уже написала Pelena, тема оформления отвечает за это и если ранее можно было изголяться , то сейчас оставили 3 , 4. на этом все.



Замечательный Временно просто медведь , процентов на 20.
 
Ответить
Сообщение
так возмутил
все можно было в первом написать дополнив.
BeerPetroVa, как уже написала Pelena, тема оформления отвечает за это и если ранее можно было изголяться , то сейчас оставили 3 , 4. на этом все.


Автор - bmv98rus
Дата добавления - 19.05.2021 в 07:13
BeerPetroVa Дата: Среда, 19.05.2021, 08:58 | Сообщение № 12
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

bmv98rus, Добрый день.

Вы хотите сказать что тему оформления можно только изменить на стандартные варианты обеспечения Excel?
А именно, серый, черный, зеленый, никакого другого цвета и регулировки с помощью исправления кода параметров RGB нельзя? Правильно Вас понял?
 
Ответить
Сообщениеbmv98rus, Добрый день.

Вы хотите сказать что тему оформления можно только изменить на стандартные варианты обеспечения Excel?
А именно, серый, черный, зеленый, никакого другого цвета и регулировки с помощью исправления кода параметров RGB нельзя? Правильно Вас понял?

Автор - BeerPetroVa
Дата добавления - 19.05.2021 в 08:58
Serge_007 Дата: Среда, 19.05.2021, 09:37 | Сообщение № 13
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
BeerPetroVa, здравствуйте

тему оформления можно только изменить на стандартные варианты обеспечения Excel?
Думаю да
По крайней мере, никогда и нигде не встречал решения, позволяющего добавить пользовательские темы оформления


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеBeerPetroVa, здравствуйте

тему оформления можно только изменить на стандартные варианты обеспечения Excel?
Думаю да
По крайней мере, никогда и нигде не встречал решения, позволяющего добавить пользовательские темы оформления

Автор - Serge_007
Дата добавления - 19.05.2021 в 09:37
BeerPetroVa Дата: Среда, 19.05.2021, 12:42 | Сообщение № 14
Группа: Пользователи
Ранг: Новичок
Сообщений: 14
Репутация: 0 ±
Замечаний: 0% ±

Serge_007, Здравствуйте,
вот в чем вопрос. решения данной темы, я лично сам не встречал, поэтому стало интересно возможно ли вообще это воплотить в жизнь ?
Меня лично вдохновила работа Pelena и стало интересно.
Сам облазил кучу форумов и сайтов, только единственный код нашел на Microsoft Access третье сообщение!
 
Ответить
СообщениеSerge_007, Здравствуйте,
вот в чем вопрос. решения данной темы, я лично сам не встречал, поэтому стало интересно возможно ли вообще это воплотить в жизнь ?
Меня лично вдохновила работа Pelena и стало интересно.
Сам облазил кучу форумов и сайтов, только единственный код нашел на Microsoft Access третье сообщение!

Автор - BeerPetroVa
Дата добавления - 19.05.2021 в 12:42
  • Страница 1 из 1
  • 1
Поиск:

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