Excel - aut. pojmenovat list stejně jako buňku

[Dubák]

Zdravím,
lze v Excel 2007 zařídit, aby se listy sešitu automaticky pojmenovávali podle určené buňky, kterou list obsahuje???

[X]

VBA příkaz (jméno aktivního listu):

ActiveSheet.Name

Rozpitvej to nápovědou, velmi užitečná funkce Excelu a VBA

P.S.: Buňka:

Range("A1")

nebo:

Cells(1, 1)

[Dubák]

nějak tomu nemůžu přijít na zoubek
a také nevím zda si dobře rozumíme, potřebuji aby se list jmenoval stejně jako je hodnota například v buňce A3 a v případě že se hodnota změní, změní se zároveň i jméno listu.

[Dubák]

x: A ty by si mi to makro nenapsal? Prostě potřebuji aby se list jmenoval podle buňky A3.
Prosííím.

[navstevnik]

Kdyz tak pekne prosis, tak v editoru VBA (Alt+F11) vloz do modulu prislusnho listu (v okne Project - VBAProject vyber modul listu) a vloz udalostni proceduru:

Kód: Vybrat vše

Option Explicit

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address <> "$A$3" Then Exit Sub
  ActiveSheet.Name = Range("a3").Value
End Sub

ktera zajisti pri zmene hodnoty v bunce A3 zmenu nazvu listu.

[Dubák]

BOOOOMBAAAAA -
Dííííky moooc. Zvu tě na pivo!!!

// Vlákno označuji za vyřešené. Příště to udělej sám. Díky!
// mike007