< návrat zpět

MS Excel


Téma: dotaz na pojmenovanou buňku rss

Zaslal/a 25.10.2013 14:29

Dobrý den,

mám li v sešitu pojmenovanou buňku, potřeboval bych se v makru dotázat na jméno buňky. zkoušel jsem

activecell.name

to mi vyplivlo adresu včetně názvu listu.

Zaslat odpověď >

#015912
avatar
a co tak

dim aMeno as String

aMeno = ActiveCellcitovat
#015913
avatar
Tohle mi akorát zjistí obsah buňky, ne její pojmenování.citovat
#015914
Stalker
Něco z toho by mohlo pomoct.
http://www.mrexcel.com/forum/excel-questions/353649-visual-basic-applications-return-name-range-selected-cell.htmlcitovat
icon #015922
eLCHa
Tady je třeba si uvědomit, že buňka může být podmnoožinou více názvů - jak by tedy excel věděl, na který se ptáte.

Jednou možností je následující test
(píšu od boku, bez excelu - takže za případné chyby se omlouvám - dolaďte si ;)
For Each n in ActiveSheet.Names
If Union(n.RefersToRange, ActiveCell).Address = n.RefersToRange.Address Then
Debug.Print n.Name
End If
Next n
citovat
#015999
avatar
Díky,

tohle jsem nerozchodil, ale nakonec jsem objevil jednodušší cestu.

ActiveCell.Name.Namecitovat
icon #016000
eLCHa
Pěkné - kde jste na to přišel? ;)
Sám?

Jinak opravím
místo (funguje jen pro názvy definované v listu
For Each n in ActiveSheet.Names
patří
For Each n In ActiveWorkbook.Names
a jedná se o výpis názvů, pod které buňka spadácitovat

Uživatelské menu

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

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

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

Aktivní diskuse

rozpis zápasů hráčů pro utkání dvou týmů

Anonym • 25.5. 11:54

Hromadné přepsání

elninoslov • 24.5. 10:29

Hromadné přepsání

Nomi • 24.5. 8:32

Index - každý rok začít od 1 Power Query

Alfan • 23.5. 9:17

nepřímý odkaz

elninoslov • 23.5. 0:00

nepřímý odkaz

bordov • 22.5. 18:35

vrácené hodnoty

Anonym • 22.5. 15:46