Příspěvky uživatele
< návrat zpět
No, jde to.
Pokud znas jmeno obrazku, tak takto:
ActiveSheet.Pictures("Picture 3").Delete
nebo cislo obrazku, tak takto:
ActiveSheet.Pictures(1).Delete
Hm, napada me, jestli neni zakazany.
Moznosti - Doplnky a dole v rozbalovacim menu (Spravovat) vyber 'Zakazane polozky' a Prejit - jestli tam Personal je, tak ho povol...
Doufám, že nečekáš, že tady někdo bude dělat domácí úkol, protože takové žádosti tu valná většina (pokud ne úplně všichni) odmítáme.
Kruhový diagram (výsečový graf) uděláš jednoduše tak, že označíš ty četnosti (až už absolutní nebo vyjádřené v procentech) a jednoduše dáš vložit výsečový graf.
Pro ty četnosti můžeš ze základního souboru dat použít funkci COUNTIF.
aha, tak to je neco jineho - omlouvam se za nerelevantni info... 
Nevim, jestli nejsem mimo.
Kazdopadne, kdyz chces, aby nejake makro nespustilo udalostni procedury, daji se tyto udalosti vypnout
Application.EnableEvents = False
(a pak zase zapnout)
Application.EnableEvents = True
Rekl bych, ze nejsem jedinej, kdo nema ani to nejmensi tuseni, o jakych objektech je rec.
Asi by se hodilo nejaky lepsi vysvetleni...
No, jestli jste opravdu zacatecnik, tak by vysvetleni bylo dost slozite...
Jde o to, ze jsem vytvoril matici hodnot, ktere odpovidaji pouze danemu dni a v ni jsem nalezl maximum.
Pro nalezeni casu jsem v te same matici nasel ono denni maximum a v odpovidajici oblasti mu priradil odpovidajici hodnotu.
Abyste to pochopila, prostudujte si funkce INDEX, POZVYHLEDAT, MAX a hlavne maticove vzorce.
Zpusob fungovani maticovych vzorcu jsem popsal v clancich:
1) http://wall.cz/excel-navod/maticove-vzorce-i
2) http://wall.cz/excel-navod/maticove-vzorce-ii
Mozna takto
...funkce je maticovy vzorec, musis ho ukoncit stiskem CTRL+SHIFT+ENTER
...a nebo pouzit jen funkce na listu (tedy zadna makra) a akceptovat to, ze cisla museji byt za sebou (tedy: KOLO456blabla) - je jedno, na jakem miste a kolik jich bude, ale nesmi byt mezi cisly pismena
=ČÁST($B$2;SMALL(KDYŽ(JE.ČISLO(HODNOTA(ČÁST($B$2;ŘÁDEK(NEPŘÍMÝ.ODKAZ("E1:E" &DÉLKA(B2)));1)));ŘÁDEK(NEPŘÍMÝ.ODKAZ("E1:E" &DÉLKA(B2)));"");1);SUMA((KDYŽ(JE.ČISLO(HODNOTA(ČÁST($B$2;ŘÁDEK(NEPŘÍMÝ.ODKAZ("E1:E" &DÉLKA($B$2)));1)));ŘÁDEK(NEPŘÍMÝ.ODKAZ("E1:E" &DÉLKA($B$2)));0)>0)*(1)))
Text je v bunce B2
Tady je ten vzorec - delal jsem to narychlo, tak to snad bude fungovat...
vzorcem to jde, ale jde o pomerne slozity maticovy vzorec, ktery mi vzdy zabere dost casu, ktery momentalne nemam, takze jestli to nikdo nezvladne drive, vratim se k tomu pozdeji...
TUhle knizku jsem cetl, kdyz jsem zacinal s VBA a musim rict, ze mi pomohla - je to ale spis vec do zacatku...
Je tam hodne moznosti, co se muze stat a asi to nepostihneme vsechno - tohle by ale mohlo fungovat lip...
Mozna takto, ale je problem se zmenou proporci obrazku, ktery je potom deformovany (oproti originalu), protoze velikost bunky (oblasti) neodpovida velikosti obrazku (resp. pomeru stran)
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