Как изменить цвет плитки windows 10

Пользовательская форма (формула) в VBA

Видеокурсы по Excel

В сотрудничестве с SEDUO я создал несколько видеокурсов:

  • Как работать с Excel – научитесь эффективно использовать Excel – самый популярный ( рейтинг 97 %, более 13 000 студентов, + 750 положительных отзывов ) – Получить курс
  • MaxiCourse Excel – получите лучшую работу, больше денег, станьте незаменимым ( более 6 часов просмотра, 160 уроков ) – Получить курс
  • G-таблицы. — если не нравится Excel, воспользуйтесь курсом на Google-таблицах

. Пользовательская форма и ее использование в VBA.

Вставить пользовательскую форму

Прежде чем мы начнем работать с элементами управления, нам нужно создать форму, в которую мы сможем их поместить. Вкладка Разработчик — Visual Basic . Меню Вставка — Форма пользователя .

Свойства:

Список основных свойств элемента UserForm. Окно свойств можно открыть с помощью клавиши F4 .

  • (Имя)
  • Цвет фона
  • Цвет границы
  • Стиль границы
  • Подпись
  • Цикл
  • Буфер рисования
  • Включено
  • Шрифт
  • Передний цвет
  • Высота
  • HelpContextID
  • KeepScrollBarsVisible
  • Слева
  • Значок мыши
  • Указатель мыши
  • Изображение
  • Выравнивание изображения
  • PictureSizeMode
  • Разбиение изображения
  • Полосы прокрутки
  • Высота прокрутки
  • Прокрутка влево
  • Вверху прокрутки
  • Ширина прокрутки
  • Специальный эффект
  • StartUpPosition
  • Тег
  • Топ
  • WhatsThisButton
  • Что это за помощь
  • Ширина
  • Масштаб

Имя элемента (можно изменить). Где ты тогда?мы будем обращаться к этому элементу по его уникальному имени. В нашем примере (Имя) — это UserForm1.

Цвет фона

Возвращает или задает цвет фона объекта TextBox.

UserForm1.BackColor = RGB(255, 128, 128)
BackColor = UserForm1.BackColor

Цвет границы

Возвращает или задает цвет границы. Если граница не установлена, изменение цвета не будет отражено.

UserForm1.BorderColor = RGB(254, 127, 127)

Стиль границы

Отменить настройку или изменить настройку границы.

fmBorderStyleNone — 0 — не имеет видимой границы

Примечание игнорируется, если свойство SpecialEffect = none

Подпись

Varcn Text на объекте Label (Описание) или установите его.

UserForm1.Caption = «office.lasakovi.com — Pavel Lasбk»
АктуальныйTextVUserForm = UserForm1.Caption

Цикл

Определяет действие, которое необходимо выполнить, когда пользователь выходит из последнего элемента управления Frame.

  • fmCycleAllForms 0 Циклически переключает элементы управления в форме и элементы управления Frame, которые в данный момент отображаются в форме.
  • fmCycleCurrentForm 2 Циклически переключает элементы управления формы и элементы управления Frame. Форма Frame остается активной до тех пор, пока действие не будет явно перемещено в элемент управления за пределами формы Frame.

UserForm1.Cycle = fmCycleCurrentForm
UserForm1.Cycle = 0

DrawBuffer

Определяет количество пикселей, зарезервированных для внеэкранной памяти при рендеринге кадра. Целое число от 16 000 до 1 048 576, выражающее максимальное количество пикселей, которое может скрыто отображать объект.

Включено

Указывает, может ли элемент управления становиться активным и реагировать на пользовательские события. Или указывает, как в данный момент задано это свойство.

Читайте также:  Как изменить txt на ini windows 10

UserForm1.Enabled = Истина
UserForm1.Enabled = False
EnabledSettings = UserForm1.Enabled

Выход Alt + F4.

Вернуть настройки шрифта или установить необходимые настройки шрифта (размер, тип и т. д.).

Передний цвет

Varcn задает или определяет цвет лицевой стороны объекта, т.е. в нашем случае, какой цвет будет у текста.

UserForm1.ForeColor = RGB(255, 255, 0)

Высота

Вернуть всю формулировку или установить всю.

