MS Excel

Téma: Jednoduchý katalog v excelu

Zaslal/a jablicko85 1.7.2014 10:51

Dobrý den,

potřeboval bych pomocí VBA vytvořit jednoduchý katalog v excelu, kde bych v 1 listě měl vyplnovací pole (Jméno, příjmení aj...) a po kliknutí by se tyto údaje ukládaly do řádků pod sebe na nové listě a současně by se pole smazala pro nový záznam, také bych potřeboval automatické generování ID čísla podle pořadí záznamu. Pomohl by mi někdo prosím s makrem? Děkuji moc, posílám soubor

Příloha: zip

20274_katalog.zip (8kB, staženo 41x)

Zaslat odpověď >

AL(1.7.2014 11:23)#020275

Sub Zapis()
Dim cell As Range, srcSh As Worksheet
Set srcSh = Sheets("Zdroj")
Set cell = Sheets("cíl").[a1].End(xlDown).Offset(1, 0)
With cell
.Value = Format(cell.Row - 1, "000")
.NumberFormat = "@"
End With
With srcSh
cell.Offset(0, 1) = .[B1]
cell.Offset(0, 2) = .[B2]
.[B1:B2].ClearContents
End With
Set cell = Nothing
Set srcSh = Nothing
End Sub
Počet záznamov v bunke B9 na liste zdroj vzorcom:=COUNTA(cíl!A:A)-1citovat

jablicko85(2.7.2014 13:29)#020316

Paráádní, díky moccitovat

dream2003(3.7.2014 8:40)#020334

ono by stačilo myslím

http://wall.cz/excel-navod/formular-pro-zadavani-dat

a šlo by to i bez maker nesplňuje sice na jiný list ale to je detailcitovat

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.