Как быстро вставить галочки и крестики в ячейки?

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

Вставка галочек и крестиков в ячейки с помощью символьного сочетания

Вставка галочек и крестиков в ячейки с помощью кода VBA

Вставка галочек и крестиков в ячейки с помощью символьного сочетания

Чтобы быстро вставить галочки и крестики, сочетание букв «a» и «r» могут помочь. Пожалуйста, сделайте следующее:

1. Выберите столбцы ячеек, куда вы хотите вставить галочки и крестики, затем выберите шрифт Webdings на вкладке Главная, см. скриншот:

2. Теперь, когда вы вводите букву «a» в ячейку, она превратится в галочку, а если введете букву «r», то получите крестик, см. скриншот:

Вставка галочек и крестиков в ячейки с помощью кода VBA

Вот еще один быстрый и простой способ вставить галочки и крестики всего несколькими кликами.

1. Щелкните правой кнопкой мыши по вкладке листа, куда вы хотите вставить галочки и крестики, затем выберите Просмотр кода из контекстного меню. В открывшемся окне Microsoft Visual Basic for Applications скопируйте и вставьте следующий код в пустой Модуль:

Код VBA: Вставка галочек и крестиков в ячейки:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
'Updateby Extendoffice
    If Target.Cells.Count = 1 Then
        If Not Intersect(Target, Range("B2:B12")) Is Nothing Then
            With Target
                .Font.Name = "Wingdings"
                .Font.Size = 12
                If .FormulaR1C1 = " û " Then
                    .FormulaR1C1 = "ü"
                Else
                    .FormulaR1C1 = " û "
                End If
            End With
        End If
        Cancel = True
    End If
End Sub

Примечание: В приведенном выше коде B2:B12 — это ячейки, куда вы хотите вставить галочки и крестики, вы можете изменить ссылку на ячейку по своему усмотрению.

2. Затем сохраните код и закройте его. Теперь, когда вы дважды щелкаете по ячейке один раз, вставляется крестик, а при втором двойном щелчке отображается галочка, см. скриншот: