MS Excel

Ahoj, prosím o pomoc. Jsem uživatelem Excelu již několik let, ale neumím si vyrobit automaticky řazený seznam osob ošetřený pro vkládání dat méně zdatnými uživateli. Několik položek (jméno, příjmení, narození, ulice, město, PSČ ...) by uživatelé vkládali do připravených buněk v jednom listu (např. přes vkládací formulář), ve druhém listu určeném pouze k prohlížení by se objevil celý seznam řazený např. podle příjmení nebo města. Někde ještě by měla být možnost mazání vybrané osoby ze seznamu. Pomůže mi někdo, prosím? Děkuji

Uzamčeno - nelze přidávat nové příspěvky.

Strana: « předchozí 1 2

chey(20.4.2012 22:49)#008205

Tak jsem vyzkoušel, funguje vkládání, třídění, mazání, OK. Moje další tabulka ještě neupravená pro tisk v listu "prohlédni seznam 2" však není odolná proti smazání buněk - tvoří se chyba #ODKAZ! Můžeš se ještě na tohle podívat? Třeba se to musí řešit jinak, netuším jak. Přikládám soubor.

Příloha: zip

8205_kopie-xl0000050.zip (29kB, staženo 23x)

citovat

marjankaj(21.4.2012 0:25)#008206

Veľmi som to nelúštil, niečo som vyhodil, niečo upravil.

Příloha: zip

8206_kopie-xl0000050.zip (30kB, staženo 25x)

citovat

chey(21.4.2012 8:50)#008207

Velice si cením Vaší snahy, ještě bych potřeboval drobné úpravy: pro "misocko" - v prohlížecím seznamu po vymazání řádků a vložení nových zůstává ve sloupci narození nastaven formát jako pouhé číslo, tzn., že se datum narození zobrazuje jako pořadové číslo kalendáře; pro "marjankaj" - výstupní tabulka pro tisk funguje pouze do naplnění, tam, kam vzorce sahají, překročím-li kapacitu, další data nezobrazí. Když vzorce "roztáhnu" (např. do řádku 500), musím dále filtrovat a odlaďovat nulové hodnoty; nešlo by zobrazovat "pouze aktivní" řádky seznamu? Velice děkuji, přikládám testovací soubor.

Příloha: zip

8207_seznamosob.zip (28kB, staženo 22x)

citovat

misocko(21.4.2012 9:13)#008208

opravil som ten format datumu

Příloha: zip

8208_8206_kopie-xl00000501.zip (32kB, staženo 26x)

citovat

chey(21.4.2012 9:37)#008209

Funguje, díky misocko!citovat

chey(23.4.2012 23:31)#008252

marjankaj, podíváš se ještě na můj zápis a soubor z 21.4. 8:50 hod.? Děkujicitovat

marjankaj(24.4.2012 1:14)#008253

No neviem, čo by som mal k tomu povedať.
Ja by som možno nesortoval prvý stĺpec a dal by som tam niečo takéto.
Alebo
Range(Cells(2,2),Cells(9,ActiveSheet.UsedRange.Rows.Count)).Select
Private Sub CommandButton1_Click()
volba = 0
ActiveSheet.Unprotect "Heslo"
If O1 = True Then volba = 2
If O2 = True Then volba = 3
If O3 = True Then volba = 4
If O4 = True Then volba = 5
If O5 = True Then volba = 6
If O6 = True Then volba = 7
If O7 = True Then volba = 8
If O8 = True Then volba = 9

If volba = 0 Then GoTo konec1

Range("b2:i200").Select
Selection.Sort Key1:=Range(Cells(2, volba), Cells(2, volba)), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

konec1:
Cells(1, 1).Select
ActiveSheet.Protect "Heslo"
Unload Me

End Subcitovat

chey(24.4.2012 17:14)#008260

marjankaj: tak jsem ten kód vložil vložil do VBA, ale nahlásilo mi to chybu "compile error" při aktivaci třídění. Problém je v tom, že tento kód tvořil "misocko" a ne já, já makra okoukávám a neumím. Takže se můj problém nevyřešil. Potřeboval bych čistý výstup vložených osob bez prázdných řádků do tabulky v Excelu, s kterou si už poradím při nastavení tisku (doplnění nadpisu, podpisové doložky dolů apod.) třeba do dalšího listu. Misocko naposledy opravoval zobrazování datumů ve sloupci "D" (narození) 21.4. v 9:13 - z tohoto souboru bych vycházel dále, pokud máš ještě chuť to doladit. Moc díky za snahu!citovat

misocko(24.4.2012 21:50)#008261

ahoj

tu mas upravu podla toho ako navrhol "marjankaj", ja osobne netusim o co Vam dvom ide