Re: Excel - název listu

Diky to je presne ono :)

Horys

2009/7/3 MilanK <konfera (zavinac) kev.sk>

>  Lze nejak v Excelu automaticky pojmenovat list podle hodnoty bunky?
>> Horys
>>
>
> Jedine makrom. Napriklad takto:
>
>    Sub PomenujList()
>    ObsahBunky = ActiveCell.Value
>    Sheets(ActiveSheet.Name).Name = (ObsahBunky)
>    Exit Sub
>
> Toto makro priradis na tlacitko. Pouzijes tak, ze sa postavis na bunku
> podla ktorej chces nazov a kliknes na tlacitko.
> Keby si chcel pomenovat sheet vzdy podla rovnakej bunky (napr. A2, mozes
> pridat ako prvy riadok (pred ObsahBunky = ...) toto:
>
>    Sub PomenujList()
>    Range("A2").Select
>    ObsahBunky = ActiveCell.Value
>    Sheets(ActiveSheet.Name).Name = (ObsahBunky)
>    Exit Sub
>
> Ak by si chcel pomenovat bunku zlozitejsim nazvom - vo vzore to je ten
> obsah bunky, podtrzitko, nejaky dopredu zadany text a za tym este nejaka ina
> premenna - tak treti riadok bude vyzerat napr.:
>
> Sheets(ActiveSheet.Name).Name = (ObsahBunky + "_" + "qqq" + InaPremenna)
>
> Milan K.
>
> --
> -----------------------------------------------------( reklama )-----
> Kam v lete na vylet? http://www.vitalia.cz/serialy/tip-na-vylet/
> ---------------------------------------------------------------------
> --
> -- Konference: SERVIS ------ Pravidla: http://pravidla.kab.cz/ -- --
> Archiv, instrukce pro odhlaseni: http://internet.nawebu.cz/ -- --
> Konference Internet Info, s.r.o. ----- http://www.iinfo.cz/ --
>