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ž

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
xlnc
Level 3.5
Level 3.5
Příspěvky: 776
Registrován: červenec 11
Pohlaví: Muž

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

Příspěvekod xlnc » 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?
administrátor ProExcel.cz | lektor | vývojář | léčitel pro Microsoft Excel

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

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.

xlnc
Level 3.5
Level 3.5
Příspěvky: 776
Registrován: červenec 11
Pohlaví: Muž

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

Příspěvekod xlnc » 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
Nemáte oprávnění prohlížet přiložené soubory.
administrátor ProExcel.cz | lektor | vývojář | léčitel pro Microsoft Excel

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

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?

xlnc
Level 3.5
Level 3.5
Příspěvky: 776
Registrován: červenec 11
Pohlaví: Muž

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

Příspěvekod xlnc » 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?
administrátor ProExcel.cz | lektor | vývojář | léčitel pro Microsoft Excel

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

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
Nemáte oprávnění prohlížet přiložené soubory.

xlnc
Level 3.5
Level 3.5
Příspěvky: 776
Registrován: červenec 11
Pohlaví: Muž

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

Příspěvekod xlnc » 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...
administrátor ProExcel.cz | lektor | vývojář | léčitel pro Microsoft Excel

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

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.
Nemáte oprávnění prohlížet přiložené soubory.

xlnc
Level 3.5
Level 3.5
Příspěvky: 776
Registrován: červenec 11
Pohlaví: Muž

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

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

viz příloha

Neuvedl jste rozsah ve sloupci B, čili makro se vztahuje na celý sloupec B.
Nemáte oprávnění prohlížet přiložené soubory.
administrátor ProExcel.cz | lektor | vývojář | léčitel pro Microsoft Excel

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

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?
Nemáte oprávnění prohlížet přiložené soubory.

xlnc
Level 3.5
Level 3.5
Příspěvky: 776
Registrován: červenec 11
Pohlaví: Muž

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

Příspěvekod xlnc » 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...
administrátor ProExcel.cz | lektor | vývojář | léčitel pro Microsoft Excel


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • Makro v Excelu
    od ondra030 » 27 dub 2017 15:18 » v Kancelářské balíky
    4
    407
    od xlnc
    28 dub 2017 20:38
  • makro v Excelu
    od Ilam » 08 bře 2017 09:18 » v Programování a tvorba webu
    0
    350
    od Ilam
    08 bře 2017 09:18
  • Makro do Excelu
    od mmmartin » 28 srp 2017 21:47 » v Kancelářské balíky
    13
    736
    od X
    18 říj 2017 20:23
  • Makro v excelu (VBA)
    od xp3 » 22 bře 2017 17:39 » v Kancelářské balíky
    11
    871
    od xp3
    31 bře 2017 15:46
  • EXCEL - změna barvy buňky na základě libovolné změny buňky
    od ppcko » 07 led 2018 18:23 » v Kancelářské balíky
    16
    596
    od atari
    16 led 2018 10:50

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

Kdo je online

Uživatelé prohlížející si toto fórum: CommonCrawl [Bot] a 1 host