Jak zjistit, zda je v buňce zadané datum? Vyřešeno

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

Moderátor: Mods_senior

Uživatelský avatar
atari
Level 5.5
Level 5.5
Příspěvky: 2668
Registrován: říjen 08
Pohlaví: Muž

Jak zjistit, zda je v buňce zadané datum?

Příspěvekod atari » 13 říj 2020 22:00

Potřebuji ve VBA zjistit zda je v buňce datum. Něco ve smyslu:
If Cells(1, 1) = „jakékoliv platné datum“ Then

Datum je vždy ve formátu 19.06.2012.

Poznámka: Dokázal bych to nějak obejít, že bych tu hodnotu v buňce rozložil a otestoval, zda na 4. a 5. pozici je číslo od 1 do 12, to samé s rokem apod. Ale to je ta poslední možnost, kterou bych chtěl řešit.



Reklama
Uživatelský avatar
ITCrowd
Tvůrce článků
Elite Level 12.5
Elite Level 12.5
Příspěvky: 20373
Registrován: březen 10
Pohlaví: Muž

Re: Jak zjistit, zda je v buňce zadané datum?  Vyřešeno

Příspěvekod ITCrowd » 13 říj 2020 22:38

Ahoj,
VBA sice neumím, ale ve vbs je funkce IsDate(). Příklad:
test = IsDate(MojeDatum) - vrací hodnotu true, nebo false.
Zkus mrknout, jestli to neumí i VBA (jsou si dost podobné).
Příkaz by pak mohl vypadat:
If (IsDate(Cells(1, 1))) Then
Případně If (Not IsDate(Cells(1, 1))) Then
Zkusili jste to vypnout a zapnout? Problémy řeším pouze v tématech. Do SZ mi proto píšete zbytečně.
Základní diagnostika WiFi Jak na diagnostiku sítě Router jako switch Proč je nesmysl chtít router s velkým dosahem Vybíráme router

Uživatelský avatar
atari
Level 5.5
Level 5.5
Příspěvky: 2668
Registrován: říjen 08
Pohlaví: Muž

Re: Jak zjistit, zda je v buňce zadané datum?

Příspěvekod atari » 14 říj 2020 00:52

Tak VBA má také příkaz IsDate, díky za tip.
Já to hledal v Excelu ve vzorečkách v oddíle "Datum a čas", a tam jsem to nenašel.


  • Mohlo by vás zajímat
    Odpovědi
    Zobrazení
    Poslední příspěvek
  • C sharp nalezení největší zadané hodnoty
    od 0Kedry0 » 04 lis 2020 22:58 » v Programování a tvorba webu
    1
    264
    od KrisMan555
    05 lis 2020 00:02
  • Při změne v buňce zapiš do druhé
    od luko02420 » 29 dub 2020 09:06 » v Kancelářské balíky
    2
    469
    od luko02420
    29 dub 2020 13:47
  • excel - tisk se změnou v buňce
    od Efendor » 10 srp 2020 09:01 » v Kancelářské balíky
    1
    366
    od Grimm
    10 srp 2020 11:17
  • Podbarvení buněk na základě hodnoty v buňce
    od luko02420 » 03 dub 2020 03:42 » v Kancelářské balíky
    2
    389
    od luko02420
    03 dub 2020 07:45
  • Zamčení konkrétní buňky na základě hodnoty v jiné buňce
    od MilaF » 15 črc 2020 13:33 » v Kancelářské balíky
    1
    367
    od Grimm
    16 črc 2020 10:30

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

Kdo je online

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