VBA msgbox if cells clicked in certain order

[surkdidat]

I need a bit of code if the user clicks on certin cells in order.

For example, if the user clicks on cell A1 then cell B1 and then cell C1 (in that order) - can a message box be displayed please?

 

[Jaafar Tribak]

One way w/o using arrays:

In the Sheet Module:

Option Explicit

Private oPrevRange As Range

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    With [B1]
        If Union(Target, [A1:C1]).Address <> [A1:C1].Address Then
            .ID = ""
        End If
        If Target.Address = [C1].Address Then
            If .ID = [A1].Address Then
                MsgBox "Hello"
            End If
        End If
        If Target.Address = .Address Then
            .ID = oPrevRange.Address
        End If
    End With
    Set oPrevRange = Target
End Sub

Note that the code will also fire when selecting the cells in that order using the keyboard keys. To limit this to mouse clicking , you will need a bit more code.

 

[surkdidat]

Lovely, thank you!