Hvordan kan vi formatere dato via VBA?

Anonim

I denne artikel lærer vi, hvordan du formaterer datoen gennem VBA.

Lad os tage et eksempel for at forstå, hvordan og hvor vi kan formatere cellen i kort datonummer.

Vi har produktets mængdedata i område A1: C9, hvor kolonne A indeholder produktnavn og kolonne B indeholder mængden af ​​det, og kolonne C indeholder datoen. Nu vil vi konvertere til kort datoformat.

Følg nedenstående givne trin for at skrive makroen:-

  • Åbn VBA -side tryk på tasten Alt+F11.
  • Indsæt et modul.
  • Skriv nedenstående kode:

UnderformatShortdate ()

Dim Sh Som regneark

Sæt Sh = ThisWorkbook.Sheets (1)

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

Afslut Sub

Kode Forklaring:-

Først har vi givet emnet for koden, derefter havde vi defineret alle variablerne efter at vi havde defineret det område, hvor vi vil placere det korte datoformat.

For at køre makroen skal du trykke på tasten F5, og rækkeviddeformatet ændres til kort datoformat.

Lad os tage et eksempel fra www.excelforum.com

Makro/VBA for at ændre datoformat fra 01.01.2011 til 01/01/2011

Oprindeligt spørgsmål:-

Jeg har en Excel -webforespørgsel, der trækker et bord ind i Excel. Kolonne A er dybest set en liste med navne, og kolonne B er den relevante dato. Datoerne er angivet på webstedet som 01.01.2011 -format og importeres efterfølgende til Excel på denne måde. Som følge heraf kan jeg ikke sortere kolonne B efter datoværdi, da Excel ikke genkender formatet. Jeg har prøvet at ændre egenskaberne for datoen, bruge find & erstat for at ændre det til 01/01/2011 format og derefter ændre egenskaber alt uden resultat.

Ideelt set vil jeg bare gerne have en slags Macro/VBA -kode til at ændre 01.01.2011 til 01/01/2011 format, så jeg kan sortere kolonnen.

Hvis du vil vide mere om løsningen, skal du klikke på linket

Download - VBA Short Date Format - xlsm