< návrat zpět

MS Excel


Téma: Duplicitní názvy oblastí rss

Zaslal/a 25.4.2023 10:59

Ahoj, mám excelový soubor pro správu citlivých dat, v němž používám neškodný vzorek vymyšlených osob.
Při uvolnění nové verze si do něj pak uživatel ručně nakopíruje "citlivé" listy z předchozí ostré verze - pomocí volby Přesunout nebo zkopírovat...
Jenomže s každým přikopírovaným listem dochází k duplikování pojmenovaných oblastí (i těch oblastí, které leží na jiných listech, než na tom kopírovaném). No a pak mu kolabují procedury, které pracují s pojmenovanými Range.

Co se s tím dá dělat? Dají se ty listy nakopírovat nějak jinak bez tohoto duplikačního efektu? Anebo třeba nějaký jiný trik jak procedurou ty blbé oblasti smazat?

Předem dík

Zaslat odpověď >

#054864
avatar
Předpokládám, že potřebujete pracovat s těmi oblasti, které jsou právě na těch nově kopírovaných listech (takže nelze je nekopírovat).
Doporučoval bych v kodu nespolehat na pojmenované oblasti, ale tvořit oblasti dynamicky v kodu podle potřeby - jinak se z toho nevymotáte.citovat
#054865
avatar
Fór je v tom, že na těch nově kopírovaných listech žádné oblasti (kromě oblasti tisku) nejsou. Přesto se do cílového souboru ze zdrojového překopírují úplně všechny oblasti co jsou v sešitu. Ještě budu testovat zdali se dají ty plevelné oblasti nějak automatizovaně mazat.
Ta myšlenka kódem tvořených dynamických oblastí zní zajímavě, ale zřejmě to přinese nutnost následných sekundárních změn v kódu. No nic, když to nepůjde jinak, tak to prubnu. Každopádně dík za raducitovat
#054866
avatar
Tak jsem nakonec vygooglil kód, kterým se "plevelné" oblasti smažou:
Sub DeleteAllSheetNames()
Dim n As Name
For Each n In ThisWorkbook.Names
If Not n.Parent Is ThisWorkbook Then n.Delete
Next
End Sub

1citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.

On-line nástroje