I have a large spreadsheet that someone must have attempted to past into
without using text or unicode text options. As a result it added hundreds of
extraneous cell styles. Is there any way to delete multiple cell styles at
once? One at a time will take forever.

Thanks

Sorry... should have mentioned - Excel 2007

"SierraMike" wrote:

I have a large spreadsheet that someone must have attempted to past into
without using text or unicode text options. As a result it added hundreds of
extraneous cell styles. Is there any way to delete multiple cell styles at
once? One at a time will take forever.

Thanks

Never mind. Found another post with the answer.

"SierraMike" wrote:

Sorry... should have mentioned - Excel 2007

"SierraMike" wrote:

I have a large spreadsheet that someone must have attempted to past into
without using text or unicode text options. As a result it added hundreds of
extraneous cell styles. Is there any way to delete multiple cell styles at
once? One at a time will take forever.

Thanks

Never mind. Found the answer in another post.

"SierraMike" wrote:

Sorry... should have mentioned - Excel 2007

"SierraMike" wrote:

I have a large spreadsheet that someone must have attempted to past into
without using text or unicode text options. As a result it added hundreds of
extraneous cell styles. Is there any way to delete multiple cell styles at
once? One at a time will take forever.

Thanks

Please post the message ID for the edification of others.


Gord Dibben MS Excel MVP

On Wed, 23 Sep 2009 12:50:01 -0700, SierraMike
wrote:

Never mind. Found another post with the answer.

"SierraMike" wrote:

Sorry... should have mentioned - Excel 2007

"SierraMike" wrote:

I have a large spreadsheet that someone must have attempted to past into
without using text or unicode text options. As a result it added hundreds of
extraneous cell styles. Is there any way to delete multiple cell styles at
once? One at a time will take forever.

Thanks

For those also struggling with this issue!

We are having lots of poblems with styles in excel at present. It seems
that if you have 2 instances of Excel open and copy data from one to the
other the styles in the copied from sheet get added to the copied to sheet.
That way the overall style count increases.

To get rid of them we use this bit of code


sub removeStyles
dim sty as style
for each sty in activeworkbook.styles
if sty.builtin = false then
sty.delete
end if
next
end sub

this will remove all the non builting Excel styles but we are also finding
that the number classed as builtin is increasing also.

Regards,

Tony

"Gord Dibben" wrote:

Please post the message ID for the edification of others.


Gord Dibben MS Excel MVP

On Wed, 23 Sep 2009 12:50:01 -0700, SierraMike
wrote:

Never mind. Found another post with the answer.

"SierraMike" wrote:

Sorry... should have mentioned - Excel 2007

"SierraMike" wrote:

I have a large spreadsheet that someone must have attempted to past into
without using text or unicode text options. As a result it added hundreds of
extraneous cell styles. Is there any way to delete multiple cell styles at
once? One at a time will take forever.

Thanks