V příloze je nástin řešení
Příloha: 
27623_udalosti.zip (15kB, staženo 21x)
citovat27623_udalosti.zip (15kB, staženo 21x)
excel, návod, tipy, funkce, makra, vba, tabulky, šablony
Váš průvodce programem Microsoft Excel a programováním maker ve VBA
< návrat zpět
Téma: Datum aktualizace + překopírování dat
MS Excel
Téma: Datum aktualizace + překopírování dat 
Zaslal/a 23.10.2015 12:59
Ahoj lidi,
prosím Vás o pomoc s nastavením makra. Zkoušel jsem to, ale je to nad mé síly, jedná se o první práci s Visual Basic.
Příklad:
v Listu 1:
Při změně dat v rozsahu buňek A1-K1 se mi v buňce L1 zobrazí Datum a čas změny a zůstane tam, pouze při další změně v některé z těchto buňek se mi Datum aktualizuje.
Toto pravidlo bych chtěl mít však platné automaticky pro všechny další řádky, čili když přidám něco do A2-K2, tak mi L2 zobrazí Datum a čas pro tento řádek.
Druhý úkon tabulky by se měl týkat makra pro ovládácí prvek "seznam". Pokud zvolím ze seznamu A1, tak se mi rozkopírují data z A1-K1 do vedlejšího listu na různé pozice. Toto dokážu přes nahrání makra, ale pouze pro jeden řádek, když kliknu na A2 ze seznamu, zkopíruje mi to samozřejmě pouze to nahrané makro pro A1.
Hlavní problém tedy mám u obou funkcí, jak dát do makra příkaz, aby to fungovalo pro všechny řádky daného rozsahu sloupců.
Díky moc
Druhý úkol tabulky by měl
(27.10.2015 9:33)#027679
Tak první krok se změnou data funguje perfektně, ale pořád bojuji s druhým krokem, tím překopírováním přes ten modul :(citovat
(27.10.2015 10:01)#027681
Ještě teda otázka k té první části...je možné tu změnu datumu a času vynechat když přidám řádek nebo smažu řádek?
Pokud přidám řádek, automaticky se mi do nového řádku vpíše datum změny, což by nevadilo, ale pokud ten řádek smažu, tak se mi na řádek pod ním vyplní také datum a čas změny a tím mi přepíše ten původní. Pokud tedy omylem někdo vloží řádek a bude jej chtít vymazat, přepíše tím i správné datum poslední změny datem vymazání řádku nad ním.citovat
Pokud přidám řádek, automaticky se mi do nového řádku vpíše datum změny, což by nevadilo, ale pokud ten řádek smažu, tak se mi na řádek pod ním vyplní také datum a čas změny a tím mi přepíše ten původní. Pokud tedy omylem někdo vloží řádek a bude jej chtít vymazat, přepíše tím i správné datum poslední změny datem vymazání řádku nad ním.citovat
Upravil som Vám to makro od kolegu:
-Neprepíše hodnoty ak je pridaný alebo vymazaný celý riadok.
-Ak sa zmažú všetky údaje v A:K, zmaže sa aj čas.
-Čas sa nevytvorí pri náhodnom dvojkliku, alebo Del prázdnej bunky v prázdnom riadku.
-Na List2 som Vám dal krížom-krážom kopírovať tie hodnoty z daného riadku, nech lepšie vidíte, ako to Vovka myslel.
-Tieto hodnoty sa neskopírujú ak je bunka A prázdna (aj keď B:K sú plné).
Stačia Vám takéto úpravy ?
-Neprepíše hodnoty ak je pridaný alebo vymazaný celý riadok.
-Ak sa zmažú všetky údaje v A:K, zmaže sa aj čas.
-Čas sa nevytvorí pri náhodnom dvojkliku, alebo Del prázdnej bunky v prázdnom riadku.
-Na List2 som Vám dal krížom-krážom kopírovať tie hodnoty z daného riadku, nech lepšie vidíte, ako to Vovka myslel.
-Tieto hodnoty sa neskopírujú ak je bunka A prázdna (aj keď B:K sú plné).
Stačia Vám takéto úpravy ?
Příloha: 27758_udalosti.rar (14kB, staženo 20x)
citovat27758_udalosti.rar (14kB, staženo 20x)(4.11.2015 8:23)#027819
Díky moc za úpravu, funguje to nyní skvěle. Ovšem ten druhý krok stále ne a ne jít. Chápu rozmístění jako takové, to mi problém nedělalo, ale nevím, jak to pravidlo zapsat do makra pro ten modul "rozevírací seznam" pro všechny zapsané a případně nově vytvořené řádky. Když vložím pole se seznamem a chci mi přiřadit toto makro.citovat
(4.11.2015 10:01)#027826
Lze popřípadě zapsat funkce toho modulu tak, že pokud je ve zvoleném řádku například v buňce M napsaný nějaký text, tak to překopírování dat provede do ještě dalšího listu?
Příklad:
v Buňkách A1, B1, C1 mám hodnoty například 1,1,1 a v buňkách A2, B2, C2 mám hodnoty 2,2,2. v buňce M1 mám napsáno "ANO" a v buňce M2 "NE". Vytvořím si rozevírací seznam, kde budu mít na výběr ze seznamu podle sloupce A, čili v tomto případě čísla 1 a 2. Pokud kliknu na 1, tak se mi překopírují data z A1, B1, C1 na druhý list, jelikož mám v M1 napsáno "ANO" nebo cokoliv jiného, pokud mám napsáno v buňce "NE", tak se mo překopírují na zase jiný list pouze buňky A1, B1. Čili v případě, že zvolím z rozevíracího seznamu "2", tak se mi zkopírují na třetí list pouze hodnoty A1 a B1. Pokud bych v M2 přepsal "NE" na "ANO" a v rozevíracím seznamu zvolil opět, tak se mi překopíruje A1, B1, C1 na druhý list. Takto by to mělo fungovat pro všechny zapsané i nově vytvořené řádky.citovat
Příklad:
v Buňkách A1, B1, C1 mám hodnoty například 1,1,1 a v buňkách A2, B2, C2 mám hodnoty 2,2,2. v buňce M1 mám napsáno "ANO" a v buňce M2 "NE". Vytvořím si rozevírací seznam, kde budu mít na výběr ze seznamu podle sloupce A, čili v tomto případě čísla 1 a 2. Pokud kliknu na 1, tak se mi překopírují data z A1, B1, C1 na druhý list, jelikož mám v M1 napsáno "ANO" nebo cokoliv jiného, pokud mám napsáno v buňce "NE", tak se mo překopírují na zase jiný list pouze buňky A1, B1. Čili v případě, že zvolím z rozevíracího seznamu "2", tak se mi zkopírují na třetí list pouze hodnoty A1 a B1. Pokud bych v M2 přepsal "NE" na "ANO" a v rozevíracím seznamu zvolil opět, tak se mi překopíruje A1, B1, C1 na druhý list. Takto by to mělo fungovat pro všechny zapsané i nově vytvořené řádky.citovat
(4.11.2015 11:35)#027831
Pokusím se ještě to poklikání rozchodit...jde mi to bohužel jen v tom Vašem sešitu, ikdyž to přejmenuji a jen přeházím správně buňky...citovat
Pozerali ste si makro nielen v module ale aj v liste ? Ak ste nepreniesli to, tak Vám to samozrejme fungovať nemohlo.
Každopádne, tu je príklad riešenia nového zadania. Ten zoznam nebude fungovať správne, ak budú medzi dátami prázdne riadky v stĺpci A.
Každopádne, tu je príklad riešenia nového zadania. Ten zoznam nebude fungovať správne, ak budú medzi dátami prázdne riadky v stĺpci A.
Příloha: 27835_udalosti.rar (20kB, staženo 19x)
citovat27835_udalosti.rar (20kB, staženo 19x)(5.11.2015 14:37)#027863
Moc děkuji za dodělání toho přenesení při "NE", nakonec jsem rozevírací seznam ani nepoužil, jelikož je Vaše verze s klikáním prostě lepší 
Přepsal a překopíroval jsem ten svůj soubor do Vámi zaslaného a upravil si jen hodnoty a už to funguje, čili byl zakopán pes někde v Tom původním souboru. Nyní funguje vše, jak má. Velice ĎĚKUJIcitovat
Přepsal a překopíroval jsem ten svůj soubor do Vámi zaslaného a upravil si jen hodnoty a už to funguje, čili byl zakopán pes někde v Tom původním souboru. Nyní funguje vše, jak má. Velice ĎĚKUJIcitovat
Klikaciu verziu Vám vymyslel Vovka. Takže ste si dal dokopy až 3 súbory.
1. verzia s dvojklikom v A
2. verzia s rozlišovaním XY-text/"NE"
3. Váš súbor
Snáď ste si to skombinoval správne, keď Vám to funguje tak snáď áno.citovat
1. verzia s dvojklikom v A
2. verzia s rozlišovaním XY-text/"NE"
3. Váš súbor
Snáď ste si to skombinoval správne, keď Vám to funguje tak snáď áno.citovat
Uživatelské menu
Nejste přihlášen(a)
\n
\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