Dave Peterson wrote:
Option Explicit
Sub testme()
Dim myRng As Range
Dim myCol As Range
Set myRng = Selection
For Each myCol In myRng.Columns
myCol.Merge
Next myCol
End Sub

Select your range first, then run the macro.


bbelly wrote:

The button "merge across" allows you to pick a group of cells, and
merges them along rows.

I need to pick a group of cells and have them merge in columns.

Perhaps someone has seen such a need, and has a code?

Thanks



Thanks ...

This is the answer to the question I was asking. I'll try it tomorrow.

Specifically, to pick a range, and have 'merge vertically' applied to
the lot, instead of picking two cells one on another, applying merge,
and repeating about 15 times for each affected row set.

Again, thank you