UserForm1.Height = 28
Высота = UserForm1.Height

Идентификатор контекста справки

Ссылка на справку в формате Microsoft Windows для определенного объекта

Сохранить видимость полос прокрутки

Указывает, должны ли ползунки оставаться видимыми, даже если они не нужны.

  • fmScrollBarsNone 0 Не показывать полосы прокрутки.
  • fmScrollBarsHorizontal 1 Отображение горизонтальной полосы прокрутки.
  • fmScrollBarsVertical 2 Отображение вертикальной полосы прокрутки.
  • fmScrollBarsBoth 3 Отображение горизонтальной и вертикальной полосы прокрутки (настройка по умолчанию).

UserForm1.KeepScrollBarsVisible = fmScrollBarsBoth

Разместите арт-объект с левого края. Или узнайте, как расположен объект.

removeleft = UserForm1.Left
UserForm1.Left = 12

Значок мыши

Добавлены значки для объекта

Указатель мыши

Вернуть тип указателя мыши или установить указатель мыши. Значения:

  • fmMousePointerDefault 0 — стандартный указатель
  • fmMousePointerArrow 1
  • fmMousePointerCross 2
  • fmMousePointerIBeam 3
  • fmMousePointerSizeNESW 6
  • fmMousePointerSizeNS 7
  • fmMousePointerSizeNWSE 8
  • fmMousePointerSizeWE 9
  • fmMousePointerUpArrow 10
  • fmMousePointerПесочные часы 11
  • fmMousePointerNoDrop 12
  • fmMousePointerApp, начиная с версии 13
  • fmMousePointerHelp 14
  • fmMousePointerSizeAll 15
  • fmMousePointerCustom 99

UserForm1.MousePointer = fmMousePointerHelp

Изображение

Установить фоновое изображение.

Примечание. Необходимо ввести правильное имя и изображение-заполнитель.

Выравнивание изображения

Помещает художественное изображение на задний план. Или вернуть набор этого свойства.

  • fmPictureAlignmentTopLeft — 0 — Верхний левый угол.
  • fmPictureAlignmentTopRight — 1 — Верхний правый угол.
  • fmPictureAlignmentCenter — 2 — Центр
  • fmPictureAlignmentBottomLeft — 3 — Левый нижний угол.
  • fmPictureAlignmentBottomRight — 4 — Правый нижний угол.

UserForm1.PictureAlignment = fmPictureAlignmentTopRight

PictureSizeMode

Указывает способ отображения фонового изображения в элементе управления, форме или на странице.

  • fmPictureSizeModeClip — 0 — обрезать часть изображения, выходящую за пределы формы или страницы (значение по умолчанию).
  • fmPictureSizeModeStretch — 1 — растягивает изображение, чтобы заполнить форму или страницу. Этот параметр может искажать изображение в горизонтальном или вертикальном направлении.
  • fmPictureSizeModeZoom — 3 — Увеличить картинку, но не искажать ее ни по горизонтали, ни по вертикали.

Frame1.PictureSizeMode = fmPictureSizeModeStretch

Примечание. Сначала необходимо загрузить изображение.

Разбиение изображения

Позволяет расположить изображение в форме или на странице в виде плитки.

  • Верно: изображение будет многократно отображаться в виде плитки на заднем плане.
  • False — изображение не отображается повторно в фоновом режиме (настройка по умолчанию).

UserForm1.PictureTiling = True

Полосы прокрутки

Указывает, имеет ли элемент управления, форма или страница вертикальную полосу прокрутки, горизонтальную полосу прокрутки или и то, и другое.

  • fmScrollBarsNone — 0 — полосы прокрутки не показывать (по умолчанию).
  • fmScrollBarsHorizontal — 1 — отображать горизонтальноползунок.
  • fmScrollBarsVertical — 2 — Отображать вертикальную полосу прокрутки.
  • fmScrollBarsBoth — 3 — Отображение горизонтальной и вертикальной полос прокрутки.

UserForm1.ScrollBars = fmScrollBarsBoth

Высота прокрутки

Указывает общую площадь в точках, которая может отображаться с помощью ползунков данного элемента управления, формы или страницы.

Прокрутка влево

