Miten saisin solussa olevan tekstimuotoilussa olevan lukusarjan näyttämään oikeata pvm-lukua.
Solussa A1 on nrosarja 20062411
joka pitäisi saada näyttämään 2006.24.11 tai 2006.11.24 tai 24.11.2006 muodolta.
Kyseessä on siis 24.11.2006 päivämäärä.
Yhden luvun muuttaminen ei ole ongelma mutta jos lukusarjoa on satoja. Luvut on tuotu jostakin ulkoisesta järjestelmästä Exceliin.
Solussa A1 on nrosarja 20062411
joka pitäisi saada näyttämään 2006.24.11 tai 2006.11.24 tai 24.11.2006 muodolta.
Kyseessä on siis 24.11.2006 päivämäärä.
Yhden luvun muuttaminen ei ole ongelma mutta jos lukusarjoa on satoja. Luvut on tuotu jostakin ulkoisesta järjestelmästä Exceliin.
Vastaukset 3
Vanhimmat
Vaihtoehto 1
Jos päivämääräsi ovat aina muotoa vvvvkkpp kokeile oheista funktiota.
Function MuunnaPvmF(Aika As String) As Date
MuunnaPvm = Right(Aika, 2) & "." & Mid(Aika, 5, 2) & "." & Left(Aika, 4)
End Function
Vaihtoehto 2
Oheinen ohjelma korvaa sarakkeen arvot päivämäärillä. Tätä koskee samat ehdot kuin funktiotakin. Lukujen tulee olla A-sarakkeessa.
Sub MuunnaPvmS()
Dim Pvm As String
Dim I As Long
I = 1
Do While Not IsEmpty(Cells(I, 1))
Pvm = Right(Cells(I, 1), 2) & "." & Mid(Cells(I, 1), 5, 2) & "." & Left(Cells(I, 1), 4)
Cells(I, 1) = CDate(Pvm)
I = I 1
Loop
End Sub
Solun muotoilulla voit muotoilla päivämäärän mieleiseksesi
Jos riittää että se näyttää päivämäärältä, muotoile solu Luokka: Oma , Laji ####"."##"."##
Tällä muotoilulla solun arvo on edelleen
20062411 mutta solussa näkyy 2006.24.11
Toinen tapa:
Excelin omalla Päiväys-funktiolla sen voi muuttaa päivämääräksi
=PÄIVÄYS(VASEN(A1;4);OIKEA(A1;2);POIMI.TEKSTI(A1;5;2))
ja muotoiluksi Oma vvvv.pp.kk
Kiitos molemmille.
2500 rivin muotoilu kävikin aika mutkattomasti.