photosdematures.com

Funció CDATE a VBA

VBA CDATE és una funció de conversió de tipus de dades que converteix un tipus de dades que és text o cadena en un tipus de dades de data. Un cop convertit el valor en tipus de dades de data, podem jugar amb coses de data.

Sintaxi de CDATE

A continuació es mostra la sintaxi de la funció CDATE a VBA.

Expressió: L’expressió pot ser una cadena o un valor de text o una variable que contingui un valor per convertir-lo al tipus de dades de data.

CDATE identifica el format de data i hora a l'ordinador en què treballem i converteix el valor subministrat al mateix tipus de dades de data. Si subministreu només el dia i el mes i ignora l'any, la funció CDATE pren l'any del sistema, es mostra juntament amb el dia i el mes subministrats.

Veurem més i més exemples a la secció següent.

Com s'utilitza la funció CDATE a Excel VBA?

Exemples de funció CDATE a excel vba.

Podeu descarregar aquesta plantilla Excel de VBA CDATE aquí - Plantilla Excel de VBA CDATE

Exemple 1

Abans de mostrar-vos l'exemple de CDATE, mireu primer el codi següent.

Codi:

 Sub CDATE_Exemple1 () Dim k As String k = "25-12" MsgBox k End Sub 

A l'anterior per a la variable "k", he assignat el valor com "25-12". Quan executi aquest codi, veurem el mateix valor al quadre de missatges de VBA.

Però això es pot convertir a la data mitjançant la funció VBA CDATE. Per a això, definiu una variable més com a Data.

Codi:

 Dim k1 com a data 

Per a aquesta variable "k1" assigneu la funció CDATE i proporcioneu la variable "k" que conté la cadena "25-12". I per al quadre de missatges, mostreu el valor variable de "k1" en lloc de "k".

Codi:

k1 = CDate (k)

Ara executeu el codi i vegeu el resultat en un quadre de missatges.

Per tant, el resultat és “25/12/2019”.

Mireu de prop el valor que hem subministrat, hem subministrat "25-12" que no hem subministrat l'any.

Mentre escrivia aquest article l'any actual al meu sistema era el 2019, per tant, VBA CDATE va convertir el valor de cadena "25-12" a la data i hi va afegir l'any del sistema 2019. Per tant, els resultats finals es llegeixen així el 25/12/2019, és a dir, el 25 de desembre de 2019.

Exemple 2

Ara mireu el codi següent.

Codi:

 Sub CDATE_Example2 () Dim k Variant Dim kResult As Date k = 43889 kResult = CDate (k) MsgBox kResult End Sub 

Al codi anterior de la variable "k", he aplicat el número "43889". Tots sabem que es tracta d'un número de sèrie, però per a una altra variable "KResult" hem convertit aquest valor a la data mitjançant la funció "CDATE".

El mateix resultat de la variable "kResult" que es mostra al quadre de missatges.

Executeu el codi i vegeu la màgia de la funció "CDATE".

Es mostra el resultat com a "28/02/2020", si no esteu familiaritzat amb les dates a Excel, us hauríeu de preguntar com va passar això.

Per exemple, introduïu el mateix número (43889) en una de les cel·les del full de càlcul.

Per a això, apliqueu el format "DD-MM-AAAA".

Ara feu clic a Ok i veureu el resultat.

Ara el resultat ha canviat d'un número de sèrie a la data. Com que hem aplicat el format de data a la part superior del número de sèrie, ha mostrat la data respectiva.

Per tant, això significa que el número de sèrie 43889 és igual a la data del 28-02-2020.

Així doncs, al nostre codi VBA, la funció CDATE ha executat el mateix convertint el valor de la cadena en un tipus de dades de data.

Exemple 3

Per a aquest exemple, mireu el codi següent.

 Sub CDATE_Example3 () Dim Value1 Dim Value2 Dim Value3 Value1 = "24 December 2019" Value2 = # 6/25/2018 # Value3 = "18:30:48 PM" MsgBox CDate (Value1) MsgBox CDate (Value2) MsgBox CDate ( Valor3) Final Sub 

Quan executem aquest codi, obtindrem els resultats següents.

Per tant, tots els valors es converteixen al tipus de dades de data amb la funció CDATE.

Coses que cal recordar

• CDATE converteix només els números i els valors de cadena al tipus de dades de data.
• Això és útil quan l’utilitzem amb altres funcions.
• Si es proporciona un valor de tipus de dades incorrecte, obtindrem un error de desajustament de tipus.
• Com que la data i l'hora formen part del número de sèrie, converteix l'hora i l'hora adequada.