Задает расстояние в пунктах от левого края видимой формулировки до левого края логической формулировки, страницы или элемента управления. См. ScrollTop.

Вверху прокрутки

Задает расстояние в пунктах от верхнего края видимой формулировки до верхнего края логической формулировки, страницы или элемента управления. Кажется, формула перемещается (если полосы прокрутки включены)

Примечание. При тестировании включите полосы прокрутки и увеличьте область ScrollHeight.

Ширина прокрутки

Указывает общую ширину области в пунктах, которую можно отобразить с помощью ползунков данного элемента управления, формы или страницы.

Читайте также:  Как поменять windows 7 professional на ultimate

Специальный эффект

Возвращает или определяет специальные эффекты объекта.

  • fmSpecialEffectFlat 0
  • fmSpecialEffectRaised 1
  • fmSpecialEffectSunken 2
  • fmSpecialEffectEtched 3
  • fmSpecialEffectBump 6

UserForm1.SpecialEffect = fmSpecialEffectFlat
UserForm1.SpecialEffect = 6
StateSpecialEffect = UserForm1.SpecialEffect

StartUpPosition

Возвращает или устанавливает значение заполнителя пользовательской формы при ее первом отображении.

  • Вручную 0 Настройка компьютера не указана.
  • CenterOwner 1 Центрирует элемент, которому принадлежит пользовательская форма.
  • CenterScreen 2 Центрирует себя в пределах всего экрана.
  • WindowsDefault 3 Он будет расположен в верхнем левом углу экрана.

UserForm1.StartUpPosition = WindowsDefault

Дополнительная информация об объекте.

Поместите объект от верхнего края. Или узнайте, как расположен объект.

placetop = UserForm1.Top
UserForm1.Top = 12

Что это за кнопка

Возвращает логическое значение, которое определяет, появляется ли кнопка «Что это такое» на панели UserForm. Его можно прочитать только на лету.

  • Верно — отображается кнопка «Что это за помощь».
  • False — (по умолчанию) удалена кнопка «Что это за справка».

UserForm1.WhatsThisButton = True

Что это за помощь

Возвращает логическое значение, указывающее, использует ли контекстно-зависимая справка окно справки Windows 95 или главное окно справки. Его можно прочитать только во время работы.

  • True Приложение будет использовать один из методов доступа What’s This, чтобы запустить справку Windows и найти команду, указанную в свойстве WhatsThisHelpID.
  • False (по умолчанию) Приложение использует клавишу F1 для запуска справки Windows и поиска HelpContextID, указанного свойством.

UserForm1.WhatsThisHelp = True

Ширина

Возвращает ширину объекта или устанавливает его высоту.

UserForm1.Width = 110
Ширина = UserForm1.Width

Происходит при изменении значения свойства Zoom (увеличение/увеличение).

Для скачивания

Готовый пример для скачивания: Пользовательская форма — примеры использования

Рисунок — для тестов с формулой.

Контент

Описание свойства объекта UserForm1 закончено 🙂

Статья обновлена: 19.09.2020 11:06

Если

Помог ли этот веб-сайт сэкономить вам время и деньги? Помог ли он решить проблему? Готовы ли вы предоставить символическое вознаграждение за дальнейшее развитие? Выберите форму вознаграждения, которая вам подходит.

Павел Ласбк — автор сайта

Microsoft Office (Word, Excel, Google Sheets , PowerPoint) с 2000 г.(с 2004 года на этом домене) — В 2017 году я получил престижную награду MVP от Microsoft (пока я единственный от ИР в категории Excel). Я также делюсь своими знаниями и опытом онлайн в видеороликах для SEDUO . В компаниях преподаю и консультирую , работаю в МУНИ. Я создаю этот сайт более 15 лет. Существует более 1000 бесплатных инструкций, советов и рекомендаций, включая более 250 различных шаблонов и рабочих книг.

Комментарии

Джон

Добавлено: 18.01.13 13:24

Я не знаю, где лучше всего задать свой вопрос. Frame1.enabled «размывает» все объекты внутри, а не только имя кадра? я думаю

Павел Ласбак

Добавлено: 18.01.13 16:06

Хонзе: Я не знаю об этом. Лично я «затуманиваю» каждый объект отдельно.

Джон

Добавлено: 25.01.13 10:02

