Tryingto ask question when I click on a cell

Ok folks,
I failed well on the code below. I have Cells O14:O23 such that when a user double clicks on one of those cells I want to ask them "Additional Information"

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 MsgBox ActiveCell(13).Row.O, vbOKCancel, "Additional Information"
End Sub

Select all Open in new window

First, I need help correcting the above code. Do I need to use CASE, which I am not good at, yet?