Stránka 1 z 1

zmena nazvu listu

Napsal: 01 črc 2013 17:05
od ironm
zdravim,

chci se zeptat, jde zmenit nazev listu v souboru excel podle nazvu v bunce?

napr. do bunky A1 napisu nazev a ten mi automaticky zmeni nazev listu.

Dekuji

Re: zmena nazvu listu

Napsal: 01 črc 2013 18:24
od cmuch
Ano lze.

Buď toto makro vložit do modulu příslušného listu

Kód: Vybrat vše

Private Sub Worksheet_Change(ByVal Target As Range)

    ActiveSheet.Name = Range("A1").Text
End Sub

nebo aby to platilo pro celý sešit tak toto vložit do modulu ThisWorkbook

Kód: Vybrat vše

Private Sub Workbook_SheetChange(ByVal Sh As Object, ByVal Target As Range)
 
  ActiveSheet.Name = Range("A1").Text
End Sub

Re: zmena nazvu listu

Napsal: 01 črc 2013 18:27
od mmmartin

Re: zmena nazvu listu  Vyřešeno

Napsal: 01 črc 2013 19:52
od ironm
diky moc