Hi guys and a Happy New Year!
Please give me a helping hand in this matter:
Public Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("A7")) Is Nothing Then
Dim lastc As String, j, firstc As String, sstep
Dim i As Long, s As Long, e As Long
firstc =...