Příspěvky uživatele
< návrat zpět
john89 napsal/a:
john89 napsal/
Už jsem to vyřešil:
ActiveSheet.Protect "password"
ActiveSheet.UnProtect "password"
Nebo se dá použít
ActiveSheet.Protect Password:="heslo", UserInterfaceOnly:=True
před spuštěním aktualizace.
Do F2 vzorec:
=DATUMHODN(B2&" " &B1)
do g2:
=f2+1
atd.
(+ zvolit formát)
Funkce "vyhledat" pokud nehledají přesnou shodu vrací poslední hodnotu, která je rovna nebo menší než hledaná.
Pokud hledám číslo, zadám tedy co největší číslo k hledání. A protože si největší číslo v exelu přesně nepamatuji, tak dávám něco, co se k tomu blíží.
Pokud se tedy hledá např. poslední text, tak obvykle hledám "žžž" - ne moc dlouhý řetězec, aby se to neporovnávalo moc dlouho, který se při třídění zařadí nakonec seznamu.
Třeba:
=SVYHLEDAT(C6;ZVOLIT(B2;Prvni!A:R;Druhy!A:R;Treti!A:R);18;0)
V B2 je číslo listu (1,2,3, ...)
Jinak, pokud by stačilo =b1+b2, tak se to dá udělat:
Do
a1: "m", do b1: 4
a2: "k", do b2: 6
pak vybrat oblast a3:b3 a ve formátu sloučit buňky.
pak zkopírovat formát na a1:b1 a a2:b2
pak skrýt sloupec a
Pak se může napsat b1 + b2 a v buňkách bude "m" a "k".
Je to sice pitomost, ale kdo chce kam...
Když už se po novém roce teoretizuje, zkus popsat, jak po zapsání do buňky písmene "m", se excel doví, že při sčítání má použít číslo 6.
Jinak to můžeš zkusit na https://excel.uservoice.com/
nebo klasika
=IFNA(VVYHLEDAT(9E+307;B3:J3;1;1);"")
Jistě exituje, VBA. Jak jsem už psal, záznamník maker je kamarád. Stačí se pak podívat na objekty a doplnit iterace.
Filtry jsou v řadě objektů, tak jako příklad na aktivním listu tabulky a autofiltr:
Sub Makro()
Dim i As Long
Dim oList As ListObject
' tabulky
For Each oList In ActiveSheet.ListObjects
With oList.AutoFilter
For i = 1 To .Filters.Count
.Range.AutoFilter Field:=i
Next
End With
Next
With ActiveSheet.AutoFilter
For i = 1 To .Filters.Count
.Range.AutoFilter Field:=i
Next
End With
End Sub
Jo a to "pro každý sheet zvlášť", ano musí, ale může se to udělat v cyklu:
V proceduře odstraní autofiltry na všech listech:
Dim list As Worksheet
For Each list In ActiveWorkbook.Worksheets
list.AutoFilterMode = False
Next
Třeba:
ActiveSheet.ShowAllData
ps. V Excelu je záznamník maker.
No, pokud excel nebude stíhat, tak hledej checkboxy.
Narazil jsem na sešit, kde bylo na jednom listu pár desítek tis. graf prvků (nějaké ikony, checkboxy, ...). Uživatelům se podařilo nastavit rozměry na 0, tak nebyly vidět a ctrl-c ctrl-v je geometricky namnožilo. List se zobrazoval docela dlouho. Na druhém listu těch prvků bylo jen necelých 200 tis. List se zobrazoval cca minutu. Ani smazání objektů nebylo snadné, při pokusu vymazat celou collection, excel padal.
Nevím jakou verzi používáte, pokud je to něco novějšího než je 2010, tak normálně kontingenční tabulka s daty v datovém modelu. Pak je v agregacích i počet unikátních hodnot.
např. do R2:
=KDYŽ(A(Y$1>=$B2;Y$1<=$C2);MIN($E2-8*(Y$1-$B2);8);"")
Není ani jasné, co má být výstupem. Je to interaktivní graf, pole 60 x X grafů, ...?
Obecně: Napřed pq načte data. Data se mohou podle potřeby agregovat a uloží se podle potřeby do datového modelu nebo do tabulky.
Pokud by to měl být interaktivní graf řízený kt, tak je vhodné vyrobit kopii kt prostými odkazy, případně převést KT na vzorce. Nad tím už jde dělat jakákoliv graf.
Jinak podle potřeby...
Magdice napsal/a:
... potřebuji na 7 pozici dodat lomítko ...
S číslem není třeba nic dělat.
Do čísla lomítko dodá:
=HODNOTA.NA.TEXT(A1;"000000\/0000")
Mělo by to jít i bez pomocného sloupce. Filtr kalendářních dat umí dnes, včera, poslední týden, ...
A definici filtru lze uložit do vlastního zobrazení.
Uživatelské menu
\nFormulář 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.
RSS nejnovější články