Re: Excel - název listu

From: MilanK <konfera (zavinac)>
Date: Fri, 3 Jul 2009 11:58:07 +0200
> 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. 
Received on 03. 07. 2009, 11:58 CEST

This archive was generated by hypermail 2.2.0 : 03. 07. 2009, 11:58 CEST