Merging Two Cells with VBA

[derrickjp7]

Hey all,

I'm trying to merge two cells using VBA. I have found this bit of code...

Range("A1:A4").MergeCells = True

However this doesn't quite work for me. My named range can populate any part of the spreadsheet. So to say ("A1:A4") or ("E10:E11") doesn't work, I don't really know where the cells will end up until I run my program. To fix this I've tried something like this...

Range("Slot" & SlotNum)("1, 1:1, 2").MergeCells = True

But VBA doesn't like my formatting. I know I can use this format if I want to do something to a single cell like this...

Range("Slot" & SlotNum)(1, 1).Font.FontStyle = "Bold"

Though this format doesn't seem to work for several cells. Any suggestions on what to do?
Thanks!

 

[DanteAmor]

Try this .
For 2 cells, starting in the named range cell and one cell down.

Range("Slot" & SlotNum).Resize(2, 1).Merge

 

[derrickjp7]

Thanks, worked like a charm!

 

[DanteAmor]

I'm glad to help you. Thanks for the feedback.