Hi

I'd like to delete all name-objects that contain the caption "Mark_XX". This
takes a very long time when more than 10'000 names of that kind are
available. Is there a faster way than doing it with a loop command?

Tom

Tom,

You have to use a loop to delete the names.

Dim Nm As Name
For Each Nm In ThisWorkbook.Names
If Nm.Name Like "Mark_??" Then
Nm.Delete
End If
Next Nm


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Tom" wrote in message
...
Hi

I'd like to delete all name-objects that contain the caption "Mark_XX".
This
takes a very long time when more than 10'000 names of that kind are
available. Is there a faster way than doing it with a loop command?

Tom

Hi Tom,

I'd like to delete all name-objects that contain the caption "Mark_XX". This
takes a very long time when more than 10'000 names of that kind are
available.


You mean defined names?

Consider downloading the Name manager (by Charles Williams, Matthew Henson and
myself) from:

www.jkp-ads.com

or

www.bmsltd.co.uk/mvp

or from:

www.decisionmodels.com/downloads.htm

Regards,

Jan Karel Pieterse
Excel MVP
www.jkp-ads.com

Chip

Is this the only solution? Is it not possible to use something like this:

Activeworkbook.Remove.Names


Tom




"Chip Pearson" schrieb im Newsbeitrag
...
Tom,

You have to use a loop to delete the names.

Dim Nm As Name
For Each Nm In ThisWorkbook.Names
If Nm.Name Like "Mark_??" Then
Nm.Delete
End If
Next Nm


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Tom" wrote in message
...
Hi

I'd like to delete all name-objects that contain the caption "Mark_XX".
This
takes a very long time when more than 10'000 names of that kind are
available. Is there a faster way than doing it with a loop command?

Tom

Tom,

As far as I know, there is no way to delete all the names in a workbook
without resorting to a loop.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Tom" wrote in message
...
Chip

Is this the only solution? Is it not possible to use something like this:

Activeworkbook.Remove.Names


Tom




"Chip Pearson" schrieb im Newsbeitrag
...
Tom,

You have to use a loop to delete the names.

Dim Nm As Name
For Each Nm In ThisWorkbook.Names
If Nm.Name Like "Mark_??" Then
Nm.Delete
End If
Next Nm


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Tom" wrote in message
...
Hi

I'd like to delete all name-objects that contain the caption
"Mark_XX".
This
takes a very long time when more than 10'000 names of that kind are
available. Is there a faster way than doing it with a loop command?

Tom

You can turn transition on and use sendkeys to send the Lotus menu/keystroke
equivalent to remove all names. I don't recall the keystrokes, but this
has been posted in the group, so should be able to find it in a Google group
search.

--
Regards,
Tom Ogilvy


"Chip Pearson" wrote in message
...
Tom,

As far as I know, there is no way to delete all the names in a workbook
without resorting to a loop.


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Tom" wrote in message
...
Chip

Is this the only solution? Is it not possible to use something like
this:

Activeworkbook.Remove.Names


Tom




"Chip Pearson" schrieb im Newsbeitrag
...
Tom,

You have to use a loop to delete the names.

Dim Nm As Name
For Each Nm In ThisWorkbook.Names
If Nm.Name Like "Mark_??" Then
Nm.Delete
End If
Next Nm


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Tom" wrote in message
...
Hi

I'd like to delete all name-objects that contain the caption
"Mark_XX".
This
takes a very long time when more than 10'000 names of that kind are
available. Is there a faster way than doing it with a loop command?

Tom