Zkus uvést názorný příklad...
P.
První dotaz: To mi přijde jako triviální přiřazení .-), tedy do všech listů do buňky E1 dát "=Hárok1!E1", případně lépe třeba takto:
=KDYŽ(Hárok1!E1<>"";Hárok1!E1;"")
Druhý dotaz: To se tady tuším už někdy řešilo a výsledek byl, že to skrýt/odstranit v tomto zobrazení nejde. Přidává to tam Excel automaticky. Záleží na důvodu, proč ti to tam vadí a jestli tedy případně nebude lepší vrátit se k Normálnímu zobrazení. Mrkni na kartu Zobrazení, třeba by vyhovovalo i "Zobrazení/Rozložení stránky".
P.
Viz příloha:
To je klasická úloha pro Filtr...
"Data/Filtr"
P.
O "jednoduchém" řešení nevím, ale určitě by šlo vytvořit nějaké pomocné řady a ty si upravit na adekvátní formát...
Nástin jak by to třeba mohlo vypadat je v příloze. Je třeba si s tím asi pohrát, případně využít jiný program :-).
P.
Viz příloha:
Přidej soubor a mi si s tím pohrajeme .-).
Ještě ale upřesni, jaké přesně přímky tam potřebuješ, myslíš ty s těmi popiskami (např. to Ucmax...)?
P.
Určitě dalo.
P.
Bez souboru ani ránu .-).
P.
Soubor nejde rozbalit, je prázdný.
Dle popisovaného problému by ale možná mohl stačit klasický filtr.
P.
Přidej ještě testovací soubor a někdo se určitě najde .-).
P.
Něco jsem zkusil. Ale jen pro úplnost, možná by stačilo klasické Ctrl+C a Ctrl+V... .-)
Na testovacích datech, co tam máš, to funguje... V řešení předpokládám neměnnost aktuálních vzorců. Příště ale radši přidej celou fakturu, takto může být moje řešení dosti zavádějící.
Jinak to tlačítko tam nemáš, ale jak jsem psal, tak je to přes VBA, navázal jsem to na změnu v listu.
P.
Viz příloha:
Přidej soubor.
Pokud buňka G33 obsahuje číslo, tak ji zformátuj jako číslo a ne jako text... :-).
P.
Asi by to chtělo ještě říci, k čemu to bude v praxi dobré .-). Zejména na základě čeho se bude měnit buňka K1, proč se ten řádek má přesouvat atd.
Přesun řádku s pomocí vzorců nepůjde. Muselo by se využít makro, nemusí být nutně přes tlačítko, ale lze navázat na nějakou událost listu. Ale jak říkám, záleží spíš na tom, k čemu to má složit.
P.
Trochu jsem si s tím pohrál, ale zvaž to, co radí eLCHa...
P.
Viz příloha:
Nevím jestli ti rozumím, ale jak píšeš, je to proměnná, tak do kódu nepiš "natvrdo" jméno, ale dej tam odkaz na buňku.
P.
Př.:
Odkazování na otevřený sešit:Workbooks(Range("B1").Value).Sheets("List1").Range("E5").ValueDynamický název souboru:nazev_souboru = Range("B1").Value & ".xlsm"
Šlo by to třeba přes podmíněné formátování. Barevná škála na jiném listu ale bude v tomto případě k ničemu.
Pomocí vzorců, pokud vím, nejde odkazovat na barvu, takže by se pak jedině muselo využít nějaké makro ve VBA.
P.
Př.:
Podmíněné formátování/ Nové pravidlo/ Vzorec
Zadej toto a vyber výplň... (pro každou barvu)
=$A$1="černá"Nebo využij VBA kód:Private Sub Worksheet_Change(ByVal Target As Range)
Dim radek As Long
Dim cislo_barvy As Long
On Error Resume Next
radek = WorksheetFunction.Match(Range("A1"), Sheets("List2").Range("A1:A30"), 0)
cislo_barvy = Sheets("List2").Range("B" & radek).Interior.Color
Range("B1").Interior.Color = cislo_barvy
End Sub
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.