MS Excel

Téma: název listu - datum?

Zaslal/a hmik 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ěď >

Koci(27.4.2010 7:50)#001548

Dobrý den,
jednoduché makro pro vás

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

hmik(27.4.2010 9:12)#001550

Moc děkuji, koukám, v jednoduchosti je krása!

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

Poki(27.4.2010 9:54)#001551

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 Subcitovat

hmik(27.4.2010 10:02)#001552

To je geniální, paráda, díky! Škoda, že mě to nenapadlo...citovat

Uživatelské menu

Nejste přihlášen(a)

Formulář Faktura

Formulář Faktura IV

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

Helios iNuvio

Používáte podnikový systém Helios iNuvio? Potřebujete pomoci se správou nebo vyvinout SQL proceduru? Více informací naleznete na stránce Helios iNuvio.