c = ActiveCell.Column
d = ActiveCell.Column - 2
f = Worksheets("List2").Cells(a, c).Value
g = Worksheets("List1").Cells(b, d).Value
Jestliže mám při spuštění makra aktivní buňku ve sloupci A tak ActiveCell.Column = 1 a potom proměnná d má hodnotu -1. Pak samozřejmě nemohu do g načítat hodnotu ze sloupce -1.
Jestli jsem zadání dobře pochopil, tak já bych použil Kontingenční tabulku.
Já bych si tipl, že v posledním čísle "1.609" je nutné napsat čárku a ne tečku (alespoň v české verzi).
Ale to je tam podle mě pro přepočet na míle.
Jinak je vzoreček tady (dá se zkopírovat a nevznikne chyba při přepisu):
https://exceltown.com/navody/postupy-a-spinave-triky/zajimave-kombinace-funkci/vzdalenost-dvou-mist-na-zemi-podle-gps-souradnic/
Třeba tak:
=IFERROR(A(HLEDAT("SLOVO 1";$P$4;1);HLEDAT("SLOVO 2";$P$4;1);HLEDAT("SLOVO 3";$P$4;1));"Jedno nebo více slov chybí.")
Já bych si to udělal jako "Tabulku".
Výhodou je, že nemusím mít formátování v celém sloupečku (v tomto případě F a G), ale stačí mi to jen v řádcích, které jsou akuální.
Vždy jen začnu na dalším řádku psát příjmeni, jméno, rok narození a celkový čas.
Sloupec A, F a G si doplní údaje/vzorečky automaticky.
To jen pro ty, kdo by to náhodou ještě nevěděl :).
Pomocí SVYHLEDAT.
Není tam ošetřeno, když se nezadá M nebo Z, respektive když se nezadá, tak to bere jako M :)
Třeba takto. Nic lepšího mě v rychlosti nenapadlo.
Nastane problém, pokud bude víc ovoce.
Napadl mě tento způsob s pomocnými sloupci.
Ještě by to chtělo zrušit ty prázdné buňky.
Je to od řádku 12.
to elninoslov: Díval jsem se na ten Váš výběrový seznam, ale asi tam chybí možnost výběru v buňce H22.
Podle mně je "výberový zoznam" v českém excelu "ověření dat".
Nebo se pletu a špatně jsem Vás pochopil?
Já to mám podle toho, co je v buňce H22. Napíšu NE nic se neděje. Napíšu číslo, spočítá se podle hodnoty.
Jestli při tomto řešení "hrozí" nějaké riziko (nestandartní výsledek) bude určitě vědět elninoslov :)
elninoslov: díky za inspiraci. Dlouho jsem studoval, kde tam dochází k selekci jedinečných hodnot, až jsem si přečetl, že kolekce nemůže mít dva stejné názvy.
Alespoň doufám, že jsem pochopil ten princip.
Holt, v jednoduchosti je krása.
Zkuste poslat nějaký příklad.
Kolik je sloupců? Je vždy stejný počet sloupců?
Kolik je řádků?
Pokud je počet sloupců různý, je možné říct maximální počet sloupců?
Co znamená "automaticky"? Vždy po zadání nějakého údaje? Nebo vždy po stisknutí tlačítka? Nebo...
http://wall.cz/index.php?m=topic&id=2820&page=1#posts
Jinak tady je o tom celý článek:
https://proexcel.cz/statusbar-progressbar-dalsi-moznosti-zobrazeni-prubehu-operace/
Příkaz "Select Case"?
Select Case nazev_souboru
Case "AAA"
'uložit jako kopii
Case "BBB"
'jenom uložit
End Select
Děkuji.
"For Each" teprve objevuji, proto ten dotaz.
Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.
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.