W tym artykule dowiemy się, jak sformatować datę za pomocą VBA.
Weźmy przykład, aby zrozumieć, jak i gdzie możemy sformatować komórkę w krótkim numerze daty.
Mamy dane ilościowe produktu w zakresie A1:C9, w którym kolumna A zawiera nazwę produktu, a kolumna B zawiera jej ilość, a kolumna C zawiera datę. Teraz chcemy przekonwertować na format krótkiej daty.
Aby napisać makro, wykonaj poniższe kroki:-
- Otwórz stronę VBA naciśnij klawisz Alt + F11.
- Włóż moduł.
- Napisz poniższy kod:
PodformatSkrócona data()
Dim Sh jako arkusz
Ustaw Sh = ThisWorkbook.Sheets(1)
Sh.Range("C2:C9").NumberFormat = "m/d/rrrr"
Napis końcowy
Wyjaśnienie kodu:-
Najpierw podaliśmy temat kodu, następnie zdefiniowaliśmy wszystkie zmienne, a następnie zdefiniowaliśmy zakres, w którym chcemy umieścić format daty krótkiej.
Aby uruchomić makro, naciśnij klawisz F5, a format zakresu zostanie zmieniony na format daty krótkiej.
Weźmy przykład z www.excelforum.com
Makro/VBA do zmiany formatu daty od 01.01.2011 do 01.01.2011
Oryginalne pytanie:-
Mam kwerendę sieci Web programu Excel, która pobiera tabelę do programu Excel. Kolumna A to w zasadzie lista nazwisk, a kolumna B to odpowiednia data. Daty podane są na stronie w formacie 01.01.2011 iw ten sposób są następnie importowane do Excela. W rezultacie nie mogę sortować kolumny B według wartości daty, ponieważ Excel nie rozpoznaje formatu. Próbowałem zmienić właściwości daty, używając funkcji znajdź i zamień, aby zmienić ją na format 01.01.2011, a następnie zmieniając właściwości bezskutecznie.
Idealnie chciałbym, żeby jakiś kod Macro/VBA zmienił format 01.01.2011 na 01.01.2011, żebym mógł posortować kolumnę.
Aby poznać rozwiązanie, kliknij link
Pobierz - format daty krótkiej VBA - xlsm