In Excel if a user selects multiple non-contiguous columns like "B" and "D", this code
creates rng with the address of $B:$B,$D:$D. How can I adjust that code so that the address produced is $B2:$B2,$D2:$D2 or $B2,$D2 ?Code:Dim rng As Range Dim r As Range Dim rngCol As Range For Each rngCol In Selection.Columns Set r = Intersect(Selection, rngCol) If r.Address = rngCol.EntireColumn.Address Then If rng Is Nothing Then Set rng = r Else Set rng = Union(rng, r) End If End If Next