Hi, i have code below but i would only like to select row from columns A:D. i need to merge this row. Thanks
Cells(Rows.Count, 1).End(xlUp).Offset(0, 1).Select With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .MergeCells = True .Font.Bold = True .Font.Name = "Arial" .Font.Size = 11 End With
Hi biznez
You don't need to select but...
Cells(Rows.Count, 1).End(xlUp).Offset(0, 0).Resize(1, 4).Select With Selection .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .MergeCells = True .Font.Bold = True .Font.Name = "Arial" .Font.Size = 11 End With
John
If you have issues with Code I've provided, I appreciate your feedback.
In the event Code provided resolves your issue, please mark your Thread as SOLVED.
If you're satisfied by any members response to your issue please use the star icon at the lower left of their post.
Thanks jaslake
is there an easier way to do this?
Hi biznez
I'm not certain I understand the question...as I indicated, you don't need to select.
With Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Resize(1, 4) .HorizontalAlignment = xlCenter .VerticalAlignment = xlBottom .MergeCells = True .Font.Bold = True .Font.Name = "Arial" .Font.Size = 11 End With
Thanks, i used your approach
You're welcome...glad I could help. Thanks for the Rep.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks