lancio di Microsoft Office Excel 2007 , e digitare una data in " A1" utilizzando il seguente formato :
1 gennaio 1950
2
Fare clic sulla scheda "Sviluppatore " , e fare clic su " Visual Basic " per aprire l'editor di Visual Basic. Fai clic sul menu "Inserisci" e fare clic su "Modulo" per inserire un nuovo modulo di codice
3
Inizia la scrittura di codice per la creazione di una nuova procedura di sub, come il seguente : .
private Sub converTextToDate ( ) economici 4
Continua per tipo il seguente codice per creare la variabile " stringa " e la variabile "date" :
Dim TodaysDate As Date
Dim dateString As String
5
Digitare il seguente codice per ottenere la data di entrata in " A1" e salvarlo nella variabile " stringa " :
Range (" A1 " ) . Selezionare
dateString = Range (" A1 ") . Valore
6
Convertire il " " tipo di dati a un " String Data " tipo di dati digitando il seguente codice :
TodaysDate = CDate ( dateString ) economici 7
Visualizzare i dati convertiti in cella "B1" , digitando il seguente codice :
Range (" B1 " ) . Selezionare
Range (" B1 " ) Valore = TodaysDate
8
Fine della procedura sub digitando quanto segue : .
End sub
software © www.354353.com