Detalhes de vba eventos duplo click insere ok determinado range

Saberexcel - o Site das Macros
Este procedimento do Aplicativo Microsoft Excel VBA ao executar um duplo click insere a palavra ["Ok"] em determinado range, neste caso o intervalo de células que será sensibilizado pelo Evento Duplo Click

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
If Not Intersect([B2:B10], Target) Is Nothing Then Target.Value = IIf(Target.Value = "", "ok", "")
Cancel = True
End Sub

Aprenda tudo sobre o aplicativo Microsoft Excel VBA com Saberexcel