VBA Excel. Элемент управления OptionButton (переключатель)

Элемент управления пользовательской формы OptionButton для выбора одной опции из группы и передачи результата в VBA Excel. Свойства переключателя, примеры.

Элемент управления OptionButton

UserForm.OptionButton – это элемент управления пользовательской формы, который используется в группе одноименных элементов и предназначен для передачи в код VBA информации о его выборе или невыборе пользователем: False – переключатель не выбран, True – переключатель выбран.

Элемент управления OptionButton

В VBA Excel элемент управления OptionButton состоит из белого кружка с черной точкой (переключатель выбран) или без нее (переключатель не выбран) и надписи. Надпись расположена справа и реагирует на нажатие мышью так же, как и белый кружок.

В отличие от элемента управления CheckBox, только один OptionButton из группы переключателей может иметь значение True. Для разделения разных групп переключателей друг от друга используются элементы управления Frame (рамки). Все переключатели вне рамок являются одной группой.

Элемент управления OptionButton в группе одноименных элементов

Так же, как и элемент управления CheckBox, OptionButton принимает третье состояние при присвоении ему в коде VBA Excel значения Null. Переключатель отображается с серым кружком и серой точкой.

Элементs управления OptionButton со значением Null

См. также

  • Объект OptionButton
  • Примеры Форм Майкрософт
  • Справочник по Microsoft Forms
  • Концепции Microsoft Forms

Поддержка и обратная связь

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

Table of Contents

  1. Introduction
  2. Check the Value of an Option Button
  3. Checking/Unchecking
  4. Assigning a Macro
  5. Determine which Option Button called a Macro
  6. Enabling/Disabling Option Buttons
  7. Editing Label
  8. Adding/Deleting Option Buttons
  9. Selecting an Option Button
  10. Linking to a Cell
  11. Enable 3D Shading with VBA
  12. Prevent Option Button from Printing
  13. Control Option Button Object Positioning
  14. Looping Through All Option Buttons
  15. Closing Thoughts

Check if a OptionButton is Selected or Not Using VBA

Here is the below example. It will show you how to Check if a OptionButton is Selected or Not Using VBA.

Sub Chk_OptBtn_Selection() If OptionButton1.Value = True Then MsgBox “OptionButton has Selected” Else MsgBox “OptionButton has Not Selected” End IfEnd Sub

Difference Between OptionButton and CheckBox Control

Option Button and Checkbox both displays an option. Both are used to turn On or Off options. Difference between is, Option Button is used to select only one selection from multiple selections. Where as CheckBox is used to select multiple selections from the available list.

A Powerful & Multi-purpose Templates for project management. Now seamlessly manage your projects, tasks, meetings, presentations, teams, customers, stakeholders and time. This page describes all the amazing new features and options that come with our premium templates.

PREMIUM TEMPLATES
LIMITED TIME OFFER

Advanced Project Planning Templates

Excel Templates

120+ Project Management Templates Pack

Excel | PowerPoint | Word

ULTIMATE RESOURCE MANAGEMENT TEMPLATE

Excel Template

50+ Essential Project Management Templates

Excel | PowerPoint | Word

Project Portfolio Management Templates

Excel | PowerPoint Templates

50+ Excel Project Management Templates

Excel Templates

Share This Story, Choose Your Platform!

  • VBA Code Explorer
  • VBA Events
  • VBA Methods
  • VBA Properties
  • Application
    • Methods
      • Calculate
      • CalculateFull
      • FindFile
      • Goto
      • Run
      • Wait
    • Properties
      • Calculation
      • Caption
      • DisplayAlerts
      • DisplayFormulaBar
      • DisplayFullScreen
      • DisplayScrollBars
      • DisplayStatusBar
      • EnableEvents
      • Path
      • ScreenUpdating
      • StatusBar
      • UserName
      • WindowState
  • Workbook
    • Methods
      • Activate
      • Close
      • Protect
      • ProtectSharing
      • RefreshAll
      • RejectAllChanges
      • RemoveUser
      • RunAutoMacros
      • Save
      • SaveAs
      • SaveCopyAs
      • SendMail
      • Unprotect
      • UnProtectSharing
  • Worksheet
    • Methods
      • Activate
      • Calculate
      • Copy
      • Delete
      • Move
      • Protect
      • Select
      • Unprotect
  • Range
    • Methods
      • Activate
      • AddComment
      • AdvancedFilter
      • Calculate
      • Clear
      • ClearComments
      • ClearContents
      • ClearFormats
      • ClearHyperlinks
      • Copy
      • CopyFromRecordset
      • Cut
      • Delete
      • Find
      • Insert
      • ListNames
      • Merge
      • PasteSpecial
  • ActiveX Controls
    • CheckBox
      • Properties
        • Alignment
        • BackColor
        • Caption
        • Enabled
        • Height
        • Left
        • TextAlign
        • Top
        • Width
    • ComboBox
    • CommandButton
    • Image
    • Label
    • ListBox
      • Properties
        • BackColor
        • BorderStyle
        • ColumnCount
        • Enabled
        • Height
        • Left
        • MultiSelect
        • TextAlign
        • Top
        • Width
    • OptionButton
      • Caption
    • TextBox
  • Userform
    • CheckBox
    • ComboBox
    • CommandButton
    • Image
    • Label
    • ListBox
    • OptionButton
    • TextBox
    • Tutorial & Examples
  • Projects
    • Calculator using Excel VBA UserForm
    • Data Entry Userform
    • Excel VBA UserForm: Difference Between Two Dates
    • TOC creator in Excel Workbook using VBA
    • VBA List Folders Subfolders in Directory
    • VBA to Append Data from multiple Excel Worksheets into a Single Sheet – By Column
    • VBA to Consolidate data from multiple Excel Worksheets into a Single Sheet – By Row

Download Latest Free PM Templates Templates

120+ Premium Project Management Templates

Looping Through All Option Buttons

This example macro loops through all the Form Control Option Buttons in your active sheet and serves as a nice template for you if you want to take action on radio buttons meeting different conditions. Be sure to read the comments to understand how you can use the VBA macro.

Sub OptionButtonLoop()Dim rb As Shape‘Loop through Option Buttons For Each rb In ActiveSheet.Shapes If rb.Type = msoFormControl Then If rb.FormControlType = xlOptionButton Then If rb.ControlFormat.Value = 1 Then ‘Do something if checked… ElseIf rb.ControlFormat.Value = 4146 Then ‘Do something if not checked… End If End If End If Next rbEnd Sub

Jump to Table of Contents

Рейтинг
( 1 оценка, среднее 5 из 5 )
Загрузка ...