Convert merged cells to centered across
 

I am using Office 2003 on Windows XP.

I need a VBA function I can call that visits every cell in the active sheet
and converts any merged cells to "center across selection" instead.
Obviously, I need it to run quickly.

Can someone please post example code to accomplish this?

Thanks much in advance.

Convert merged cells to centered across
 

Nevermind. I managed to work out the code.

"XP" wrote:

I am using Office 2003 on Windows XP.

I need a VBA function I can call that visits every cell in the active sheet
and converts any merged cells to "center across selection" instead.
Obviously, I need it to run quickly.

Can someone please post example code to accomplish this?

Thanks much in advance.