Vyhledání posledního záznamu v tabulce

HansH1 · 3. 4. 2009 14:27:30

Potřeboval bych poradit f-ci, která by mě vrátila hodnotu posledního záznamu v tabulce která je v jiném listě. Asi to bude banalita, ale ne a ne ji najít. Díky moc!

Orinh · 4. 4. 2009 07:42:17

Nevím zda je pro tuto činnost speciální fce, ale lze to realizovat pomocí podmínky a pomocného sloupce. Tedy pokud není tabulka hodnot velice dlouhá.

Podmínka v pomocném sloupci testuje zda není buňka o řádek níž ve sloupci hodnot prázdná. Pokud ano vložit obsah nad testovanou buňkou do pomocného sloupce (poslední hodnota). Součtem pomocného sloupce získáte poslední hodnotu do konkrétní buňky.

Má to nevýhodu, která výsledek učiní nepoužitelným a to nesouvislá data v tabulce. Vynechané prázdné buňky za neznámé hodnoty.

HansH1 · 6. 4. 2009 14:52:15

Pomocí podmínek mě to napadlo taky, ale je to takové nehezké řešení a ta nepoužitelnost mě taky trápí, protože s tím výsledkem potřebuji dále pracovat. Tabulka kde se má hledat není velká (6 řádků a 4 sloupce). Uměl by někdo udělat nějaké makro (stejnou tabulku mám na stejném místě v asi 30ti listech a potřebuju z nich ty poslední data sjednocovat do jedné tabulky)? S programováním nejsem moc kamarád...

Ondra.kl · 6. 4. 2009 15:45:44

... a nešel by ten záznam identifikovat podle toho že je tam vždy použit určitý text? třeba "Celkem"

PetrValach · 6. 4. 2009 21:38:00

Vůbec netuším, zda poradím. Kolega/kamarád mi poslal kód, který platí pro MS Office, ale pokud rozumíte Basicu, snad si to předěláte do makra:
Public Function getlastvalue()
Dim i As Long
Dim lr As Long
Dim lc As Long
With Sheets(Sheets.Count)
For i = 1 To Columns.Count
If lr <= .Range(.Cells(.Rows.Count, i).Address).End(xlUp).Row Then
lr = .Range(.Cells(.Rows.Count, i).Address).End(xlUp).Row
lc = i
End If
Next
End With
getlastvalue = Sheets(Sheets.Count).Cells(lr, lc).Value
End Function

hanus · 15. 4. 2009 19:33:41

IMHO na to není žádná funkce. Nápad s nějakou identifikací do dobrý, pak by se dalo použít např. VLOOKUP. Nicméně se takhle naprázdno špatně vymýšlí, řešení může být celá řada - můžete sem dát link na ukázkový ODS soubor?

HansH1 · 16. 4. 2009 14:23:46

Děkuji za nápady. Byl jsem dlouhou dobu pryč, ale udělám nějaký ukázkový soubor a upnu ho...

hanus · 19. 4. 2009 10:28:45

Tak jsem po nějakých útrapách naprogramoval funkci LASTINRANGE, která má jako vstupní parametr oblast buněk a vrací hodnotu poslední nenulové buňky. NEVÝHODOU je, že ignoruje vložené nuly, což je daň za její jednoduchost.
Soubor ke stažení: http://ooo.e-hanus.cz/funkce_lastinrange.01.ods
Testováno v Calc 3.0.1

Dejte vědět, jestli to takto vyhovuje.

Editoval hanus (19. 4. 2009 10:30:13)

HansH1 · 12. 9. 2009 21:13:28

hanus napsal(a)

Tak jsem po nějakých útrapách naprogramoval funkci LASTINRANGE, která má jako vstupní parametr oblast buněk a vrací hodnotu poslední nenulové buňky. NEVÝHODOU je, že ignoruje vložené nuly, což je daň za její jednoduchost.
Soubor ke stažení: http://ooo.e-hanus.cz/funkce_lastinrange.01.ods
Testováno v Calc 3.0.1
Dejte vědět, jestli to takto vyhovuje.

omlouvám se za nepřítomnost. Tato funkce naprosto vyhovuje, jenom musím najít způsob, jakým to dostat do svého souboru, ale to už si vygoogluju :-) Ještě jednou mockrát děkuji za pomoc!!

hanus · 12. 9. 2009 21:30:38

Je to tady na potrále:
http://www.openoffice.cz/navody/program … plitstring
http://www.openoffice.cz/navody/program … astinrange

Makra jsou obyč text, takže to vykopírujte z toho vzorového souboru a vložte do toho vašeho nebo do vlastních maker. V tom prvním článku je stručně popsáno, jak se zachází s editorem maker v Basicu.

Editoval hanus (12. 9. 2009 21:33:50)

lp. · 24. 9. 2009 19:59:44

Proč makra? Stačí např.:

=OFFSET(A1;MAX(IF(A1:A1000<>"";ROW(A1:A1000)-ROW(A1);0));0)

matice (ctrl+shift+enter)

Pokud je celá tabulka prázdná, prázdnou hodnotu.

OpenOffice.cz - web věnovaný kancelářským balíkům OpenOffice.org

#1 3. 4. 2009 14:27:30

Vyhledání posledního záznamu v tabulce

#2 4. 4. 2009 07:42:17

Re: Vyhledání posledního záznamu v tabulce

#3 6. 4. 2009 14:52:15

Re: Vyhledání posledního záznamu v tabulce

#4 6. 4. 2009 15:45:44

Re: Vyhledání posledního záznamu v tabulce

#5 6. 4. 2009 21:38:00

Re: Vyhledání posledního záznamu v tabulce

#6 15. 4. 2009 19:33:41

Re: Vyhledání posledního záznamu v tabulce

#7 16. 4. 2009 14:23:46

Re: Vyhledání posledního záznamu v tabulce

#8 19. 4. 2009 10:28:45

Re: Vyhledání posledního záznamu v tabulce

#9 12. 9. 2009 21:13:28

Re: Vyhledání posledního záznamu v tabulce

#10 12. 9. 2009 21:30:38

Re: Vyhledání posledního záznamu v tabulce

#11 24. 9. 2009 19:59:44

Re: Vyhledání posledního záznamu v tabulce

Zápatí