< návrat zpět

MS Excel


Téma: název listu - datum? rss

Zaslal/a 26.4.2010 16:51

Dobrý den,

potřebovala bych prosím poradit, jestli je možné, když mám makro, které mi zkopíruje list "vzor", aby se ten zkopírovaný list vždy vložil na konec (úplně doprava) a jako název listu se zapsalo dnešní datum. Každý den takto přibývá jeden list, tzn. že na konci měsíce jsou v sešitu listy např. od 1.3. až do 31.3.

Předem díky za rady :-)

Zaslat odpověď >

#001548
avatar
Dobrý den,
jednoduché makro pro vás 4

Public Sub PridaniListu()
Dim ws As Worksheet
Set ws = Worksheets.Add(After:=Worksheets(Worksheets.Count))
ws.Name = Date
End Sub

Pouze ho umístěte do údálosti které chcete. Zda to bude na tlačítko, zkratku kláves, či při otevření listu.citovat
#001550
avatar
Moc děkuji, koukám, v jednoduchosti je krása! 2 Nešlo by ještě nějak nadefinovat, aby se list pojmenoval jako datum ve formátu jen bez roku (d.m.) a ne s rokem (d.m.rrrr)?citovat
icon #001551
Poki
uprava jen posledniho radku kodu:
Public Sub PridaniListu()
Dim ws As Worksheet
Set ws = Worksheets.Add(After:=Worksheets(Worksheets.Count))
ws.Name = Format(Date,"d.m.")
End Sub
citovat
#001552
avatar
To je geniální, paráda, díky! Škoda, že mě to nenapadlo...citovat

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

odpocet a storno tl.

PavDD • 28.3. 8:53

odpocet a storno tl.

Začátečník • 26.3. 14:39

odpocet a storno tl.

PavDD • 26.3. 10:22

odpocet a storno tl.

elninoslov • 26.3. 7:50

odpocet a storno tl.

PavDD • 26.3. 7:26

odpocet a storno tl.

elninoslov • 25.3. 22:34

odpocet a storno tl.

Začátečník • 25.3. 15:09