Numerosarja, joka sisältää myös kirjaimia, pitäisi muuttaa lukumuotoiseksi, jotta sarjat saadaan numeeriseen järjestykseen ja vielä tietyillä halutuilla tavoilla.
Miten numerosarjan kirjaimet voi kaavalla korvata esim. numerolla nolla? Sarjoissa kirjaimen paikka ei aina ole vakio eikä kirjainkaan vakio.
Kirjaimen korvaaminen
pertteli3
1
112
Vastaukset
piece of cake VBA:lla
et kertonut tuleeko tulos yhteen soluun vaiko esim. koko sarakkeeseen tai riviin
no molemmat versiot nyt tossa
yksittäisessä soluversiossa
tieto esim A1 ja tulos B1
solussa B1 laita solumuotoiluksi oma: Luku, desimaalit 0
ja kaava =Luvuksi(A1)
solualue suoria alla oleva makro LuvuksiAlie
moduuliin...
Function Luvuksi(Solu As Range) As Double
Dim sobj As Object
Set sobj = CreateObject("vbscript.regexp")
sobj.Global = True
sobj.Pattern = "[^0-9]"
'vaihda allaolevaan riviin korvattava numero nyt siis 0
Luvuksi = sobj.Replace(Solu, 0)
End Function
Sub LuvuksiALue()
Dim sobj As Object
Dim solu As Range
Set sobj = CreateObject("vbscript.regexp")
sobj.Global = True
sobj.Pattern = "[^-0-9]"
'muuta solualue sopivaksi nyt A-sarake
For Each solu In Range("A1", Range("A65536").End(xlUp))
solu = sobj.Replace(solu, 0)
solu.NumberFormat = "0"
Next solu
End Sub
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
Riikka Purra haluaa muuttaa
maahanmuuttopolitiikkaa. Me suomalaiset halutaan, että Riikka Purra muuttaa pois suomesta eikä tuu ikinä takas....698819Maataloustuet pois
Jokainen maksakoon harrastuksensa itse. Eihän golfin peluutakaan maksa yhteiskunta.3086633Australia, Britannia ja Kanada tunnustivat Palestiinan
Aikooko Petteri Lapanen pysytellä persujen ja uskovaisten panttivankina ja jättää Suomen historian väärälle puolelle?995927- 1523830
Joulukinkku NYT
Sian kankuista tulee vielä pula. Nyt on oikea aika hankkia joulukinkku.293221Maahanmuuton vastustajat ovat vajakkeja
Jokainen täysijärkinen suomalainen tietää, että Suomi ei pärjää ilman ulkomaalaisvahvistuksia.623129- 1551987
On asioita joita kadun
Yksi niistä on eräs J mies. Olen vasta hiljattain tajunnut. Kuinka väärin tein. Tulit sydän tarjottimella.. mutta tässä171786- 321468
Mitä sä pelkäät?
Että paljastan sut ja touhusi? Elät jotain ihan omaa fantasiaasi ja ainoa virhees oli sekoittaa mut näihin sairaisiin le191236