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