Vitajte na [www.pocitac.win] Pripojiť k domovskej stránke Obľúbené stránky
Spustite program Microsoft Office Excel 2007 , a zadajte dátum v " A1 " pomocou nasledujúci formát :
01.01.1950
2
kliknite na kartu " Vývojár " , a kliknite na tlačidlo " Visual Basic " otvorte Editor jazyka Visual Basic . Kliknite na menu " Vložiť " , a kliknite na tlačidlo " modul " vložiť nový kód modulu
3
Začnite písať kód vytvorí nový čiastkové postup , ako je napríklad nasledovné : . ClipArt
Private Sub converTextToDate ( )
4
Pokračujte zadajte nasledujúci kód pre vytvorenie " String " premenná a " Dátum " premenné :
Dim todaysDate ako dátum
Dim DateString As String
5
zadajte nasledujúci kód , aby sa dáta zapisujú do " A1 " a uložte ho na " String " premenné :
Range ( " A1 " ) . Vyberte
date_retezec = Range ( " A1 " ) . Hodnota
Praha 6
Previesť " String " dátový typ na " Date " dátový typ zadaním nasledujúci kód :
todaysDate = CDATA ( date_retezec )
7
Zobraziť prevedená dáta v bunke " B1 " zadaním nasledujúci kód :
Range ( " B1 " ) .. Vyberte klipart
Range ( " B1 " ) , Value = todaysDate
8
End sub postup zadaním nasledujúceho :
End sub
9
Stlačte " F5 " spustiť procedúru a vidieť výsledky .
Copyright © počítačové znalosti Všetky práva vyhradené