Cum putem formata data prin VBA?

În acest articol vom învăța cum să formatați data prin VBA.

Să luăm un exemplu pentru a înțelege cum și unde putem formata celula cu numărul de dată scurtă.

Avem date despre cantitatea produsului în intervalul A1: C9, în care coloana A conține numele produsului, iar coloana B conține cantitatea acestuia, iar coloana C conține data. Acum, dorim să convertim în format de dată scurt.

Pentru a scrie macro-ul, urmați pașii de mai jos: -

Deschideți pagina VBA, apăsați tasta Alt + F11.
Introduceți un modul.
Scrieți codul menționat mai jos:

Sub FormatShortdate ()

Dim Sh Ca foaie de lucru

Set Sh = ThisWorkbook.Sheets (1)

Sh.Range ("C2: C9"). NumberFormat = "l / z / aaaa"

Sfârșitul Sub

Cod Explicație: -

În primul rând, am dat subiectul pentru cod, apoi am definit toate variabilele după care am definit intervalul în care dorim să plasăm formatul scurt de dată.

Pentru a rula macro-ul, apăsați tasta F5, iar formatul intervalului va fi schimbat în format de dată scurtă.

Să luăm un exemplu de pe www.excelforum.com

Macro / VBA pentru a schimba formatul datei de la 01.01.2011 la 01.01.2011

Întrebare originală: -

Am o interogare web Excel care scoate un tabel în Excel. Coloana A este practic o listă de nume, iar coloana B este data relevantă. Datele sunt listate pe site ca format 01.01.2011 și ulterior sunt importate în Excel în acest fel. Prin urmare, nu pot sorta coloana B după valoarea datei, deoarece Excel nu recunoaște formatul. Am încercat să modific proprietățile datei, folosind Găsire și înlocuire pentru a o schimba în formatul 01/01/2011, apoi am schimbat toate proprietățile fără rezultat.

În mod ideal, aș dori ca un fel de cod Macro / VBA să schimbe 01.01.2011 în format 01/01/2011, astfel încât să pot sorta coloana.

Pentru a afla despre soluție, vă rugăm să faceți clic pe link