Taulukossa on kirjoitettuna päivämäärä muotoon 10.10.1985.
Tämä pitäisi saada _luvuksi_ muotoon 101085. Excelin oma matematiikka ei tässä oikein toimi, kun se laskee päivät yhteen vuodesta 1900 asti. Kuinka onnistuu? (näitä on useita eikä ole aikaa kirjoittaa kaikkia käsin)
Päivämäärä luvuksi
3
1341
Vastaukset 3
moduuliin...
Option Explicit
Function Pvmluvuksi(Solu As Range) As Double
Pvmluvuksi = CDbl(Day(Solu) & Month(Solu) & Format(Solu, "yy"))
End Function
Sub koe()
ActiveCell = Pvmluvuksi(ActiveCell)
ActiveCell.NumberFormat = "General"
End Sub
2 tapaa käyttää , joko
1. Aktivoi solu ja suorita makro Koe (tee nappi makrolle)
2. Solu mihin haluat tuloksen kirjoita kaava esim arvo solusta C1 =Pvmluvuksi(C1)
jos luvut esim tietyssä sarakkeessa, niin silloin voisi tehdä aluemakron ja ei tartteisi yksitellen napsutella
Keep EXCELing
@KundeHyvä ohjelmoitu funktio. Toinen vaihtoehto on funktioiden käyttö seuraavasti.
=POIMI.TEKSTI(TEKSTI(A1;"pp.kk.vv");1;2)&POIMI.TEKSTI(TEKSTI(A1;"pp.kk.vv");4;2)&POIMI.TEKSTI(TEKSTI(A1;"pp.kk.vv");7;2)
Kaava kopioidaan soluun B1 ja alkuarvo on solussa A1. Tämä toimii aina samalla tavalla, oli lähtöarvo 1.1.2001 tai 15.12.2009. Antaa siis tulokseksi 6 merkkiä pitkän merkkijonon.
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Puukotus Kajaanissa
Kuka puukotti ja ketä? https://yle.fi/a/74-20247765 Vähemmän yllättäen päihteet mainittu581442- 251063
- 80925
- 65786
Nainen, tässä olen kahden vaiheilla
Toinen pitäisi valita ja kummassakin on hyvät ja huonot puolensa. Toinen olisi sellainen pysyvä mutta työläs. Toinen taa69764- 47722
Hyvä on sitten, jos et sitä s*ksiä halua kanssani.
Rakastetaan vaan toisiamme, voin käydä muualla tyydyttämässä fyysisenpuolen tarpeet. Puhumalla tämäkin olisi selvinnyt.131695- 89690
Humalassa autolla ajo.
Tuhti humala hyydytti kuljettajan Suomussalmella -sammui rattiin ,uutisoi Ylä-Kainuu.11672Tiesitkö? Jorma Uotisen EX-rakas on Helena Lindgren - Nämä ovat välit nyt: "Me ollaan..."
Jorma Uotinen ja Helena Lindgren olivat avoliitossa v. 1982-1999. Pariskunta oli aikansa näyttävä julkkispari, missä i14646- 36630
- 108611
Suloinen ja herkkä
Toiset huomioiva, räväkkä, yllättävä. Ei sellaisesta voi olla pitämättä.31605Jäljitelmä Birginit
Ei jumaleisson, Jeffin vaimo kertoo et nää Hermesit olikin jäljitelmiä ja timangit labrarääsää. Anna mun kaikki kestää �140581- 4572
Minä muistan
Minä muistan sinut nauravana. Sellaisena, joka sai tavallisenkin hetken tuntumaan vähän kevyemmältä, kuin huoneeseen ol45560Hyvää yötä hurmuri
Iltaa haaveeni! Kauniita unia😘 Jospa me vielä nähtäis ja juteltais, suukoteltais ja halittais, siliteltäis ja hyväiltä24503- 18502
- 37487
- 38481