• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

MS Excel

Téma: přejmenovat list

Zaslal/a Honza 22.1.2010 8:01

Ahoj,
potřebuji poradit s přejmenováním nového listu
mám úvodním listu vložené tlačítko,

Private Sub CommandButton1_Click()
Sheets("faktura_vzor").Copy before:=Sheets("pohledavky")
End Sub

které mi vkládá kopii listu vždy před list pohledavky,
potřeboval bych aby se mi při vkládání listu zároveň nový list přejmenoval na faktura_001, faktura_002,....

seznam listu by pak vypadal následovně:
uvod, faktura_vzor, faktura_001, faktura_002,....,pohledavky

Dekuju za rady

Zaslat odpověď >

---

Poki(22.1.2010 9:19)#001101

ahoj,
stačí přidat jeden radek do kodu tlacitka tak, ze to cele bude vypadat takto:
Private Sub CommandButton1_Click()
Sheets("faktura_vzor").Copy before:=Sheets("pohledavky")
Sheets(Sheets.Count - 1).Name = "faktura_00" & Sheets.Count - 2
End Sub
citovat

Honza(22.1.2010 16:31)#001112

Ahoj,
děkuju mockrát, funguje bezvadněcitovat

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

On-line nástroje

Formulář Faktura

Aktivní diskuse