Ciao a tutti
Ho continuato a provare con "Prova_a_Cancellare_NamedRanges.ods"
senza venire a capo di niente, fino a che, cancellando un nome alla volta
senza usare For Next, dopo averlo ricaricato per l' ennesima volta ho
cancellato uno dei range "minori" come per incanto a fatto in un attimo,
a questo punto ne ho cancellato un' altro, idem
Per ultimo ho cancellato il famigerato elenco_prezzi, qui ci sono voluti i
soliti 18 secondi
Pensando che fosse la cancellazione di elenco_prezzi a incasinare tutto
l' ho cancellato dal menu e poi ho dato il run alla macro per cancellare gli
altri nomi, stessa menata non finiva più
A questo punto ho corretto la macro per iniziare dall' ultimo, come sotto
sub Elimina_Tutti_NomiArea
oDoc = ThisComponent
oAree=oDoc.NamedRanges'
For i = 0 to oAree.getCount() - 1
a = oAree.getCount()
oNomiArea = oAree.ElementNames(a - 1)
oAree. RemoveByName(oNomiArea)
next
End Sub
Magia! Ci sono voluti circa 23 secondi
Domanda:
Perchè una volta cancellato elenco_prezzi per gli altri nomi ci vuole
un' eternità?
Che siano tutte quelle celle concatenate ad un nome non più esistente a
rallentare tutto il processo?
Meditate gente, meditate
Io per quanto abbia meditato non sono riuscito a capirci niente
Ciao Lido
---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
