< návrat zpět

MS Excel


Téma: Seznam - menší rada rss

Zaslal/a 16.12.2009 11:07

Dobrý den,
rád bych se zeptal na několik věci ohledně seznamu (rolovacího menu). Mám vytovřený takovýto seznam přes Data > ověření > seznam. V tomto seznamu mám přibližně 500 hodnot, které si vybírám.
Je možné nějak nastavit:
1) Aby při rozkliknutí tohot seznamu bylo okno výběru větší? Je tam pouze malé okénko s cca 20 hodnotama a dost těžko se v tom pohybuje.
2) Dá se nějak seznam propojit s posuvníkem, abych mohl zvolit následnou/předchozí hodnotu jedním klikem na šipku nahoru, nebo dolu? 8 Popřípadě makro na tlačítka, která by volila další/předchozí hodnotu od aktuální?

Děkuji za radu

Zaslat odpověď >

icon #000943
Poki
1) seznam pomocí ověření neumožňuje (aspon co vim ja) zvýšit počet zobrazených možností (standardne je 8) - moznost je udelat si vlastni formular, kde lze tento pocest zvysit pomoci vlastnosti: ListRows

2) idealni reseni by byl vlastni formular s naprogramovanymi tlacitky - coz by nebylo nijak zvlast tezke, jen je potreba presne vedet, co to ma delatcitovat
#000944
avatar
Mohu se zeptat, co myslíte tím vlastním formulářem konkrétně? Několik věcí mě okolo formulářů napadlo, ale nic, co by se podobalo náhražce za rozkliknutý seznam.

Ještě jednou děkuji za raducitovat
#000946
Jeza.m
Ahoj, připojuji snad jednoduchý názorný příklad.
Použitý je formulář "Pole se seznamem", odkazující se na Seznam definovaný názvem.

Pro volbu předcházející a následující je použito makro.

S pozdravem
M@
Příloha: zip946_seznam.zip (8kB, staženo 37x)
citovat
#000947
avatar
Ahoj,
no to je přesně úplně to co potřebuji.
Mohu ještě požádat, jestli bys mohl nějak rozepsat to Makro? Nějak popisky k procdůrám, které tam jsou napsané? 8 Byl bych ti velice vděčný a zavázáh 17citovat
#000948
Jeza.m
Tak makra tam jsou jen 2 (plus a minus) :-)

Jak vidíš rozbalovací seznam má nadefinovanou vstupní oblast ("Seznam_p"), což je vybraná oblast na listu Seznam a propojení na buňku (výstup), kam vrací pořadové číslo vybrané položky (buňka A1) na základě toho je pomocí funkce index vyhledána hodnota v seznamu.

Makra:
Sub minus()
If Cells(1, 1) > 1 Then Cells(1, 1) = Cells(1, 1) - 1
End Sub

Minus = mění výstupní buňku (A1) o -1 dokud je větší než 1.

Sub plus()
If Cells(1, 1) < Range("Seznam_p").Rows.Count Then Cells(1, 1) = Cells(1, 1) + 1
End Sub

Plus = mění výstupní buňku (A1) o +1 dokud je menší než počet záznamů v seznamu (definovaná oblast "Seznam_p")

M@citovat
#000949
avatar
Velice děkuji za radu, moc užitečná záležitost. Na svém sešitu jsem to již rozchodila funguje to na prosto perfektně 20citovat

Uživatelské menu

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

Menu

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.

On-line nástroje