Ensimmäisen merkin (heittomerkki) poistaminen kaikista soluista

Miten pystyn poistamaan suuresta Excel-luettelosta heittomerkit? Heittomerkki löytyy jokaisesta solusta kirjain/numerosarjan ensimmäisenä merkkinä.

Taulukko on minulle tällaisenaan käyttökelvoton, enkä ole löytänyt sopivaa toimintoa, jonka perusteella voisi luoda toimivan makron.
86961
Äänestä

Muut lukivat myös

Vastaukset 8

Vanhimmat

Ne heittomerkit näkyy vasta siellä funktiokentässä tai kaksoisklikkaamalla solua. Eli siis heittomerkkejä ei näy "ei aktiivisesta" solusta ennen kuin sitä kaksoisklikkaa tai klikkaa niin, että solun teksti tulee näkyviin funktiokentässä.

Äänestä

kirjoita soluun 1,copy->paste special->multiply

Äänestä
  • tunnu toimivan, ei. Tiedä sitten ymmärsinkö oikein mitä tarkoitit...

    Äänestä

Ehdotettu kertosysteemi ei ehkä toimi vanhoilla Excel-versioilla. Se myös laittaa tyhjiin soluihin nollan.

Se helkkarin heittomerkki kummittelee joissakin työkirjoissa jos ne on siirretty Lotus123-työkirjasta Exceliin. Muistaakseni heittomerkki on vanha Lotuksen muotoilumerkki (viimeksi käytin Lotusta viisitoista vuotta sitten).

Oheinen makro toimii ainakin nopeasti tutkittaessa. Kunde varmasti osaisi tehdä paremman mutta kun se on nyt lomalla ;)

Sub StrToDbl()
Dim Solu As Range
For Each Solu In Range(Cells(1, 1), Cells(1, 1).SpecialCells(xlCellTypeLastCell))
On Error Resume Next
If Solu Empty Then Solu.Value = CDbl(Solu.Value)
Next Solu
End Sub

Äänestä
  • Tämä on edellistä parempi. Se ottaa myös tyhjissä soluissa olevat heittomerkit jos on.

    Sub StrToDbl()
    Dim Solu As Range
    For Each Solu In Range(Cells(1, 1), Cells(1, 1).SpecialCells(xlCellTypeLastCell))
    Solu.Value = CVar(Solu.Value)
    Next Solu
    End Sub

    Äänestä

  • Excelisti kirjoitti:

    Tämä on edellistä parempi. Se ottaa myös tyhjissä soluissa olevat heittomerkit jos on.

    Sub StrToDbl()
    Dim Solu As Range
    For Each Solu In Range(Cells(1, 1), Cells(1, 1).SpecialCells(xlCellTypeLastCell))
    Solu.Value = CVar(Solu.Value)
    Next Solu
    End Sub

    Suurkiitokset!

    Tästä oli suuri apu. Hienoa, että jollain on homma hallussa!

    Äänestä

  • Excelisti kirjoitti:

    Tämä on edellistä parempi. Se ottaa myös tyhjissä soluissa olevat heittomerkit jos on.

    Sub StrToDbl()
    Dim Solu As Range
    For Each Solu In Range(Cells(1, 1), Cells(1, 1).SpecialCells(xlCellTypeLastCell))
    Solu.Value = CVar(Solu.Value)
    Next Solu
    End Sub

    Osaako joku kertoa mistä löydän yllä olevaan esimerkin tekoon todella simppelit suomenkieliset ohjeet tuon makron tekemiseen. En ole ikinä itse makroa tehnyt, töissä olen toki valmista käyttänyt. Ymmärrän ettei tätä voi oppia yhdessä yössä. Kysyn siis vain mistä kannattaa lähteä liikkeelle. Haluan tämän oppia ja olen sen eteen valmis näkemään reilusti vaivaakin.
    -Kiitos ja kumarrus pienistäkin vihjeistä.

    Äänestä

  • Anonyymi kirjoitti:

    Osaako joku kertoa mistä löydän yllä olevaan esimerkin tekoon todella simppelit suomenkieliset ohjeet tuon makron tekemiseen. En ole ikinä itse makroa tehnyt, töissä olen toki valmista käyttänyt. Ymmärrän ettei tätä voi oppia yhdessä yössä. Kysyn siis vain mistä kannattaa lähteä liikkeelle. Haluan tämän oppia ja olen sen eteen valmis näkemään reilusti vaivaakin.
    -Kiitos ja kumarrus pienistäkin vihjeistä.

    Paina Alt f11
    Yläpalkista Insert-Module
    Kopioi yllä oleva makro äsken ilmestyneeseen ikkunaan.

    Makron saa ajettua, kun kursori on jollain sen rivillä ja painaa f5. Se tekee nuo muutokset ko. työkirjan aktiivisena olevalla välilhdellä.

    Äänestä

Kommentoi aloitusta


Pena696 kirjoitti:

Miten pystyn poistamaan suuresta Excel-luettelosta heittomerkit? Heittomerkki löytyy jokaisesta solusta kirjain/numerosarjan ensimmäisenä merkkinä.

Taulukko on minulle tällaisenaan käyttökelvoton, enkä ole löytänyt sopivaa toimintoa, jonka perusteella voisi luoda toimivan makron.

Anonyymi
5000

Ilmoita asiaton sisältö

  • Sisältää materiaalia, joka on loukkaavaa, herjaavaa, rasistista, uhkailevaa tai ahdistelevaa.

  • Materiaali sisältää nimiä, yhteystietoja tai muita henkilökohtaisia tietoja. Julkisuuden henkilöistä, julkisissa viroissa toimivista ihmisistä sekä yritysten vastuuhenkilöistä saa keskustella työhön liittyen. Myös yksityiselämään liittyvistä asioista voi keskustella siltä osin, kuin niistä on julkisesti kerrottu.

  • Sisältää lapsille haitallista tai heiltä kiellettyä materiaalia. Seksuaalinen sisältö on sallittua aiheeseen tarkoitetuilla palstoilla, joiden ikäraja on 18 vuotta.

  • Lainvastaista sisältöä voi olla mm. yksityiselämää loukkaavan tiedon levitys, kiihottaminen kansanryhmää vastaan, laiton uhkaaminen, alaikäisiin liittyvä seksuaalinen sisältö/grooming, petokset, identiteettivarkaudet, kunnianloukkaukset ja tekijänoikeusrikkomukset.

  • Sisältö ei liity palstan tai keskusteluketjun aiheeseen.

  • Viesti ei ole suomea tai ruotsia (pl. International Forums), se sisältää mainontaa, se sisältää tekijänoikeuksin suojattua materiaalia, se on massapostitus tai jokin muu syy.

Jaa keskustelu