VBA to Merge Cells based on Other Column Values

**meystingray** · 03-19-2014, 10:45 AM

Hi - first post to this forum. Now I know that merging cells is usually not a good thing in VBA, but I'm working on a data report that just looks bad unless longer pieces of text can span several cells to minimize column width.

So here's the problem:

I have a column of 1's and 0's in columns E and F, and text in Column G. I want to merge the cells in columns G and H for that specific row if there is a 1 in either the E or F column for that specific row. And I need to do this for a long range...rows 7-5000. Any ways that VBA can do this?

Thanks for the help.

**Solus Rankin** · 03-19-2014, 10:52 AM

Sub meystingray()
Dim l As Long

For l = 7 To 5000
    If Cells(l, 5).Value = 1 Or Cells(l, 6).Value = 1 Then
        Range(Cells(l, 7), Cells(l, 8)).HorizontalAlignment = xlCenterAcrossSelection
    End If
Next l
End Sub

Maybe this is best of both worlds. It centers across the cells without merging.

**meystingray** · 03-19-2014, 11:01 AM

Solus - thanks for the help - but it looks like this is just centering the text in the cell and not across multiple cells. The text is large, but only for a few rows here and there, and I don't want to increase the whole width of the column just for these texts. Does centering across a range act similar to merging?

**Solus Rankin** · 03-19-2014, 11:05 AM

It displays them centered across the cells (for you its centered across G & H, the columns you requested) without changing the cell width, and keeps the cells unmerged.

**meystingray** · 03-19-2014, 11:10 AM

I combined your code with something else and got it to work. Thanks for the help!

VBA to Merge Cells based on Other Column Values

LinkBack

Thread Tools

Rate This Thread

Display

Hybrid View

VBA to Merge Cells based on Other Column Values

Re: VBA to Merge Cells based on Other Column Values

Re: VBA to Merge Cells based on Other Column Values

Re: VBA to Merge Cells based on Other Column Values

Re: VBA to Merge Cells based on Other Column Values

Thread Information

Users Browsing this Thread

Similar Threads

Merge values from column in one cell, based on duplicates in another column

need to merge cells in column B based on data in column A

Merge cells in a column based on cells highlighted in other column

Merge Cells based on an adjacent row of values

Compare values in column and merge cells in adjourning column

Tags for this Thread

Bookmarks

Bookmarks

Posting Permissions