Каждый объект отдельно, например так: Dim y As Control For Each y In Frame1.Controls y.Enabled = True Дальше ничего лучше не нашел.

Павел Ласбак

Добавлено: 25.01.13 16:58

To Honza: Я тоже искал и ничего не нашел (понадобилось только один раз за последние несколько лет), я бы сказал, что это нестандартный запрос.

Джон

Добавлено: 28.01.13 15:27

Разве элементы нельзя контролировать в массе, когда они объединены в группу? Но я даже не смог найти название этой группы в окне VBA. Тогда это будет Group1.enabled = false.

Читайте также:  Windows 7 как содержание файла

Карольна

Добавлено: 03.03.14 17:33

Я хотел бы посоветовать, можно ли получить доступ к следующему через код определенной пользовательской формы. в текстовые поля из других пользовательских форм. У меня есть набор связанных пользовательских форм с использованием кнопок «Далее» и «Назад», и мне нужно, чтобы тексты из всех текстовых полей, расположенных на всех пользовательских формах, удалялись только тогда, когда я нажимаю кнопку «Готово» на последнем. Большое спасибо

Добавлено: 12.04.14 14:48

Я хотел бы спросить, можно ли пересечьсвойства пользовательской формы, чтобы установить порядок отдельных окон так же, как я могу изменить порядок элементов (метка, изображение.) в форме? Заранее спасибо.

Пол в Каролину

Добавлено: 14.02.15 17:53

Конечно, можно. В процедуре кнопки Готово вставьте вот так: с userform1 . Текстовое поле1 = «». Textbox2 = «» End with with userform2 . Текстовое поле1 = «». Textbox2 = «» Конец с

Пол в Каролину

Добавлено: 14.02.15 19:49

Где немного прозрачнее

Рекомендую

Добавлено: 16.02.15 07:27

здравствуйте .. помогите пожалуйста с проблемой .. буду создавать приложение в VBA .. у меня есть форма в которой много текстовых полей .. эти текстовые поля должны отображать содержимое ячеек в Sheet2 .. макрос меняет содержимое ячеек Листа 2..при запуске формы..содержимое текстбокса не меняется..нужно как-то узнать..как обновить..(обновить) форму.. чтобы после каждого изменения в ячейке оно сразу отражалось изменением в соответствующем текстовом поле. Я хочу, чтобы пользователь не имел доступа к ячейкам. .сразу после включения приложение сворачивается и можно работать только в формах..это из-за приложения..где разные пользователи имеют доступ с помощью пароля..помогите пожалуйста в конце..я все придумали и написали. .но я так и не знаю как восстановить содержимое тексбокса ..

Пол, рекомендую

Добавлено: 20.02.15 13:45

Здравствуйте, я предполагаю, что вы запускаете макрос, который выполняет операции, которые затем изменяют значения ячеек в вашем листе, например, из данной пользовательской формы. с помощью кнопки (CommandButton). Тогда должно быть достаточно войти в процедуру этой кнопки, или макросы, которые изменяют значения в ячейках, устраивают чтение новых значений и отображение в текстовых полях, например. следующим образом:

В случае, если лист2

отображается до минимизации

Если отображается другой лист, и вы хотите прочитать значения из ячеек листа2

кадрлейн

Добавлено: 05.03.1511:39

привет, я создал расширенную пользовательскую форму Excel. Посмотреть можно: http://adf.ly/138E1W

АннаД

Добавлено: 08.04.15 15:03

Добрый день. Если я спрашиваю банальность, прошу прощения. Я самоучка и работаю в основном только на базе этих сайтов (отлично!). Как мне узнать в VBA, что форма была завершена крестиком, а не кнопкой OK, которую я поставил? Спасибо и желаю вам крепкого здоровья

Милан К

Добавлено: 09.05.15 19:56

Добрый день. У меня такой вопрос. Можно ли в VBA узнать текущий размер формы, приложения и всего экрана? Я понимаю.

Мать

Добавлено: 12.11.15 15:31

Есть ли какая-нибудь команда, чтобы узнать, активна форма пользователя или нет? спасибо

Дж. Питер

Добавлено: 17.08.16 12:08

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

Поделиться с друзьями
ОС советы