• Úvod
• Excel návod
• Excel šablony
• Nástěnka
• Mobility
• Tipy na výlet
• Galerie
• Fórum

Příspěvky uživatele

Tak ještě jinak, nevšiml jsem si, že jsou vždycky stejná čísla DL za sebou. Takže jen překopírování na nový list a vložení volných řádků.

Něco jsem zkusil, ale nevím, zda to je tak, jak to má být.
Nejsou tam definované proměnné, ale tady to nebude vadit. Odborníci by to jistě řešili líp, ale takto to snad taky pomůže.
Start makra CTRL+SHIFT+G
Nemám Excel 2003, ale snad to pojede.

OK

Není jednodušší použít na listu vkládání dat filtr a pak vybrané nakopírovat na druhý list ?

asi jedině makrem

mrkni zde, zda to nepomůže:
http://stackoverflow.com/questions/14953304/run-time-error-13-in-my-vba-excel-code

Myslím, že je to v podstatě to samé.
http://wall.cz/index.php?m=topic&id=17635

To aby se řádek skryl není problém, když z něj , resp. z nějaké buňky odstraníš NĚCO, ale co dál ? Aby se "zjevil", když uděláš co? Dopíšeš něco kam? Ono není kam dopsat, když je řádek fuč.

zkus tak

Private Sub CommandButton1_Click()
Cells(1, 1) = Me.TextBox1 * 1
Unload Me
End Sub

Jenom jsem se mrknul proč by to jako nemělo chodit a je tam myslím chyba na řádku 33 makra (toho co se z důvodu chyby zastaví). Je tam omylem EXIT FOR, oprav na EXIT DO.

???

A proč je používán textový formát datumu ? Není to zbytečně komplikující ? Kdyby se použil normální formát, kterýmu excel rozumí, bylo by všechno snažší.
A pokud je to takto nutné, asi bych v textu hledal "-" a ne "20".

to snad není tak těžké ?
edit:
AL byl rychlejší

To asi ne, já vždy jen předkládám, jak bych to řešil já, ale to nemusí být (a často není) to úplně "pravé ořechové". eLCHa se někdy z mých řešení hroutí , on je odborník, jenže to samozřejmě někdy přináší problém, protože řešení od odborníků bývá příliš odborné. Každý profesionál umí (v každém oboru) využít systém do detailů, zatím co laik samouk hledá řešení tím způsobem, který zná. Což je často špatně, ale i tak to přináší jakési uspokojení, že to nějak funguje.
Já dělám něco úplně jiného, než je práce s PC a Excelem, takže laicky.

maticový vzorec
asi bude potřeba upravit ve vzorci
=IFERROR(NEPŘÍMÝ.ODKAZ("a"&SMALL(KDYŽ(NE(JE.PRÁZDNÉ($B$1:$B$20));ŘÁDEK($B$1:$B$20);"");ŘÁDEK()));"")
a to tak, aby prvvní řádek seznamu počítal s číslem 1, tedy bude-li seznam začínat např. na řádku 4, musí tam být:
=IFERROR(NEPŘÍMÝ.ODKAZ("a"&SMALL(KDYŽ(NE(JE.PRÁZDNÉ($B$1:$B$20));ŘÁDEK($B$1:$B$20);"");ŘÁDEK()-3));"")

edit: a taky oblast od do

Uživatelské menu

Nejste přihlášen(a)

• přihlásit
• registrace

\n

Menu

Formulář Faktura

Helios iNuvio

On-line nástroje