Retrive adress from selection

[most]

Can anybody explain why this happens?
With the third case I expect the result to be
$A$12
$B$13
not
$A$12
$A$13

Sub Sel()
  Debug.Print "C:" & Selection.Count
  Debug.Print Selection(1).Address
  Debug.Print Selection(2).Address
  Debug.Print "---"
End Sub

The grey areas are the cells I've been selected with Ctrl-button.

 

[Peter_SSs]

Can anybody explain why this happens?

Yes, because your selection in the 3rd instance comprises 2 distinct areas.
Imagine if you had selected A12, A14, B13 and J1. Which cell would logically be referenced by Selection(1) or Selection(2)?

You could try

Sub Sel()
  Debug.Print "C:" & Selection.Count
  Debug.Print Selection.Areas(1).Cells(1).Address
  If Intersect(Selection, Selection.Cells(2)) Is Nothing Then
    Debug.Print Selection.Areas(2).Cells(1).Address
  Else
    Debug.Print Selection.Cells(2).Address
  End If
  Debug.Print "---"
End Sub

 

[most]

Thanks!