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 267 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 121 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 230 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 2329 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
  • Fičura v Excelu Příloha(y)
    od Rosta_Kolmix » 27 čer 2024 17:12 » v Kancelářské balíky
    1
    3385
    od Grimm Zobrazit poslední příspěvek
    28 čer 2024 23:30
  • ComboBox v Excelu kopírování Příloha(y)
    od LukM » 19 říj 2024 14:03 » v Kancelářské balíky
    0
    2710
    od LukM Zobrazit poslední příspěvek
    19 říj 2024 14:03
  • automaticke nastaveni velikosti komentare v Excelu
    od Mikik Block » 04 zář 2024 15:17 » v Kancelářské balíky
    0
    3248
    od Mikik Block Zobrazit poslední příspěvek
    04 zář 2024 15:17
  • Firemní data a bilocker
    od p3v4x » 12 lis 2024 19:00 » v Vše ostatní (hw)
    3
    2734
    od petr22 Zobrazit poslední příspěvek
    12 lis 2024 22:05
  • Jak permanentně smazat data z USB disku?
    od Patrik92 » 16 pro 2024 18:59 » v Vše ostatní (bezp)
    16
    4892
    od Minapark Zobrazit poslední příspěvek
    17 pro 2024 20:54

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

Kdo je online

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