Jak můžeme formátovat datum prostřednictvím VBA?

Anonim

V tomto článku se naučíme, jak formátovat datum prostřednictvím VBA.

Uveďme si příklad, abychom pochopili, jak a kde můžeme buňku naformátovat na krátké číslo data.

Máme údaje o množství produktu v rozsahu A1: C9, ve kterém sloupec A obsahuje název produktu a sloupec B obsahuje jeho množství a sloupec C obsahuje datum. Nyní chceme převést do formátu krátkého data.

Chcete-li napsat makro, postupujte podle níže uvedených kroků:-

  • Otevřete stránku VBA stisknutím klávesy Alt+F11.
  • Vložte modul.
  • Napište níže uvedený kód:

Sub FormatShortdate ()

Pracovní list Dim Sh As

Nastavit Sh = ThisWorkbook.Sheets (1)

Sh.Range ("C2: C9"). NumberFormat = "m/d/rrrr"

End Sub

Vysvětlení kódu:-

Nejprve jsme zadali předmět pro kód, poté jsme definovali všechny proměnné a poté jsme definovali rozsah, kam chceme vložit formát krátkého data.

Chcete -li spustit makro, stiskněte klávesu F5 a formát rozsahu se změní na formát krátkého data.

Vezměme si příklad z www.excelforum.com

Macro/VBA pro změnu formátu data z 01.01.2011 na 01/01/2011

Původní otázka:-

Mám webový dotaz aplikace Excel, který stahuje tabulku do aplikace Excel. Sloupec A je v podstatě seznam jmen a sloupec B je relevantní datum. Data jsou na webu uvedena ve formátu 01.01.2011 a následně jsou tímto způsobem importována do aplikace Excel. V důsledku toho nemohu řadit sloupec B podle hodnoty data, protože aplikace Excel nerozpoznává formát. Zkoušel jsem změnit vlastnosti data pomocí funkce Najít a nahradit na formát 01/01/2011 a poté změnit vlastnosti bezvýsledně.

V ideálním případě bych chtěl nějaký kód Macro/VBA změnit 01.01.2011 na 01/01/2011, abych mohl sloupec seřadit.

Chcete -li vědět o řešení, klikněte na odkaz

Stáhnout - VBA Short Date Format - xlsm