Příspěvky uživatele
< návrat zpět
Zjistit adresu buňky už přece umíte. To jsme řešili nedávno tady: https://wall.cz/index.php?m=topic&id=52137&page=2#posts
A pokud vložíte přílohu s tím co co konkrétně chcete, tak vyřešení vašeho problému značně urychlíte.
Vyzkoušejte tento tvar: Default:=Format$(Now(), "dd.mm.yy hh:nn")
Chybí příklad
Posílám příklad. Heslo pro spuštění je: "Heslo"
Ale je to jen taková ochrana před "nechtěným kliknutím na tlačítko".
Pokud by někdo vyloženě chtěl, tak to snadno obejde.
Sheets("Obedy").Unprotect Password:="Heslo"
Sheets("Obedy").Protect Password:="Heslo", DrawingObjects:=True, Contents:=True, Scenarios:=True
Nevím, jestli to správně chápu. List bude zamčený a zaheslovaný, ale na kliknutí na tlačítko to nebude mít žádný vliv.
Já bych to viděl na kombinaci sumifs a countifs.
Sečíst si zvlášť hodnoty pro podmínku 0 a pro podmínku 5. Sečíst a podělit počtem prvků
(SUMIFS (pro B=0) + SUMIF (pro B=5)) / (COUNTIFS (pro B=0) + COUNTIFS (pro B=5))
=(SUMIFS(A4:A2884;A4:A2884;">0,5";B4:B2884;0;C4:C2884;16)+SUMIFS(A4:A2884;A4:A2884;">0,5";B4:B2884;5;C4:C2884;16))/(COUNTIFS(A4:A2884;">0,5";B4:B2884;0;C4:C2884;16)+COUNTIFS(A4:A2884;">0,5";B4:B2884;5;C4:C2884;16))
Třeba takto
Mrkněte na přiložený soubor. Vzorečky CS6, CT6 a CU6 stačí nakopírovat do dalších řádků.
Použil jsem již zmíněnou funkci COUNTIFS a parametry z podmíněného formátování + pojmenování jednotlivých hodnot:
=COUNTIFS($D$5:$CR$5;"P";D6:CR6;">85")Pro žluté hodnoty počítám kolik hodnot pod písmenem "P" je větších než 85. Analogicky i pro další barvy: kolik "D" je větších než 95 a kolik "H" je větších než 144
Vložte příklad s konkrétními hodnotami, s podmíněným formátováním a jak má vypadat výsledek.
Já bych použil COUNTIFS.
Předpokládám, že hodnoty jsou číselné a že se jedná o jednotlivé intervaly. Tyto intervaly bych použil jako kritérium v již zmíněné funnkci COUNTIFS.
Všechno co je mezi uvozovkami je text.
Proměnnou (její hodnotu) připojím k textu pomocí znaku &.
Takže:
"A1" program bere jako text A1
Mám proměnnou Radek = 1
pak platí:
"A" & Radek si program přebere jak A1
ale
"A & Radek" není A1 ale je jeden text "A & Radek"
Příklady:
Souvislá oblast:Range("D8:D9", "F8:F9").Select
Range("D8:D" & Radek, "F8:F" & Radek).Select
Dvě nespojité oblasti:Range("D8:D9, F8:F9").Select
Range("D8:D" & Radek & ", F8:F" & Radek).Select
Zase ten stejný problém. Napište si to pod sebe a zahrajte si hru "Najdi rozdíly". Měl byste najít 2 rozdíly, když pominu nahrazení čísla 3 proměnnou.
Co je tam jinak?
Range("B2:B3", "C2:C" & PosledniPlnyRadek).SelectUvozovky musí být za písmenem C, ne před závorkou.
Stejně jako tadyRange("B2", "B" & PosledniPlnyRadek).Select
[/quote]
PavDD napsal/a:
Jen moc nechápu , jak jste docíli toho, že podle vybraného počtu buňek, To pěkně ukládá do listu 2, pod sebe.
j = 1
For i = 0 To velikostArrBunka
Worksheets("List2").Range("A" & j & ":H" & j).Value = Range("A" & arrBunka(i, 0) & ":H" & arrBunka(i, 0)).Value
j = j + 1
Next i
Počítadlo "j" určuje na který řádek se bude zapisovat výsledek. ¨Nejdříve jej nastavím na číslo 1. Tzn. při prvním průchodu cyklem se zapíše výsledek na řádek 1.
Přičtu 1 (j = j+1). Při dalším průchodu cyklem se zapíše na řádek 2. atd.
Worksheets("List2").Range("A" & j & ":H" & j).Value Tento kód určuje, do kterého řádku se zapisuje. Pokud za "j" dosadím postupně čísla, tak to pak bude takto:Worksheets("List2").Range("A1:H1).Value
Worksheets("List2").Range("A2:H2).Value
Worksheets("List2").Range("A3:H3).Value Když si na začátku nastavím třeba j = 10, tak to začne zapisovat od řádku č.10.
Žádný soubor jste nevložil, pokud jste to měl v plánu. Pokud se jedná o excel s makrem, musí se nejdřív zazipovat
Uživatelské menu
\nMenu
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.
RSS nejnovější články