Makro - zaznamenání data zápisu do buňky v excelu

Programy pro práci v kanceláři (Word, Excel, Access…=>Office)

Moderátor: Mods_senior

slama.fortunes
nováček
Příspěvky: 8
Registrován: únor 18
Pohlaví: Muž
Stav:
Offline

Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod slama.fortunes » 14 úno 2018 13:11

Dobrý den,
velmi prosím o radu s excelem . Píšu si do jednotlivých řádků denní záznamy. No a potřeboval bych abych, aby když do buňky A1 něco napíšu tak buňce A5 se uloží datum toho zápis, kdy jsem to zapsal, tedy každý zápis bude mít svoje autentické datum zápisu. Potřebovl bych pomoci s makrem, jaká máme vložitd? Nejlépe , abych si změnil jen číslování buněk a mohl hned vložit.

Reklama
guest
Pohlaví: Nespecifikováno

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod guest » 14 úno 2018 14:26

"tedy každý zápis bude mít svoje autentické datum zápisu"

A1 -> A5 a ostatní, nějaká historie nebo co?

slama.fortunes
nováček
Příspěvky: 8
Registrován: únor 18
Pohlaví: Muž
Stav:
Offline

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod slama.fortunes » 14 úno 2018 14:31

Do sloupce A píšu třeba kolik jsem uběhl km, no a chci aby se hned napsalo datum do sloupce B. pak pokračují nějaké detaly v C, D, E. Abych nemusle ty datumy do B pořád psát, tak to chci zautomatizovat Ŕádků za den vypíšu desítky a potřebuji vědět zpětně, který je z jakého data.

guest
Pohlaví: Nespecifikováno

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod guest » 14 úno 2018 14:46

Příloha, makro v modulu List1, událostní procedura

Kód: Vybrat vše

Private Sub Worksheet_Change(ByVal Target As Range)

    'pokud doslo ke zmene ve sloupci 1...
    If Target.Column = 1 Then

       
       
        'vlozeni datumu do bunky vpravo
        Target.Offset(0, 1) = Date
   
    End If
   
End Sub
Přílohy
datumak.xlsm
(13.1 KiB) Staženo 254 x

slama.fortunes
nováček
Příspěvky: 8
Registrován: únor 18
Pohlaví: Muž
Stav:
Offline

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod slama.fortunes » 14 úno 2018 15:09

Ano takto. Velmi děkuji
A teď prosím jedná se o změnu ve sloupci B (např. B204) , tak do sloupce d (D204) vložit datum změny.
Jsem v tomto začátečník, jak to tam prosím vložím nakopíruju?

guest
Pohlaví: Nespecifikováno

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod guest » 15 úno 2018 08:26

Editor VBA (Alt+F11), rozklepnout položku (modul listu) List1 a nastudovat kód. Nic těžkého.

Target ... oblast, ve které došlo ke změně
Offset ... posun od změněné oblasti (řádky, sloupce)
Date ... funkce vracející aktuální datum

Jinak opět nechápu zadání.. to je jako výjimka nebo globální změna?

slama.fortunes
nováček
Příspěvky: 8
Registrován: únor 18
Pohlaví: Muž
Stav:
Offline

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod slama.fortunes » 15 úno 2018 08:40

Chápu, že to je otrava. Znám to, ve svém oboru.
Nicméně nevzdávám to a věřím, že to dotáhneme.
Jedná se o vyjímku, úpravu v jednom excel sešitu.
Viz příloha - alt f11....virutal basic.....insert....modules...za column jsem dal B a pak Target 0,2 (chci aby se datum zapsalo do D) v příslušném řádku
Přílohy
Screenshot_1.png

guest
Pohlaví: Nespecifikováno

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod guest » 15 úno 2018 09:26

a) Dáte dohromady přesné zadaní
b) Budete číst, co píšu (zmiňoval jsem položku/modul List1), kde je ona událostní procedura (makro), ne žádný Module...

slama.fortunes
nováček
Příspěvky: 8
Registrován: únor 18
Pohlaví: Muž
Stav:
Offline

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod slama.fortunes » 15 úno 2018 10:32

Zadání je v příloze.
Přílohy
vzor.xlsx
(10.14 KiB) Staženo 114 x

guest
Pohlaví: Nespecifikováno

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod guest » 15 úno 2018 11:12

viz příloha

Neuvedl jste rozsah ve sloupci B, čili makro se vztahuje na celý sloupec B.
Přílohy
vzor.xlsm
(16.47 KiB) Staženo 221 x

slama.fortunes
nováček
Příspěvky: 8
Registrován: únor 18
Pohlaví: Muž
Stav:
Offline

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod slama.fortunes » 15 úno 2018 11:34

Ano celý sloupec B i D.
Děkuji, vše funguje.
Lze se nějak zbavít hlášky při ukládání v příloze?
Přílohy
Screenshot_1.png
Screenshot_1.png (6.7 KiB) Zobrazeno 2186 x

guest
Pohlaví: Nespecifikováno

Re: Makro - zaznamenání data zápisu do buňky v excelu

Příspěvekod guest » 15 úno 2018 11:44

Jen na vlastní triko, není to dobrý nápad... Soubor / Možnosti / Zabezpečení / Nastavení Centra zabezpečení / Nastavení maker / Povolit...


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • VBA Excel 365 vložit obrazek do buňky
    od wlk60 » 19 dub 2023 15:43 » v Kancelářské balíky
    1
    1628
    od atari Zobrazit poslední příspěvek
    19 dub 2023 21:53
  • Excel - filtr na formát buňky + obsah Příloha(y)
    od popcorn » 19 zář 2023 17:07 » v Kancelářské balíky
    0
    1868
    od popcorn Zobrazit poslední příspěvek
    19 zář 2023 17:07
  • Import PDF do excelu Příloha(y)
    od luko02420 » 13 kvě 2023 11:29 » v Kancelářské balíky
    18
    3261
    od luko02420 Zobrazit poslední příspěvek
    16 kvě 2023 11:27
  • Poškozený soubor excelu Příloha(y)
    od Jsimi » 06 úno 2024 22:43 » v Kancelářské balíky
    0
    620
    od Jsimi Zobrazit poslední příspěvek
    06 úno 2024 22:43
  • Makro pro myš Rapture Python
    od mmmartin » 27 srp 2023 15:18 » v Problémy s hardwarem
    9
    1111
    od mmmartin Zobrazit poslední příspěvek
    29 srp 2023 16:47

Zpět na “Kancelářské balíky”

Kdo je online

Uživatelé prohlížející si toto fórum: Žádní registrovaní uživatelé a 4 hosti