Î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
Descărcare - VBA Short Date Format - xlsm
