< návrat zpět

MS Excel


Téma: Datum aktualizace + překopírování dat rss

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

Zaslat odpověď >

#027623
avatar
V příloze je nástin řešení
Příloha: zip27623_udalosti.zip (15kB, staženo 21x)
citovat
#027679
avatar
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
#027681
avatar
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
#027758
elninoslov
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 ?
Příloha: rar27758_udalosti.rar (14kB, staženo 20x)
citovat
#027819
avatar
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
#027826
avatar
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
#027831
avatar
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
#027835
elninoslov
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.
Příloha: rar27835_udalosti.rar (20kB, staženo 19x)
citovat
#027863
avatar
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ší 5

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
#027868
elninoslov
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

Uživatelské menu

Nejste přihlášen(a)
avatar\n

Menu

On-line nástroje

Formulář Faktura

Formulář Faktura IV

Oblíbený formulář Faktura byl vylepšen a rozšířen.
Více se dočtete zde.

Aktivní diskuse

Relativní cesta - zdroje Power Query

elninoslov • 23.4. 19:33

Vyhledej

elninoslov • 23.4. 18:54

Vyhledej

PavDD • 23.4. 12:29

Vyhledej

PavDD • 23.4. 11:47

Relativní cesta - zdroje Power Query

Alfan • 23.4. 10:52

Relativní cesta - zdroje Power Query

elninoslov • 23.4. 10:22

Relativní cesta - zdroje Power Query

lubo • 23.4. 10:15