G
Guest
If you select a cell and press F2, or double click it, the cell will go into
edit mode. I am using the following code to insert ticks and crosses in blank
cells:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If ActiveCell = "û" Or Len(ActiveCell) = 0 Then
ActiveCell.Font.Name = "Wingdings"
ActiveCell.Font.Size = "14"
ActiveCell.Font.ColorIndex = 50
ActiveCell = "ü"
Else
If ActiveCell = "ü" Then
ActiveCell.Font.Name = "Wingdings"
ActiveCell.Font.Size = "14"
ActiveCell.Font.Color = vbRed
ActiveCell = "û"
End If
End If
End Sub
After this code has run the cell goes into edit mode, and as the code runs
'BeforeDoubleClick' I can't get out of edit mode in the code. Any ideas?
edit mode. I am using the following code to insert ticks and crosses in blank
cells:
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As
Boolean)
If ActiveCell = "û" Or Len(ActiveCell) = 0 Then
ActiveCell.Font.Name = "Wingdings"
ActiveCell.Font.Size = "14"
ActiveCell.Font.ColorIndex = 50
ActiveCell = "ü"
Else
If ActiveCell = "ü" Then
ActiveCell.Font.Name = "Wingdings"
ActiveCell.Font.Size = "14"
ActiveCell.Font.Color = vbRed
ActiveCell = "û"
End If
End If
End Sub
After this code has run the cell goes into edit mode, and as the code runs
'BeforeDoubleClick' I can't get out of edit mode in the code. Any ideas?